Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.44 MB
Время: 0.006 c
3-100177
АндрейБ
2003-03-12 22:46
2003.03.31
Резервная копия


1-100241
S
2003-03-18 15:55
2003.03.31
Вопрос на засыпку!!!!!!!


1-100230
hawkins
2003-03-20 10:33
2003.03.31
Как сделать обработчик события OnMouseMove у компонента QuickRep?


1-100244
Vlad Oshin
2003-03-18 16:25
2003.03.31
Как получить цветовые составляющие произвольной точки.


14-100388
BERK
2003-03-12 20:24
2003.03.31
Есть RX (или аналогичные по классу компоненты) под CBuilder6?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский