Показать сообщение отдельно
  #6  
Старый 10.08.2014, 17:36
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание

Поменял эту часть кода
Код:
s := '$' + inttohex(MSG.wParam, 1);
i := StrToInt(s);
на это

Код:
integer(wParam) > 0

и все..
__________________
Нет ничего не возможного. Вопрос только во времени...
Ответить с цитированием