ToolBar, StatusBar - Как изменить BackColor?

[XPraptor]

Господа, задумался тут над интерфейсом и понял, что не могу простым способом, нежели как через замену цвета через CreateCompatibleDC и CreateCompatibleBitmap и т.д. в памяти, перекрасить BackColor указанных в сабже элементов.
Может кто-нить подскажет более простой способ изменить цвета у этих контролов.
Заранее премного благодарен.

[BOO]

Я бы тебе советовал не лезть во всякие API мучить голову ради небольшой коемки объекта.
Я советую использовать не стандартны их и на vbstreests довига

[XPraptor]

Ни одного нормального не нашел в не стандартных. Но уже тема закрыта, плюнул на все и свой тулбар написал, а статус научили SendMessagami красить.

[sanches]

а статус научили SendMessagami красить.

ну так просвяти неграмотным (мне, например)...

[XPraptor]

Код: Выделить всё

Public Const WM_USER As Long = &H400
Public Const PBM_SETBARCOLOR As Long = (WM_USER + 9)
Public Const SB_SETBKCOLOR As Long = &H2001
'
' Меняем цвет ползунка у прогресс-бара:
Call SendMessage(ProgressBar1.Hwnd, PBM_SETBARCOLOR, 0&, ByVal &HFF8080)
' Меняем фоновый цвет у статус-бара:
Call SendMessage(StatusBar1.Hwnd, SB_SETBKCOLOR, 0&, ByVal &HFFFF00)