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

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

Проблемы с blockwrite. [D7, XP]


guitarist ©   (2006-06-27 18:30:00) 

Проблемы с blockwrite.
Здравствуйте, объясните, пожалуйста, в чем проблема
Вот кусок кода

while(not(eof(fil)))  do
begin
blockread(fil,x,1);
r:=random(119-48)+48;

blockwrite(efil,chr(r),1);    (1)
blockwrite(efil,x,1);
end;


При запуске строка (1) вызывает ошибку Variable required. Притом даже если написать так blockwrite(efil,#49,1); то будет ошибка


Германн   (2006-06-28 03:31:00) [1]


> gitarist   (27.06.06 19:44) [3]
> begin...end, спасибо, что-то я стормозил (и ord, и chr пробовал)


Хорошо, если действительно понял, в чём был не прав!


gitarist   (2006-06-27 19:44:00) [2]

begin...end, спасибо, что-то я стормозил (и ord, и chr пробовал)
Да и Zeqfreed спасибо за участие


begin...end   (2006-06-27 18:37:00) [3]

> guitarist ©   (27.06.06 18:30) [0]

> blockwrite(efil,chr(r),1);

BlockWrite(efil, r, 1)


Zeqfreed   (2006-06-27 18:35:00) [4]

> [0] guitarist ©   (27.06.06 18:30)

А почему в BlockRead используется fil, а в BlockWrite — efil. И вообще, как они объявлены?


Наверх

Титульная страница Поиск, карта сайта Написать письмо