Discussion :

[M.Dlb]

Voilà, j'ai créé ma fenêtre principale et j'ai mis un bouton (TButton) dessus... Pour l'instant, ce bouton fait rien mais c'est bien ça qui m'inquiète : j'ai fouillé l'aide et aucune méthode n'indique comment affecter une méthode à un évènement du bouton (cliqué, enfoncé, relaché, etc...). Alors je vois pas trop comment faire...
Aussi pour un bouton : à quoi correspond l'attribut "Control ID" ?

Merci beaucoup !

a+

[Alcatîz]

Salut !

Tu as dû affecter un identificateur à ton bouton, soit sous forme de constante soit directement sous forme de nombre.

Tu dois créer une méthode virtuelle indexée dans ton objet fenêtre, qui répond à l'action de ton bouton.

Par exemple, si l'identificateur de ton bouton est id_Bouton :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Type tFenetre = Object(tWindow)
                  Procedure IDBOUTON (var Msg : tMessage);
                     virtual id_First + id_Bouton;
                end;
 
Procedure tFenetre.IDBOUTON (var Msg : tMessage);
Begin
  MessageBox(hWindow,'Bouton actionné','Yahou !',mb_IconExclamation or mb_OK);
End;

Dans Resource Workshop, Control ID est tout simplement l'identificateur du bouton. Pour y affecter une constante, tu peux ajouter un fichier INC à ton fichier de ressources et la constante y sera automatiquement incluse.

Bonne prog !

[M.Dlb]

Merci beaucoup Alcatîz !!

a+