какже работать с текстовыми файлами? -ответ

← →
Snap (2002-12-14 15:24) [0]

просто меня один попросил это ему объяснить.
вот.

var
f:textfile;
s:string;
begin
assignfile(f,"dfdfsdf.sdfsd");
reset(f);
{тут канечна проверка на иорезульт}
while not eof(f) do
begin
readln(f,s);
showmessage(s);
end;
closefile(f);
end.

этот код выводит вообщениями все строки в файлах.

← →
Snap (2002-12-14 15:25) [1]

мастера, а такой вопрос почему в дельфи объявление text не пашет, хотя в модуле систем textfile объявлен как text?

← →
Shadow (2002-12-14 16:27) [2]

т.е. как не пашет?

← →
Anatoly Podgoretsky (2002-12-14 16:47) [3]

Ну это наверно у тебя не пашет, да и зачем тебе что бы пахало, прочитай лучше хелп по этому поводу.
Но ты забыл самое главное - вопрос, у тебя только утверждение.

какже работать с текстовыми файлами? -ответ Найти похожие ветки