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;