Вниз
Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.026 c
2-1160132776
andrey44
2006-10-06 15:06
2006.10.22
Flat Memory as Dynamic array


2-1160053115
Anto}{a
2006-10-05 16:58
2006.10.22
Таблица


2-1160396333
yel
2006-10-09 16:18
2006.10.22
Быстро сохранить запись (record)


2-1159887167
lobach
2006-10-03 18:52
2006.10.22
Поиск по всему диску


6-1147666748
lka
2006-05-15 08:19
2006.10.22
Обзор компьютеров в домене, GetObject




   Наверх