Bonjour à tous,
Dans un programme je vois cela :
Ce qui me gêne c'est le nombre de paramètres passés au constructeur, cela me pose des problèmes de lisibilité, pour ma part, j'aurais plutôt passé par des propriétés ( avec Property ) et j'affecterai les variables avant le release du frame (entre le ShowModal et le release ).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30 TframeChoixInfo = class(TFrame) Private: FstrInfo1 : ^string; Public : Constructor Create(Aowner : TComponent; Var Info1 : String; ); Reintroduce; // il y a en tout 6 paramètres passés en Var Implementation Constructor TframeChoixInfo.Create(Aowner : TComponent; Var Info1 : String; ); begin inherited Create(Owner); FstrInfo1 := @Info1; End; // et pour la création de ce frame : Var l_sInfo : String; Begin frmPopup := TframeChoixInfo.create(self, l_sInfo, ); // avec bien sûr les 6 paramètres frmPopup.ShowModal; frmPopup.Release; // On a donc l_sInfo qui contient la valeur de FstrInfo1 du frame frmPopup ... End;
C'est surement qu'une question de style, qu'en pensez vous ?
Partager