Thema: Delphi TStringList als Result

Einzelnen Beitrag anzeigen

Benutzerbild von negaH
negaH

Registriert seit: 25. Jun 2003
Ort: Thüringen
2.950 Beiträge
 
#2

Re: TStringList als Result

  Alt 8. Jun 2004, 00:29
probier mal:

Delphi-Quellcode:
procedure TfrmMain.GetVarList;
begin
  with TFrmVarList.Create(Self) do
  try
    ShowModal;
    Self.FVarList.Assign(GetList);
  finally
    Release;
  end;
end;
und achte nebenbei mal auf deine Formatierungen und den try finally Block umd Resourcen zu schützen.

Gruß Hagen
  Mit Zitat antworten Zitat