Скачать: CL | DM;

Проблемы с blockwrite.   Найти похожие ветки 

← →
guitarist ©   (2006-06-27 18:30) [0]

Проблемы с 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); то будет ошибка

---

← →
Zeqfreed ©   (2006-06-27 18:35) [1]

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

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

---

← →
begin...end ©   (2006-06-27 18:37) [2]

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

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

BlockWrite(efil, r, 1)

---

← →
gitarist   (2006-06-27 19:44) [3]

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

---

← →
Германн ©   (2006-06-28 03:31) [4]

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


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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c