Registriert seit: 17. Feb 2007
Ort: NRW
420 Beiträge
Delphi 2010 Professional
|
Re: aus einer richedit jede zeile einzeln in einer txt speic
15. Jun 2008, 17:48
Hi,
das ist so easy, du muss nur kurz nachdenken :thumb:
Zuerst brauchst du eine Schleife am besten FOR weil du kennst ja die Länge...
Also:
VAR I:Integer; StringList:TStringList;
BEGIN
FOR I := 0 TO RichEdit.Count -1
DO BEGIN
StringList := StringList.Create;
StringList.Add(RichEdit.Lines.Strings[I]);
StringList.SaveToFile('Zeile_'+ IntToStr(I));
StringList.Free;
END;
END;
(ungetestet ^^)
Man kann statt einer StringList dass auch über WriteLN etc. machen aber ich denke das verstehst du besser...
Sebastian
|