Einzelnen Beitrag anzeigen

Benutzerbild von geskill
geskill

Registriert seit: 17. Feb 2007
Ort: NRW
420 Beiträge
 
Delphi 2010 Professional
 
#3

Re: aus einer richedit jede zeile einzeln in einer txt speic

  Alt 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
  Mit Zitat antworten Zitat