txt dosyasına veri saklama

[pasa_yasar]

slm arkadaşlar.memo içindeki bilgiyi txt dosyasına yazdırıyorum.ama bilgi her gittiğinde eski bilgiyi siliyor yeni bilgiyi yazıyor.ben giden tüm bilgiyi altsatıra geçirerek yazdırmak istiyorum.kullandığım kod bu:

Kod: Tümünü seç

procedure TForm1.Button2Click(Sender: TObject);
begin
Memo1.Lines.SavetoFile('c:\a.txt');
end;

[danaci]

memodaki bilgiyi satır satır okutarak ve txt dosyayıda append modda açarak bilgilerinizi yazdırabilirsiniz.
Biraz çalışmayla kolayca yapabilirsiniz bunu.

[conari]

viewtopic.php?t=18880&postdays=0&postor ... ma&start=0

Bu linkten faydalanabilirsiniz sanırım.

[fatihtolgaata]

TFileStream ile çok rahat yapabilirsin. Ayrıca Memonun Lines özelliği TStringList olduğu için herhangibir stream'e kopyalanabilir.