Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2003.03.31;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "WinAPI";
Текущий архив: 2003.03.31;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.006 c
14-100372
DenKop
2003-03-12 22:11
2003.03.31
Или я один такой или у меня сильно устаревшие во взлядах родители


4-100503
sniper
2003-01-31 15:18
2003.03.31
Помогите с дискетой!


14-100462
Шоломицкий
2003-03-14 21:44
2003.03.31
Взлллом pokazuha.ru


3-100151
neXt
2003-03-12 16:57
2003.03.31
Timeout BDE


3-100170
Pascalich
2003-03-13 09:33
2003.03.31
Редактирование результатов SQL запроса





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский