HBITMAP => DRAW

[Alex Cones]

Люди, умоляю, объясните по-человечески!
Нахожу только разрозненную информацию и уже получил кашу в голове.

Я хочу научиться загружать файл (bmp) в HBITMAP ( http://msdn.microsoft.com/en-us/libr...45(VS.85).aspx ) и рисовать его на форме.

Просьба объяснить каждый шаг и его значение. Я самоучка.

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

вот примерчик

var H:HBITMAP;
    bm:BITMAP;//в принципе можно было локальной сделать.

procedure TForm1.FormCreate(Sender: TObject);
begin
 H:=LoadImage(GetModuleHandle(nil),'D:\coding\delphi\1.bmp',IMAGE_BITMAP,0,0,LR_LOADFROMFILE);//грузим битмап
 if H=0 then ShowMessage(IntToStr(GetLastError()));//проверка
end;

procedure TForm1.FormPaint(Sender: TObject);
var M,DC:HDC;
begin
 DC:=GetDC(Handle);//берем контекст формы
 M:=CreateCompatibleDC(DC);//создаем временный контекст
 SelectObject(M,H);//применяем к нему наш битмап
 GetObject(H,sizeof(BITMAP),@bm);//берем данные битмапа
 BitBlt(DC,1,1,bm.bmWidth,bm.bmHeight,M,0,0,SRCCOPY);//рисуем битмап на контексте формы(используя ширину и высоту)
 DeleteDC(M);//стираем временный контекст
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
 DeleteObject(H);//стираем наш битмап.
end;

не самый идеальный, но вполне рабочий

[Alex Cones]

 bm:BITMAP;

Это случаем не TBitMap?

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

нет, это структура из windows.pas

[Stilet]

Нет. TBitMap - это класс, а BITMAP это:

The BITMAP structure defines the type, width, height, color format, and bit values of a bitmap.

typedef struct tagBITMAP { // bm
LONG bmType;
LONG bmWidth;
LONG bmHeight;
LONG bmWidthBytes;
WORD bmPlanes;
WORD bmBitsPixel;
LPVOID bmBits;
} BITMAP;

[Alex Cones]

LPVOID

Что это есть? Я не силен в Сипп.

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

{ Bitmap Header Definition }
  PBitmap = ^TBitmap;
  {$EXTERNALSYM tagBITMAP}
  tagBITMAP = packed record
    bmType: Longint;
    bmWidth: Longint;
    bmHeight: Longint;
    bmWidthBytes: Longint;
    bmPlanes: Word;
    bmBitsPixel: Word;
    bmBits: Pointer;
  end;
  TBitmap = tagBITMAP;
  {$EXTERNALSYM BITMAP}
  BITMAP = tagBITMAP;

я же сказал откуда она.

[Alex Cones]

Благодарю, буду расшифровывать суть действий.

Вот, кстати, нашел еще один способ рисования, он глобально отличается?

SendMessage(Handle , STM_SETIMAGE, IMAGE_BITMAP, BIT {HBITMAP});

Возник такой вопрос: а как изменять изображение от HBITMAP`а?
Знаю, что get и setpixel, но где в коде выше (пост 2) их вставлять?

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

Вот, кстати, нашел еще один способ рисования, он глобально отличается?

это установка изображения компоненту, но я бы сказал, не совсем все таки рисование.

после SelectObject и до DeleteDC
используем временный контекст(M)

[mutabor]

Тебе нужно слегка мелкомягкую теорию проштудировать, чтобы каша рассосалась. Контекст устройства и все что с ним связано, как с ним работать, виды битмапов (DDB, DIB). А то что ты плюсами обозвал, это вроде как типы принятые в Windows, они непосредственно к С++ отношения не имеют. Короче нужно сделать шаг на одну ступеньку вниз по лестнице абстракции, и встать по колено в Windows API