feststellen ob Object existiert!

[malo]

ich würde es so machen:

Delphi-Quellcode:

if (not (StringList is TStringsList)) then
begin
  StringList := TStringList.Create;
end;

Dabei jedoch die Variable StringList vom Typ TStrings deklarieren, aber als eine TStringList erzeugen. Also so:

Delphi-Quellcode:

var StringList: TStrings; // so deklarieren
{...}
proecedure TForm1.FormCreate(Sender: TObject);
begin
  StringList := TStringList.Create; // so erzeugen
end;

Das müsste funktionieren.