Real Name	:	Nesrin Uluca
Subject	:	Text Dosyadan Veri Okumak
Description	:	Forma TMemo, TButton ekleyin ...
procedure TForm1.Button2Click(Sender: TObject); var TF: TextFile; Satir : String; begin Memo1.Lines.Clear; AssignFile(TF, 'c:\windows\desktop\Deneme.TXT'); Reset(TF); while not eof(TF) do begin Readln(TF, Satir); memo1.Lines.Add(Satir); end; CloseFile(TF); end;
Rating	:	2.75 (out of 5)

Visitor Voting Booth

:

ExcellentVery GoodGoodFairPoor