Das Problem wird da eher vorm Bildschirm sitzen
Ach ja?
Dann sag mir doch mal bitte welchen Einfluss ich auf CreateDIBSection nehmen kann
wenn ich nur 131071 Pixel zurück geiefert bekomme?
Bekomme ich mehr gebe ich dir recht .. andernfalls na ja du weist schon
Code? OK!
Delphi-Quellcode:
begin
hRetBmp := 0;
if hBmp <> 0 then
begin
hBufferDC := CreateCompatibleDC(0);
if hBufferDC <> 0 then
begin
hTmpBitmap := 0;
if hBmpDC <> 0 then
if (hBmp = GetCurrentObject(hBmpDC, OBJ_BITMAP)) then
begin
hTmpBitmap := CreateBitmap(1, 1, 1, 1, nil);
SelectObject(hBmpDC, hTmpBitmap);
end;
hPrevBufObject := SelectObject(hBufferDC, hBmp);
hDirectDC := CreateCompatibleDC(0);
if hDirectDC <> 0 then
begin
GetObject(hBmp, sizeof(bm), @bm);
ZeroMemory(@bmInfo, sizeof(BITMAPINFO));
bmInfo.bmiHeader.biSize := sizeof(bmInfo.bmiHeader);
bmInfo.bmiHeader.biWidth := bm.bmWidth;
bmInfo.bmiHeader.biHeight := bm.bmHeight;
bmInfo.bmiHeader.biPlanes := 1;
bmInfo.bmiHeader.biBitCount := 32;
hDirectBitmap := CreateDIBSection(hDirectDC, bmInfo, DIB_RGB_COLORS, Pointer(Pixels), 0, 0);
if hDirectBitmap <> 0 then
gruss