| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Почему то в файл текстовый не пишет ?? [D6]
alexe © (2003-01-16 09:51:00)посмотрите плиз свежим взглядом - почему не пишет в файл строку??
procedure Tform.SaveMsg(Msg: string);
var
fmsg: TextFile;
begin
{$I-}
AssignFile(fmsg, sP + "msg.txt");
FileMode := fmOpenReadWrite;
Reset(fmsg);
write(fmsg,Msg);
// writeln(fmsg,Msg);
CloseFile(fmsg);
{$I+}
end;
Smithson (2003-01-16 10:23:00) [1]//MBo © (16.01.03 10:08)
Sorry, действительно, промахнулся.
Poirot (2003-01-16 10:11:00) [2]что то мне не нравится наличие {$I} - убрав вы б получили что типа файл-то ненайден... хе-хе-хе
И вообще помоему нежелательно оставлять такие вещи без обработчика!!!
MBo (2003-01-16 10:08:00) [3]The FileMode variable determines the access mode to use when typed and untyped files (not text files)are opened using the Reset procedure.
Smithson (2003-01-16 10:05:00) [4]Строго говоря, при Reset и FileMode тоже должно работать? Как именно
не пишет? Этот код не будет создавать новыйфайл, но будет писать в существующий.
MBo (2003-01-16 09:52:00) [5]Не Reset,а Rewrite
FileMode не надо
| |
