API(HDC, HBitmap)= картинка на экране

← →
Snap © (2003-08-19 13:19) [0]

как вывести картинку по хэндлу на контекст с помошъйю только АПИ?

← →
Игорь Шевченко © (2003-08-19 13:31) [1]

procedure MyDrawBitmap (ADC : HDC; ABitmap : HBITMAP; R : TRect);
var
MemDC : HDC;
begin
MemDC := CreateCompatibleDC (ADC);
try
SelectObject (MemDC, ABitmap);
BitBlt (ADC, R.left, R.top, R.right, R.bottom, MemDC, 0, 0, SRCCOPY);
finally
DeleteDC (MemDC);
end;
end;

← →
Крот © (2003-08-19 14:59) [2]

> Игорь Шевченко © (19.08.03 13:31) [1]

Маленькая поправочка

BitBlt(ADC, Rect.Left, Rect.Top,
Rect.Rigth - Rect.Left,
Rect.Bottom - Rect.Top, MemDC, 0, 0, SRCCPY);

← →
Игорь Шевченко © (2003-08-19 15:46) [3]

В случае произвольного прямоугольника - да, поправка безусловно принимается :)

В моем изначальном коде R был ClientRect"ом от окна, так что там Left и Top были равны 0 :) Не заметил, спасибо.

спасибо.
Если не трудно объясни ешё что конкретно делают функции CreateCompatibleDC и что именно означает SRCCOPY. (Это, так для понимания)

API(HDC, HBitmap)= картинка на экране - KAK? Найти похожие ветки