Работа с тхт файлами Delphi

[loginn333]

Сообщение от Пепел Феникса

загрузить в мемо если в вашей же программе, или вам надо поприличнее?

Через мемо я знаю как, а вот что то по красивее никак не могу придумать... может у Вас появятся какие то мысли по этому поводу ?

[Alien-18]

AssignFile(rezyltat, 'c:\rezyltat.txt');
Rewrite(rezyltat);
writeln(rezyltat, Label1.caption,' ');
writeln(rezyltat, Label2.caption,' ');
writeln(rezyltat, Label3.caption,' ');
writeln(rezyltat, Label4.caption,' ');
writeln(rezyltat, #10);
CloseFile(rezyltat);

О, майн год! Кто ж так в TXT-файлы пишет?!!