Evènement déplacement d'une fenêtre

Question

Ne trouvant pas cette fonctionnalité, je voudrais savoir s'il y avait un évènement ou autre chose d'une fenêtre indiquant que l'utilisateur la déplace ?

L'èvenement OnPaint ne me paraît pas complet
 ;)  Bruto --- Le p'tit belge --- pour vous servir

cs_Nono40 · Answer

Le OnPaint n'est effectivement pas le mieu, le mieux est de faire l'évenement soi-même à l'aide des messages de windows.
Dans la déclaration de TForm1 ajoute :
  public
    { Déclarations publiques }
    Procedure OnMove(Var Msg:TMsg);Message WM_MOVE;
  end;

Et ajoute ensuite le code que tu veux :
Procedure TForm1.OnMove(Var Msg:TMsg);
Begin
  ShowMessage('J''ai bougé !');
End;

--- :sleepy)  Nono du Moulin  :sleepy) ---

Bruto · Answer

Ok ça marche mais ça scintille un peut car en fait j'ai deux fenêtres qui sont dépendantes et je voulais que quand on déplace l'une, l'autre la suive. Maintenant ça marche mais ça scintille légèrement. Dommage.

Merci Nono40.

 ;)  Bruto --- Le p'tit belge --- pour vous servir

Evènement déplacement d'une fenêtre

2 réponses

Votre réponse

Discussions similaires