Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.08.05;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.54 MB
Время: 0.021 c
14-13804
pave1
2002-07-11 09:57
2002.08.05
Вопрос о литературе ...


3-13573
RDA
2002-07-16 10:48
2002.08.05
FIBDataSet.pas - где взять


3-13529
SkyR
2002-07-15 08:09
2002.08.05
Опяь SQL запрос...


7-13826
Skif
2002-05-21 16:37
2002.08.05
Запуск приложения на нескольких компьютерах.


1-13626
jen_bond
2002-07-24 21:35
2002.08.05
Запустить 1С как Ole контейнер





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский