Ich bin gerade bei einem Delphi 2007 Problem und es scheint so als würde die TStringList Funktion "Find" nicht korrekt funktioniert:
Code:
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
begin
fStringList := TStringList.Create;
fStringList.Add('Alles');
fStringList.Add('wird');
fStringList.Add('gesucht');
Caption := BoolToStr(fStringList.Find('gesucht', i), TRUE)
end;
in einer leeren Form ergibt das ein "FALSE" in der Caption????