Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.008 c
14-13770
RomanKulchycky
2002-07-08 11:19
2002.08.05
Русификация принтера Epson Lx 300+


3-13542
Натик
2002-07-15 14:08
2002.08.05
QReport - подскажите новичку


1-13592
Дядя Будда
2002-07-24 13:49
2002.08.05
Как в Dataset e DBGrid a позиционироваться на запись...


1-13616
maxim2
2002-07-25 08:20
2002.08.05
Как получить текст выбранного элемента в listbox


3-13532
Tenger
2002-07-14 09:32
2002.08.05
РАЗДЕЛИТЕЛЬ ОПЕРАТОРОВ В SQL