| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
где взять GetMessageText ? [D5, Win2k]
pirat © (2003-01-21 22:54:00)то есть чтобы функция по коду msg возвращяла (например) что это было "WM_PAINT" или "WM_CLOSE". где взять такую функцию?
Игорь Шевченко (2003-01-23 10:14:00) [1]pirat © (22.01.03 18:56)
У меня есть, но не полный список.
pirat (2003-01-22 18:56:00) [2]Ну да, оно самое,вот только самому писать все это ... Я думал у кого уже готовая есть :)
p.s.Пиши маленькую библиотеку (для собственных нужд), которая все сообщения пришедшие окну (или окнам) скидывает в текстовый файл.
Игорь Шевченко (2003-01-22 09:44:00) [3]Нечто вроде этого:
{ Расшифровка идетификатора оконного сообщения }
function MsgName (const MsgID : Cardinal) : String;
begin
case MsgID of
WM_ACTIVATE: Result := "WM_ACTIVATE";
WM_ACTIVATEAPP: Result := "WM_ACTIVATEAPP";
WM_CAPTURECHANGED: Result := "WM_CAPTURECHANGED";
WM_CHANGEUISTATE: Result := "WM_CHANGEUISTATE";
WM_CHAR: Result := "WM_CHAR";
WM_CHARTOITEM: Result := "WM_CHARTOITEM";
WM_CLOSE: Result := "WM_CLOSE";
WM_COMMAND: Result := "WM_COMMAND";
WM_CREATE: Result := "WM_CREATE";
WM_CTLCOLORBTN: Result := "WM_CTLCOLORBTN";
WM_CTLCOLOREDIT: Result := "WM_CTLCOLOREDIT";
WM_CTLCOLORLISTBOX: Result := "WM_CTLCOLORLISTBOX";
WM_CTLCOLORSCROLLBAR: Result := "WM_CTLCOLORSCROLLBAR";
WM_CTLCOLORSTATIC: Result := "WM_CTLCOLORSTATIC";
WM_DELETEITEM: Result := "WM_DELETEITEM";
...............
else
Result := Format("UNKNOWN_%.8x", [MsgID]);
end;
end;
Diamond Cat (2003-01-22 00:42:00) [4]берешь messages.pas и пишешь к нему функции
| |
