Delphi. Трюки и эффекты

Сообщения, поддерживаемые программой

const

mess_first = 0;

mess_last = 15;

var

messages_list: array [mess_first..mess_last] of MessageInfo =

(

(value: WM_DESTROY; name: \'WM_DESTROY\ used: False),

(value: WM_MOVE; name: \'WM_MOVE\ used: False),

(value: WM_SIZE; name: \'WM_SIZE\ used: False),

(value: WM_ACTIVATE; name: \'WM_ACTIVATE\ used: False),

(value: WM_SETFOCUS; name: \'WM_SETFOCUS\ used: False),

(value: WM_KILLFOCUS; name: \'WM_KILLFOCUS\ used: False),

(value: WM_ENABLE; name: \'WM_ENABLE\ used: False),

(value: WM_SETTEXT; name: \'WM_SETTEXT\ used: False),

(value: WM_GETTEXT; name: \'WM_GETTEXT\ used: False),

(value: WM_PAINT; name: \'WM_PAINT\ used: False),

(value: WM_CLOSE; name: \'WM_CLOSE\ used: False),

(value: WM_QUIT; name: \'WM_QUIT\ used: False),

(value: WM_SIZING; name: \'WM_SIZING\ used: False),

(value: WM_MOVING; name: \'WM_MOVING\ used: False),

(value: WM_NOTIFY; name: \'WM_NOTIFY\ used: False),

(value: WM_NCHITTEST; name: \'WM_NCHITTEST\ used: False)

);