Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.06.28;
Скачать: CL | DM;

Вниз

HBITMAP, Размеры   Найти похожие ветки 

 
R1ka ©   (2008-05-31 23:47) [0]

Как узнать размеры (Высота, длина) HBITMAP"a, загруженного таким образом:


var
  myBitmap:       HBITMAP;
...
  myBitmap := LoadBitmap(hInstance, "IDB_REDCIRCLE");


 
Игорь Шевченко ©   (2008-06-01 00:57) [1]

GetBitmapDimensionEx, например


 
Фунтик ©   (2008-06-01 01:07) [2]

Эта штука работает только если перед ее вызовом установлены размеры функцией SetBitmapDimensionEx, в противном случае - возвращает нули (проверял)


 
Renegat   (2008-06-01 10:49) [3]

Боюсь уже отвечать на етот форум... =) Тем не менее рискну:

function getBitmapSize(B: HBITMAP):SIZE;
var buf : BITMAP;
begin
 FillChar(buf, SizeOf(BITMAP), 0);
 GetObject(B, SizeOf(BITMAP), @buf);
 result.cx:=buf.bmWidth;
 result.cy:=buf.bmHeight;
end;


 
R1ka ©   (2008-06-01 17:38) [4]

похабно как-то, неужели нет решения культурнее?


 
Renegat   (2008-06-01 20:34) [5]

Культурнее - это как? С помощью ВЦЛ и иже с ним? Естессно можно, только намного медленнее. Спрашивалось же про HBITMAP - я и подумал, что требуется WinAPI...
PS: А в чём заключаетсо "похабность"? =)


 
R1ka ©   (2008-06-01 20:42) [6]

как я понимаю - тут создается "болванка" для битмапа со всеми заголовками и внее впихивается картинка моя, потом уже из этой болванки считывается размер?


 
Игорь Шевченко ©   (2008-06-01 22:58) [7]


> как я понимаю - тут создается "болванка" для битмапа со
> всеми заголовками и внее впихивается картинка моя, потом
> уже из этой болванки считывается размер?


Нет, болванка не создается. Bitmap читается при LoadBitmap со всеми потрохами.


 
R1ka ©   (2008-06-02 00:48) [8]

Renegat, Игорь Шевченко,
спасибо, разобрался вроде!



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
2-1241152560
Мистер Х
2009-05-01 08:36
2009.06.28
Как реализовать "Найи далее..."


2-1241585670
lewka
2009-05-06 08:54
2009.06.28
Работа с сылками в TWebBrowser


11-1203187601
andreil
2008-02-16 21:46
2009.06.28
Несовместомость Кнопок и Панелей


4-1211954383
TForumHelp
2008-05-28 09:59
2009.06.28
Навигация по MainMenu чужого приложения


3-1222945535
aykorolev
2008-10-02 15:05
2009.06.28
Разработка сетевой БД