CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

Deplacer une image dans delphi.

jonathan4667
jonathan4667
Niveau 9
05 février 2005 à 17:09:31

:salut: tout le monde , je voudrais savoir comment il faut faire pour déplacer une image vers les 4 directions a l´aide des touches fléchées dans delphi 6 profesionel.

merci bcp d´avance de votre réponse ! :-)))

jonathan4667
jonathan4667
Niveau 9
05 février 2005 à 17:34:52

:up:

0[0]7
0[0]7
Niveau 6
05 février 2005 à 18:02:49

Tu créé un TBitmap. Tu créer quatre bouton, de chaque côté de la fenêtre.

Sur celui de gauche, tu fais : Bitmap1.Left := Bitmap1.Left + 1

Sur celui du haut : Bitmap1.Top := Bitmap1.Top - 1

Bien sûr, tu changes Bitmap1 par le nom de ton composant. Et j´te laisse réfléchir ( pas trop dur ) pour les duex autres :P

0[0]7
0[0]7
Niveau 6
05 février 2005 à 18:03:45

Ah, eh, les touches fléchées de ton clavier . ..

Tu fais un onKeyPress, tu vérifies la touche appuyée, et tu fais l´action adéquatre. :)

jonathan4667
jonathan4667
Niveau 9
05 février 2005 à 18:05:25

nan mais t´es un amour ! ( non je rigole :lol: )

merci beaucoup parce que tu sais quoi ? ? Ca
maaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaaaaaaaaaarche ! :-d:-d:-d:-d:-d:-d:-d:-d:-d:-d :-d

jonathan4667
jonathan4667
Niveau 9
05 février 2005 à 18:16:04

ah non ! :snif: :snif2: as-tu msn pour m´expliquer , j´ai udun dans mes contacts qui est tres cool mais il jamais connecté , que le soir , alors . .. :(

jonathan4667
jonathan4667
Niveau 9
05 février 2005 à 18:19:19

voici la partie du code , pour la fenetre ou je veux faire bouger mon personnage.

unit Unit4;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, AppEvnts;

type
TForm4 = class(TForm)
Image1: TImage;
procedure Image1Click(Sender: TObject);
private
{ Déclarations privées }
public
{ Déclarations publiques }
end;

var
Form4: TForm4;

implementation

{$R *.dfm}

procedure TForm4.Image1Click(Sender: TObject);
begin

end;

end.unit Unit4;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, AppEvnts;

type
TForm4 = class(TForm)
Image1: TImage;
procedure Image1Click(Sender: TObject);
private
{ Déclarations privées }
public
{ Déclarations publiques }
end;

var
Form4: TForm4;

implementation

{$R *.dfm}

procedure TForm4.Image1Click(Sender: TObject);
begin

end;

end.

Que dois-je EXACTEMENT marquer ? merci :)

jonathan4667
jonathan4667
Niveau 9
05 février 2005 à 18:31:56

Comment créer un TBitmap ?

jonathan4667
jonathan4667
Niveau 9
05 février 2005 à 18:43:31

bon , si tu tombes sur ce mesage , rajoutes-moi !

rtcwfan5@hotmail.com

jonathan4667
jonathan4667
Niveau 9
05 février 2005 à 19:23:37

:up: :snif2:

Sous forums
  • Aide à l'achat Mac
  • Création de sites web
  • Création de Jeux
  • Linux
  • Programmation
  • Internet
  • Steam Deck
  • Macintosh
  • Hardware
La vidéo du moment