Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1582 connectés 

  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Créer une ellipse et pouvoir la deplacer a la souris

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Créer une ellipse et pouvoir la deplacer a la souris

n°702306
drac
Posté le 18-04-2004 à 19:54:35  profilanswer
 

Une ellipse ou meme un controle quelconque
 
quelqu'un a deja fait ça?
En Delphi
 

mood
Publicité
Posté le 18-04-2004 à 19:54:35  profilanswer
 

n°702323
antp
Super Administrateur
Champion des excuses bidons
Posté le 18-04-2004 à 20:11:07  profilanswer
 

pour la plupart des contrôles, il suffit de mettre ceci dans leur OnMouseDown :
 
  ReleaseCapture;
  TButton(Sender).Perform(WM_SysCommand, $F012, 0);
 
(en remplaçant TButton par le contrôle que c'est évidemment)
 
Sinon en mettant DragMode à dmAutomatic tu peux jouer avec les drag & drop et les événements OnDragOver et OnDragDrop (ou des trucs qui ressemblent à ça).


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
n°702433
drac
Posté le 18-04-2004 à 23:47:23  profilanswer
 

antp a écrit :

pour la plupart des contrôles, il suffit de mettre ceci dans leur OnMouseDown :
 
  ReleaseCapture;
  TButton(Sender).Perform(WM_SysCommand, $F012, 0);
 
(en remplaçant TButton par le contrôle que c'est évidemment)
 
Sinon en mettant DragMode à dmAutomatic tu peux jouer avec les drag & drop et les événements OnDragOver et OnDragDrop (ou des trucs qui ressemblent à ça).

Merci , je testerais ça.
Sinon j'avais essayé de mettre dragmode a dmautomatic sur un tlabel et d'utiliser ondragover et ondragdrop mais le control ne se déplaçait tjs pas , cependant j'obtenais quand meme les coordonnées finales.

n°702437
antp
Super Administrateur
Champion des excuses bidons
Posté le 19-04-2004 à 00:03:37  profilanswer
 

ouais c'est dans le ondragdrop que tu dois "manuellement" changer les coordonnées du contrôle source ;)


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
n°702988
drac
Posté le 19-04-2004 à 16:20:20  profilanswer
 

J'ai essayé pas mal de truc mais rien a faire, j'arrive pas a mettre en oeuvre.
 
Je voudrais faire une chose toute simple:
J'ai un tlabel (label1) et je voudrais pouvoir le déplacer a la souris a l'execution--> ça veut pas bouger :fou:

n°703143
antp
Super Administrateur
Champion des excuses bidons
Posté le 19-04-2004 à 19:02:06  profilanswer
 

Essaie le truc StaticText qui est dans la palette Additionnal, parce que les TLabel ce ne sont pas de vrais contrôles je pense, c'est juste du texte "peint" sur la fenêtre.


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Créer une ellipse et pouvoir la deplacer a la souris

 

Sujets relatifs
[Résolu] pb déplacement de composants avec la souris[Résolu][VB6] Comment customiser le curseur de souris?
Créer son application windowsCréer des objets java dynamiquement...
[Java] Créer un editeur de texte gérant la coloration syntaxiquecomment créer un nouveau arbre DOM avec l'API de xerces ?
Creer un Forum de discussionCréer un module pour Python ( sous windows et en c ) ?
[PHP/MYSQL] Créer table avec des champs issus de variablesModifier ou créer une condition sur un report BO à partir d'access
Plus de sujets relatifs à : Créer une ellipse et pouvoir la deplacer a la souris


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR