Moin...
Zitat:
jetzt macht es Sinn!
noch nicht...
Frage wo gibst du die Liste frei?
2 Möglichkeiten:
1. die function mit
Createxxx: List beginnen, damit man weiß, daß die Liste neu erzeugt wurde
2. die Liste in der aufrufenden
procedure erzeugen und übergeben.
besser:
Delphi-Quellcode:
//Variante 2:
procedure Blubb(List: TStrings)
begin
// (some SQL query)
ZQuery.Open;
while not ZQuery.EoF
do
begin
List.Add(ZQuery.FindByName('
TextField').AsString);
ZQuery.Next;
end;
end;
Danke, dass Du Dir noch Gedanken dazu machst!
Du meinst, damit nicht mehrfach ein Create der gleichen StringList erzeugt wird?
Ok, da passt das Codeschnipsel nicht ganz. Das Create wird woanders aufgerufen. Tie TStringList ist innerhalb einer Klasse, in deren constructor ich gleich die StringList erzeuge. Ob das elegant so ist, steht auf einem anderen Blatt ...
