В WM_DRAWITEM

← →
anod (2002-08-10 23:31) [0]

в lparam приходит структура TDRAWITEMSTRUCT, подскажите как мне её обработать (присвоить переменной), да и написанно, что нужно возвратить значение true, как это реализовать?

← →
Юрий Зотов (2002-08-11 13:23) [1]

Уточните, о чем идет речь. Это обработка WM_DRAWITEM или что-то другое?

← →
Юрий Зотов (2002-08-11 13:31) [2]

Sorry, невнимательно прочитал вопрос. Исправляюсь.

var
DIS: TDrawItemStruct;
begin
DIS := PDrawItemStruct(Message.LParam)^;
...
Message.Result := Integer(True)
end;

← →
anod (2002-08-11 14:00) [3]

Огромнейшее спасибо.
Я как только не извращался с этим

← →
anod (2002-08-11 18:28) [4]

Я думал, что в DRAWITEMSTRUCT можно определить когда кнопка (именно её я перерисовываю) нажата или над ней мышь, если да то кинте примерчик, а то я с С никак не могу перевести в Паскаль.

← →
Юрий Зотов (2002-08-11 23:49) [5]

Какой пример нужен - на чистом API или для TButton?

А еще проще - давайте сюда Ваш пример на С, народ моментом переведет...

← →
anod (2002-08-12 03:52) [6]

Я врубился как для нажатой кнопки прорисовывать, а если мышь находится над кнопкой (onMouseMove), то WM_DrawItem здесь не подходит...
IDC_MENU: case dis.itemAction of ODA_SELECT:if (ODS_SELECTED and dis.itemState)<>0 then begin c.X:=90; c.Y:=32; end; else c.X:=90; c.Y:=0; end; StretchBlt(dis.hDC, dis.rcItem.left, dis.rcItem.top, dis.rcItem.right-dis.rcItem.left, dis.rcItem.bottom - dis.rcItem.top, cbDC, c.X, c.Y,15,15, SRCCOPY);

В WM_DRAWITEM Найти похожие ветки