Процедура обработки сообщения.

← →
AHTOH (2003-09-02 20:07) [0]

Я пытаюсь обрабатывать сообщение от иконки приложения в трее:
код такой: private { Private declarations } procedure IconManager(var msg:TMessage);message wm_user+100; ..................................... procedure TMain.IconManager(var msg:Tmessage); {*} begin .... end;
так вот в месте {*} выдает ошибку[Error] Unit1.pas(175): Declaration of "IconManager" differs from previous declaration
- описания отличаются.
как мне поправить код?
Аналогичным образом описывал процедуру обработки сообщения в другой программе- там ошибку не выдавал.

← →
Song © (2003-09-02 20:09) [1]

У меня всё работает:

procedure WMGetSysCommand(Var Msg:TWMSysCommand); message WM_SYSCOMMAND; Procedure TMain.WMGetSysCommand(Var Msg:TWMSysCommand); { Обработчик WM_SYSCOMMAND } Begin { если нажата кнопка минимизации окна } IF Msg.CmdType=SC_MINIMIZE then Begin { Прячем окно TApplication } ShowWindow(Application.Handle,SW_HIDE); { Прячем главное окно } ShowWindow(Handle,SW_HIDE); { Добавляем иконку в трей } Ic(1,Application.Icon); End else inherited; End;

← →
Skier © (2003-09-02 20:09) [2]

Что хотят то и творят !

← →
хм © (2003-09-02 20:12) [3]

Нажми ctrl+shift+c на строке в определении TMain

← →
AHTOH (2003-09-02 20:47) [4]

нажал - ошибка остается.
а что вообще делает complete class at cursor?

← →
Романов Р.В. © (2003-09-02 21:16) [5]

F1 - Class completion

← →
AHTOH (2003-09-03 13:57) [6]

так в чем заключатеся этот class completion - дополнение класса, если я так перевожу?

← →
PVOzerski © (2003-09-03 14:00) [7]

Ты случайно после объявления класса tMain тип tMessage не переопределил?

← →
Skier © (2003-09-03 14:13) [8]

>AHTOH (02.09.03 20:07)
Чтобы сказать где косяк нужно побольше кода...

← →
AHTOH (2003-09-03 14:31) [9]

изменил Tmessage -на Tmsg - все заработало!!!(почему-не понимаю все равно)
всем спасибо!!!

> почему-не понимаю все равно

Конфликт типов.

Можно ещё так выйти из ситуации
procedure IconManager(var msg: Messages.TMessage);message...

← →
AHTOH (2003-09-03 14:54) [11]

вру! позор мне!
не заработало.
а я действительно переопределил тип Tmessage.-теперь все ОК
спасибо всем, а особенно PVOzerski

Процедура обработки сообщения. Найти похожие ветки