1. Accueil
  2. Forum Codes-Sources
  3. Delphi / Pascal

Parametres dans les evenements

Signaler
Messages postés
165
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
16 février 2011
 -
Messages postés
814
Date d'inscription
vendredi 3 novembre 2000
Statut
Membre
Dernière intervention
30 juillet 2009
 -
bjr,

J'ai une dizaine de composants Edit, qui appellent la meme fonction lors de l'evenement onclick.

Est il possible dans l'evenement des controles concernés de passer un parametre ?

Ex : dans l'inspecteur d'objet, evenement on click, je souhaiterais indiquer : faitcela("A")
A voir également:

4 réponses

Réponse 1 / 4
Messages postés
702
Date d'inscription
vendredi 21 mars 2003
Statut
Membre
Dernière intervention
1 octobre 2009
 3
Non ! Le seul paramètre est Sender, mais il peut servir : il identifie l'émetteur de l'évènement.

Sélectionne un de tes TEdit, vas dans l'inspecteur d'objet, tape en face OnClick le nom de ta procedure (ex: AllEditClick) et valide.
Pour chaque autre TEdit, affecte à l'évènement OnClick la procédure que tu viens de créer.

Dans la procédure créée, le paramètre Sender te permet de savoir quel TEdit a généré l'évènement donc de récupérer le texte du TEdit clické :

Texte := (Sender as TEdit).Text;

Si tu veux faire un Case Of, tu peux utiliser la propriété Tag de chaque Edit (1 pour Edit1, 2 pour Edit2, ...), et tu fais

Case (Sender as TEdit).Tag of ....

Ken@vo
____________________
Code, Code, Codec !
Réponse 2 / 4
Messages postés
814
Date d'inscription
vendredi 3 novembre 2000
Statut
Membre
Dernière intervention
30 juillet 2009
 3
N'oublie pas l'attribut "tag".

C'est un attribut de 32 bits (taille d'un pointeur) qui n'est PAS utiliser par delphi. tu peux en faire ce que tu veux. par exemple mettre un pointeur sur une fonction de verification de str ou sur un tableau, ....
ou juste un bête integer qui te dirais quelle action tu veux faire.

j'espère que ça peux t'aider.

Loda
Réponse 3 / 4
Messages postés
814
Date d'inscription
vendredi 3 novembre 2000
Statut
Membre
Dernière intervention
30 juillet 2009
 3
l'attribut "tag" fait 32 bits (taille d'un pointeur). Il n'est PAS utiliser par delphi. tu peux en faire ce que tu veux. par exemple mettre un pointeur sur une fonction de verification de str ou sur un tableau, ....

j'espère que ça peux t'aider.

Loda
Réponse 4 / 4
Messages postés
814
Date d'inscription
vendredi 3 novembre 2000
Statut
Membre
Dernière intervention
30 juillet 2009
 3
dsl pour le troll. je me suis planté.
Répondre Posez votre question