![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
какже работать с текстовыми файлами? -ответ
Snap © (2002-12-14 15:24:00)просто меня один попросил это ему объяснить.
вот.
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.
этот код выводит вообщениями все строки в файлах.
Anatoly Podgoretsky (2002-12-14 16:47:00) [1]Ну это наверно у тебя не пашет, да и зачем тебе что бы пахало, прочитай лучше хелп по этому поводу.
Но ты забыл самое главное - вопрос, у тебя только утверждение.
Shadow (2002-12-14 16:27:00) [2]т.е. как не пашет?
Snap (2002-12-14 15:25:00) [3]мастера, а такой вопрос почему в дельфи объявление text не пашет, хотя в модуле систем textfile объявлен как text?