Thema: Delphi TStrings übergeben

Einzelnen Beitrag anzeigen

jjep

Registriert seit: 19. Jun 2007
Ort: Wettingen CH
78 Beiträge
 
#1

TStrings übergeben

  Alt 10. Okt 2007, 11:46
Hallo zusammen

In meinem Programm möchte mit einer Funktion TStrings zurückgeben, wie folg:

Delphi-Quellcode:
function TForm1.getStrings:Tstrings;
var Liste: TStrings;
begin
Liste := TStringlist.Create;
Try
  Liste.Add('erste Zeile');
  Liste.Add('zweite Zeile');
  Liste.Add('dritte Zeile');
  result := TStringlist.create;
  result.AddStrings(Liste);
finally
  Liste.Free;
end;
end;
Ist es notwendig "result" zu kreiren? logisch ohne gehts nicht, aber gäbes nicht eine ander möglichkeit die Strings zu übergeben?
  Mit Zitat antworten Zitat