[Lazarus] [Débutant] Passage de paramètres d'une form à une autre ?

[Claudius07]

Re-bonsoir à tous et à toutes,

Je bute sur un truc que j'utilisais pas mal en Windev :

Comment passer des paramètres ou des valeurs d'une form à une autre ?

Cas concret:

Form1 représente un enregistrement dans la table1 de ma base;
Table1 est liée à table 2 par une clé primaire de table2.
L'utilisateur veut modifier dans table1 la valeur qui permet la liaison.
Pour tester que la nouvelle valeur est correcte, pas de lézard, je m'en suis sorti. Pour le cas où on est perdu (trou de mémoire, valeur non encore créée ...), j'ai programmé la touche F4 qui ouvre Form2 et à travers elle table2 (modifiable).
Je voudrais que lorsque l'on ferme Form2, la valeur de la clé de liaison dans l'enregistrement actif de Table2 soit automatiquement reportée dans le Tdbedit ad hoc de Form1.
Cerise sur le gâteau, je voudrais utiliser Form2 ailleurs dans l'appli, donc je ne peux pas forcer une mise à jour du champ de Form1 lors de la fermeture de Form2 sans prendre quelques précautions.
Faute de mieux, ma première idée est de faire ça en testant l'existence de Form1, à votre avis ?

Mille excuses pour la longueur du propos ... et merci de vos zavis.

A bientôt
Claudius07.

[chris37]

Bonjour Claudius,

Windev toi aussi ! j'en fais 8h00 par jour

Pour revenir à tes fenêtres.
Je procède comme cela... mais il y a d'autres solution je pense car on ne passe pas directement de paramètres à une form sauf via le constructeur que tu peux surcharger mais je ne le fais pas.

Code :

1
2
3
4
5
6
7
8
maform := tmaform.create;
 
If maform.showmodal = mrok then
 
    macle:=maform.mondataset.fieldbyname('monchamp').value;
   //reste du traitement...
end;
maform.free;

Si cela peut te montrer le chemin
Cordialement,
Chris

[Louis Griffont]

Sinon, tu peux aussi créer une méthode de création spécialisée...
J'utilisais pas mal ça dans Delphi, je pense que, comme je vais me mettre à Lazarus, je vais vite voir comment porter la chose...

Pour moi aussi Windev (10) 8 heures par jour !

[manuker]

+1 pour l'idée de la méthode de création spécialisée! (surcharger Create avec des paramètres)

[chris37]

Oui effectivement mais dans ce cas il faut redéfinir le create des que l'ont change les paramètres mais cela reste mon avis.

Le principal étant de fournir plusieurs solutions.
Cordialement,
Chris