Guten Morgen,
so sollte es gehen.
So weit ich weiß brauch man Objekte nicht als var Parameter übergeben, da in der Parameterlist
sowieso nur die Adresse des Objektes steht.
Grüße
Klaus
Delphi-Quellcode:
procedure TfrmUebersicht.Button1Click(Sender: TObject);
var
liste:TStringList;
begin
liste := TStringList.create;
if StringListFuellen(Liste,getinivalue('StandardValues','IndexPath')+'\'+getinivalue('StandardValues','IndexFile')) = true then
begin
edtitelsuchen.Items.Text:=liste.Text;
end;
liste.free;
end;
// StringList abfüllen aus Datei
function StringListFuellen(List: TStringList; Datei:string):boolean;
begin
//List:= TStringList.Create;
result:=false;
if fileexists(datei) then
begin
List.LoadFromFile(datei);
result:=true;
end else
begin
result:=false;
end;
//List.Free;
end;
Grüße
Klaus