Dank an marabu
Hat lange gedauert
aber es klappt echt Super
Und so sieht der Programmcode aus
Delphi-Quellcode:
procedure Tform1.TextRep(sender: TObject);
var sl : TStringList;
begin
sl := TStringList.Create;
sl.LoadFromFile(verzP);
[b]sl.Text := StringReplace(sl.Text, '', '', [rfReplaceAll]);[/b]
sl.SaveToFile(verzP);
form1.FileListBox1.Refresh;
end;
Edit:
ein Problem habe ich noch wenn die Datei Schreibgeschützt ist gibt er eine Fehlermeldung aus
Winkelmesser
[edit=SirThornberry]Delphi-Tags ergänzt - Mfg, SirThornberry[/edit]