Einzelnen Beitrag anzeigen

Benutzerbild von geskill
geskill

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

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

  Alt 15. Jun 2008, 18:14
wie gesagt ungeteste aber ich sehe gerade

Zitat von geskill:
VAR I:Integer; StringList:TStringList;
BEGIN
FOR I := 0 TO RichEdit.Count -1
DO BEGIN
StringList := TStringList.Create; // ist klar muss TStringList heißen aber darauf hättest du auch selber kommen können...
StringList.Add(RichEdit.Lines.Strings[I]);
StringList.SaveToFile('Zeile_'+ IntToStr(I));
StringList.Free;
END;
END;
Sebastian
  Mit Zitat antworten Zitat