Текущий архив: 2003.11.03;
Скачать: CL | DM;
Вниз
Как можно создать HBITMAP одного цвета??? Найти похожие ветки
← →
helper (2003-08-30 14:49) [0]Используя только API функции!!!!
← →
Dmk © (2003-08-30 15:14) [1]type DBufferType = record
dbWidth: DWord;
dbHeight: DWord;
dbBpp: DWord;
dbMemDC: HDC;
dbMemEntry: pointer;
dbLinearAddr: DWord;
dbBitmap: hBitmap;
dbOldBitmap: hBitmap;
end;
Type PBMInfo =^TBMInfo;
TBMInfo = record
bmiHeader: TBitmapInfoHeader;
case Boolean of
True: (bmiColors:TFColorTable);
False: (r,g,b:Longint);
end;
Function InitCustomDBuffer(IWidth, IHeight:Integer; IBpp:Integer; var BufInfo:TBmInfo):DBufferType;
var
DIB_colors: Integer;
DBufferSize: DWord;
NumPlanes: DWord;
begin
//
← →
Dmk © (2003-08-30 15:16) [2]У меня это глобальная переменная
ResRec: DBufferType;
← →
helper (2003-08-30 17:05) [3]Спасибо но, sorry. Этот код не дорабртан и занимает слишком много места. Этуже процедуру можно сделать и с 5 командоми!!!
← →
Dmk © (2003-08-30 20:46) [4]Прошу указать на недоработку
Страницы: 1 вся ветка
Текущий архив: 2003.11.03;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.03 c
