Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.22;
Скачать: CL | DM;

Вниз

Глюк компилятора или я уже переработал?   Найти похожие ветки 

 
vidiv ©   (2006-10-01 12:08) [0]

простой такой код:

program sleep;
{$APPTYPE CONSOLE}
uses Windows;
var I, T:Integer;
begin
   Val(ParamStr(1), I, T);
   if T = 0 then
       Sleep(I)
   else
       Writeln("Invalid parametr");
end.


У меня компилятор ругается:
[Error] sleep.dpr(8): "." expected but "(" found

на строку:
       Sleep(I)


 
Zeqfreed ©   (2006-10-01 12:16) [1]

program sleep;
{$APPTYPE CONSOLE}
uses Windows;
var I, T:Integer;
begin
  Val(ParamStr(1), I, T);
  if T = 0 then
      Sleep(I)
  else
      Writeln("Invalid parametr");
end.


Лечим приписыванием Windows. перед вызовом Sleep.


 
vidiv ©   (2006-10-01 12:21) [2]

Забыл сказать, что D8...


> Лечим приписыванием Windows. перед вызовом Sleep.

Понятное дело, я так и сделал, но всеже должно и так работать


 
Zeqfreed ©   (2006-10-01 12:27) [3]

> [2] vidiv ©   (01.10.06 12:21)


> Понятное дело, я так и сделал, но всеже должно и так работать

Не работает же, значит не должно.


 
Чапаев ©   (2006-10-01 12:40) [4]

> должно и так работать

Можешь обосновать, почему "должно"?


 
Юрий Зотов ©   (2006-10-01 14:14) [5]

> vidiv ©   (01.10.06 12:21) [2]
> должно и так работать

По всем канонам - не должно. Идентификатор Sleep в заголовке программы заслоняет собой такой же идентификатор в модуле Windows.


 
isasa ©   (2006-10-01 14:33) [6]

В текушем юните имя sleep описано как - program sleep - без параметров, поэтому имеем
[Error] sleep.dpr(8): "." expected but "(" found.

Для использования Sleep из модуля Windows необходимо указывать его полное имя(Windows.Sleep ).
Кто глючит?


 
TUser ©   (2006-10-01 16:43) [7]

Можно еще закомментировать первую строчку программы


 
vidiv ©   (2006-10-01 17:04) [8]

спасибо, все понял... я переработал начит =)



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

Текущий архив: 2006.10.22;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.051 c
15-1159519408
Juri
2006-09-29 12:43
2006.10.22
А как определить стоимость написанной программы?


15-1159350128
КаПиБаРа
2006-09-27 13:42
2006.10.22
Какой ноутбук выбрать


1-1157956587
yahaha
2006-09-11 10:36
2006.10.22
Вывод в нестандартные окна


9-1137780186
Cerberus
2006-01-20 21:03
2006.10.22
Ссылочка была.


15-1159470172
EkZot
2006-09-28 23:02
2006.10.22
Как прервать цикл for