Текущий архив: 2003.03.31;
Скачать: CL | DM;

Вниз

Не получается воспризвести в статусбаре графику   Найти похожие ветки 

← →
Darts   (2003-01-31 15:10) [0]

Сам статусбар создается, работает без проблем. Не получается только вывести графику в нижеприведенном куске кода. Графика находится в ресурсном файле. Данный файл смотрел просмотрщиком - картинка там, все ОК. Бьюсь второй день, в чем проблема?


hBmp := LoadBitmap(HInstance, "ID_BITMAP1");
SendMessage(HWndSB, SB_SETTEXT, 2 or SBT_OWNERDRAW, Longint @hBmp));
DeleteObject(hBmp);


Вот полный код. Все ненужное выброшено.

function WindowProc(Window: HWnd; AMessage, WParam,
LParam: Longint): Longint; stdcall; export;
var
aWidths: array[0..3] of Longint;
hBmp: HBitmap;
begin

WindowProc := 0;

case AMessage of
wm_Create:
begin
// Create StatusBar
HWndSB := CreateStatusWindow(WS_CHILD or WS_VISIBLE or WS_BORDER or SBARS_SIZEGRIP,
"

---

← →
Nick_N_A ©   (2003-02-01 07:15) [1]

VCL:У статус бара есть Style OwnerDraw, там в OnDrawPanel
отлично можно нарисовать какой хочешь, можно и через апи,
но сначало неплохо былобы обьяснить ему, что рисовать будешь ты,
ниаче рисовать будете вместе, а приоритет у него выше . . .

---

Страницы: 1 вся ветка

Текущий архив: 2003.03.31;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.01 c