Discussion :

[chrysbi]

Bonsoir,

j'ai 2 questions concernant ce composant (le TButton):
1) Je réalise une interface graphique avec de nombreux boutons (j'en suis à 12) et je viens de rajouter un 13ème bouton. Jusqu'à maintenant, tout s'est bien passé. Je double-clique sur ce 13ème bouton pour écrire dans la procédure de clic sur le bouton, mais là, la procédure ne se crée pas et j'ai un message d'erreur: "L'éditeur de composants de la classe "TDefaultComponentEditor" a provoqué l'erreur: "Impossible de trouver la méthode. Veuillez corriger l'erreur affichée dans la fenêtre de messages."".

Ma fenêtre de message affichant: "unité.pas(8.20) Error: source de l'unité monrépertoire\fpc\2.2.4\units\i386-win32\rtl\sysutils.ppu non trouvé."

Cependant, mes autres boutons me placent toujours dans la procédure de clic à chaque fois que je double-clique sur eux et fonctionnent toujours. Je suis allée vérifier le fichier correspondant dans le dossier indiqué, et il est bien là...

Est-ce parce que une fiche ne peut contenir qu'un nombre limité de boutons? :o



2) Autre question: Y a-t-il un moyen avec Lazarus, de lancer une procédure lorsqu'on clique sur un bouton et une autre procédure lorsqu'on le relache? (en fait, je voudrais afficher une composante graphique lorsque je clique sur le bouton et le maintiens, et le faire disparaître dès que je relache le bouton).




Merci d'avance !!

[danucc]

Bonjour,

Utiliser l'événement OnMouseDown et OnMouseUp.
Pour cela, sélectionner le bouton puis aller dans l'inspecteur d'objets, sélectionner l'onglet Événements, cliquer à droite de la colonne Action.

Les procédures seront crées, il suffit alors d'écrire le code.

Danilo

[DOLPat®]

1) Je réalise une interface graphique avec de nombreux boutons (j'en suis à 12) et je viens de rajouter un 13ème bouton. Jusqu'à maintenant, tout s'est bien passé. Je double-clique sur ce 13ème bouton pour écrire dans la procédure de clic sur le bouton, mais là, la procédure ne se crée pas et j'ai un message d'erreur: "L'éditeur de composants de la classe "TDefaultComponentEditor" a provoqué l'erreur: "Impossible de trouver la méthode. Veuillez corriger l'erreur affichée dans la fenêtre de messages."".

Bonjour

Cela ne vient pas du nombre de boutons. Je viens de créer une fiche avec 18 TButton ayant chacun leur procédure OnClic et cela fonctionne parfaitement. (Lazarus 0.9.31)

[tintinux]

Bonjour,

j'ai un message d'erreur: "L'éditeur de composants de la classe "TDefaultComponentEditor" a provoqué l'erreur: "Impossible de trouver la méthode. Veuillez corriger l'erreur affichée dans la fenêtre de messages."".

Il y a une erreur de syntaxe dans le source qui ne permet plus à Lazarus d'insérer la procédure qui doit traiter l'évènement, ou sa déclaration.

Lis bien l'erreur affichée dans la fenêtre de messages et essaie de corriger jusqu'à compiler sans erreur avant d'ajouter le 13ème bouton.

Essaie de formater le source avec CTRL-D, cela peut aider ou donner d'autres indications (avec 0.9.30, ou 0.9.28 Windows seulement).

Cherche et met entre commentaires les procédures concernant le 12ème bouton, ou les précédents, en regardant si cela compile mieux...

PS : un formulaire avec 13 boutons ou plus, ce n'est pas très ergonomique et devrait je pense être évité, sauf tous tes utilisateurs sont pilotes d'avions...

[DOLPat®]

PS : un formulaire avec 13 boutons ou plus, ce n'est pas très ergonomique et devrait je pense être évité, sauf tous tes utilisateurs sont pilotes d'avions...

Bonjour

Sauf que dans certains cas, on ne peut pas s'en passer. Compte le nombre de boutons présent sur la calculette de Windows
Par contre on peut certainement regrouper leur traitement car cela fait un paquet de procédures qui va rendre le code long...

[mtournay]

j'ai une appli en cours d'encaissement avec écran tactile.
Dans un TNoteBook de 7 page, j'ai 25 boutons par page Et malgré cela, je n'ai qu'une procédure pour les gérer tous (un anneau pour les contrôler tous .... hum je m'égare)

L'astuce : j'ai nommé tous ces boutons d'une manière très logique : BTN_PXY. P représente le numéro de page, X la colonne dans la page et Y la ligne.
Dans les procédures des événements, tu as toujours 'sender: TObject' passé en paramètre, et donc tu peux accéder au sender.name, convertir le PXY en entier, et faire un case !

Autre astuce possible : utiliser la propriété TAG, qui est directement un entier

[DOLPat®]

Autre astuce possible : utiliser la propriété TAG, qui est directement un entier

Et le must, c'est de créer les boutons dans le Create de la fiche, cela permet d'un coup de les positionner, de les dimensionner et d'initialiser la propriété TAG. Et ceci s'en s’embarrasser de devoir les positionner manuellement dans l'EDI.