Список оконных сообщений.

[min@y™]

Ребят, у кого есть функция, на входе - DWORD, на выходе строка с именем константы оконного сообщения или список сообщений, поделитесь, а то самому составлять лениво.

Для примера:

  Вход (DWORD) <--- $0011;
  Выход (string) ---> 'WM_QUERYENDSESSION'

  Вход (DWORD) <--- $00A4;
  Выход (string) ---> 'WM_NCRBUTTONDOWN'

  Вход (DWORD) <--- $0100;
  Выход (string) ---> 'WM_KEYDOWN'

[Stilet]

А если открыть messages.pas в Делфи или аналогичный в VS и там подсмотреть список? или нужна именно програмка?

[Аватар]

Тут по-моему удобней взять и в массив загнать, все ли не проверял

[waleri]

Здесь нет сообщений к разным компонентам, типа комбобокс, листбокс, кнопка...

[min@y™]

А если открыть messages.pas в Делфи

Там нету списка. Там просто определяются константы. Типа, вот копипаст оттуда:

  {$EXTERNALSYM WM_MOUSEFIRST}
  WM_MOUSEFIRST       = $0200;
  {$EXTERNALSYM WM_MOUSEMOVE}
  WM_MOUSEMOVE        = $0200;
  {$EXTERNALSYM WM_LBUTTONDOWN}
  WM_LBUTTONDOWN      = $0201;
  {$EXTERNALSYM WM_LBUTTONUP}
  WM_LBUTTONUP        = $0202;
  {$EXTERNALSYM WM_LBUTTONDBLCLK}
  WM_LBUTTONDBLCLK    = $0203;
  {$EXTERNALSYM WM_RBUTTONDOWN}
  WM_RBUTTONDOWN      = $0204;
  {$EXTERNALSYM WM_RBUTTONUP}
  WM_RBUTTONUP        = $0205;
  {$EXTERNALSYM WM_RBUTTONDBLCLK}
  WM_RBUTTONDBLCLK    = $0206;
  {$EXTERNALSYM WM_MBUTTONDOWN}
  WM_MBUTTONDOWN      = $0207;
  {$EXTERNALSYM WM_MBUTTONUP}
  WM_MBUTTONUP        = $0208;
  {$EXTERNALSYM WM_MBUTTONDBLCLK}
  WM_MBUTTONDBLCLK    = $0209;
  {$EXTERNALSYM WM_MOUSEWHEEL}
  WM_MOUSEWHEEL       = $020A;

А мне наоборот надо, по номеру - имя константы.
Конечно, можно составить таблицу, но я спрашиваю, где её можно уже взять готовую, чтоб не тратить время на написание уже написанного.

[Stilet]

Я бы не парился, бы. Загнал бы то содержимое в Экзел, и превратил бы в табличку. Пять мин делов... Конкретно в таком, как ты хочешь виде я не знаю источника.

[min@y™]

Загнал бы то содержимое в Экзел, и превратил бы в табличку.

Этим щас и занимаюсь. 5-ю минутами и не пахнет.

Ладно, поднапрягся чутка.
Начало есть. Добавьте, кто сколько может.

[Stilet]

Я за минуту сделал.
показать что получилось?

Прикрепил вложением. Оно?

[zvygin1964]

Ой извиняюсь. Не туда нажал в репутации. Исправлюсь...

[min@y™]

Прикрепил вложением. Оно?

Ну, не совсем.
Посмотри моё вложение выше.
Мне б типа вот так оформить. Разными списками, а то некоторые константы совпадают, что для поиска неприемлемо.