Newbie!!! Wie kann ich eine Text-Datei auslesen?

[RomanK]

Hoi,

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
begin
Memo1.lines.loadfromfile('c:\Apache\xampp\htdocs\secure\ram\Charts1.asf')
end;

...

procedure TForm2.Button2Click(Sender: TObject);
var
i:integer;
begin
for i := 0 to Memo1.Lines.Count-1 do
    Memo1.lines[i] := changeIP(Memo1.Lines[i],Edit1.text);
end;
Memo1.lines.savetofile('c:\Apache\xampp\htdocs\secure\ram\Charts1.asf');

end.

ungetestet, sollte aber funzen.