| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

такого небывает [D7, WinXP]

Страницы:   < 1 2 >

barakuda ©   (2007-07-03 12:32:00) 

Поверьте, очень стыдно задавать такой вопрос... но что делать..

Почему неработает этот код?

procedure TWebModule1.WebModule1WebActionItem5Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled:Boolean);
begin
AssignFile(F, 'D:\data.txt'); //
rewrite(f);                       // 100% создаётся файл на диске
find:=datetostr(date) + '|' + Request.RemoteAddr;  // 100% переменная не пустая - проверял
writeln(f, find);                // Но записывать в файл нехочет, вчера 3 часа бился как рыба об лёд
end;

Заранее благодарен

---

homm_ro   (2007-07-03 12:40:00) [21]

CloseFile ?

---

barakuda   (2007-07-03 12:38:00) [22]

искать, я потом буду,  пусть хотябы что нить запишет туда

кстати неработает даже  

writeln(f, 'bla-bla-bla');

---

ЮЮ   (2007-07-03 12:36:00) [23]

наверное в буфере лежит. Файл закрыть не мешало бы, прежде чем искать в нем что-то.

---

Страницы:   < 1 2 >

Наверх