Handle груженый из bmp =! 24 bit?

[Alex Cones]

X_X А нельзя хотя бы намекнуть, где она? Там текста книг на 8.

[Alex Cones]

Так, функу не нашел.

Научился пользоваться Get\SetPixel но, похоже, это достаточно медленный вариант, чтобы на нем что-то делать. Прочел, что BitBlt быстрее, похоже, придется разбираться с ним.

[Пепел Феникса]

можно создать битмап 24 битный и банально наш 32 битник нарисовать на нем)

а насчет 32-битов, то там будет PRGBQuad

[Alex Cones]

а насчет 32-битов, то там будет PRGBQuad

При вызове вылезает та же ошибка, что и в #9. Причем смотря через отладчик вижу, что в свойствах BMP вылазиет какая-то фигня, типа planes = 65535

Procedure FVFL_Brightness32(Handle: HBITMAP; Value : Integer); StdCall;
{ Brightness value : 0 = -255, 255 = 0, 512 = +255 }
{ 0 ---------------- <- 255 -> --------------- 512 }
Var
 X, Y: Integer;
 BMP: BITMAP;
 P1, P2: PRGBQuad;
Begin
 Windows.GetObject(Handle, SizeOf(Bmp), @BMP);
 P1 := BMP.bmBits;
 If BMP.bmBitsPixel = 32 Then
      For Y := 0 To BMP.bmHeight - 1 Do
            Begin
             P2 := P1;
             For X := 0 To BMP.bmWidth - 1 Do
                  Begin
                   If Value < 255 Then
                    Begin
                     P2.rgbRed   := Sub(P2.rgbRed, 255 - Value);
                     P2.rgbGreen := Sub(P2.rgbGreen, 255 - Value);
                     P2.rgbBlue  := Sub(P2.rgbBlue, 255 - Value);
                    End
                   Else
                    Begin
                     P2.rgbRed   := Add(P2.rgbRed, Value - 255);
                     P2.rgbGreen := Add(P2.rgbGreen, Value - 255);
                     P2.rgbBlue  := Add(P2.rgbBlue, Value - 255);
                    End;
                   Inc(P2);
                  End;
             Pointer(P1) := Pointer(Integer(P1) + BMP.bmWidthBytes);
            End
 Else
  MessageBox(0, 'Library error - 0x01', 'Error', MB_OK);
End;

можно создать битмап 24 битный и банально наш 32 битник нарисовать на нем)

Як?

[Ulex]

Неожиданный вопрос спрошу (может не в тему).
Рабочий стол ->Свойства->Параметры - Качество цветопередачи у вас 32 бита равно или 16? Попробуйте поменять. И посмотрите, меняется bmBitsPixel или нет.

[Alex Cones]

32. Не меняется.

Дык як все же 24 битный Hbitmap создать?

[Ulex]

А чего, CreateBitmap не нравится?

HBITMAP CreateBitmap(

int nWidth, // bitmap width, in pixels
int nHeight, // bitmap height, in pixels
UINT cPlanes, // number of color planes used by device
UINT cBitsPerPel, // number of bits required to identify a color
CONST VOID *lpvBits // pointer to array containing color data
);

[Alex Cones]

Меня смущает последний пункт - если я собрался пустой создать, то куды мне тогда указатель направлять?

[Ulex]

lpvBits

Points to an array of color data used to set the colors in a rectangle of pixels. Each scan line in the rectangle must be word aligned (scan lines that are not word aligned must be padded with zeros). If this parameter is NULL, the new bitmap is undefined.

Т.е вроде в никуда (нулём его).

Вот так я пустой битмап делал на WinApi:

invoke	CreateBitmap, [MainLevel.SizeFieldX], [MainLevel.SizeFieldY], 1, [colorBit], 00h
mov	[hBitmapAll], eax

[Alex Cones]

Благодарю, пойду практиковаться.