Текущий архив: 2002.08.05;
Скачать: CL | DM;
Вниз
Combining signed and unsigned types Найти похожие ветки
← →
MARcoDEN © (2002-07-23 21:28) [0]Здравствуйте! Почему-то при компиляции проекта выдается такое предупреждение - Combining signed and unsigned types. Причем указывается строчка (я выделил её жирным шрифтом) из процедуры, выполняющей задержку:
procedure MyDelay(msecs:integer);
var
FirstTickCount: longint;
begin
FirstTickCount:=GetTickCount;
repeat
Application.ProcessMessages;
until
((GetTickCount-FirstTickCount) >= msecs);
end;
Подскажите, пожалуйста, в чем дело? Как избавиться от этого предупреждения?
← →
TTCustomDelphiMaster © (2002-07-23 22:10) [1]Потому что longint определяет число со знаком, а GetTickCount возвращает значение типа DWORD - без знака.
← →
MARcoDEN © (2002-07-25 07:30) [2]Т.е. мне нужно только сменить longint на dword?
← →
MBo © (2002-07-25 07:49) [3]да
Страницы: 1 вся ветка
Текущий архив: 2002.08.05;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.013 c
