Bonjour a tous,
j'ai un probleme avec TStringList; avec une fonction que voici :
je recupere la valeur de la fonction de cette façon :
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 function pModeReglement:TStringList; var List:TStringList; begin with TFChoixReglement.Create(Application) do begin ShowModal; List:=TStringList.Create; List.Clear; try if ModalResult=mrOk then begin List.Add(ComboBox1.Text); List.Add(Edit1.Text); end; Result:=List; finally List.Free; Free; end; end; end;
Eh bien, ça ne marche pas, ni avec :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 var vList:TStringList; .../... vList:=TStringList.Create; vList.Clear; vList.AddStrings(pModeReglement);Ai-je raté un truc ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part vList:=pModeReglement;
Partager