Thema: Delphi Probleme mit StringList

Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.775 Beiträge
 
Delphi 10.4 Sydney
 
#3

Re: Probleme mit StringList

  Alt 27. Nov 2007, 09:30
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
Klaus
  Mit Zitat antworten Zitat