Скачать: CL | DM;

Мужики, как скаптурить произвольный прямоугольник текущего экрана   Найти похожие ветки 

← →
bobo   (2003-12-25 10:36) [0]

Мужики, как скаптурить произвольный прямоугольник текущего экрана

---

← →
Polevi ©   (2003-12-25 16:29) [1]

BitBlt

---

← →
shluz ©   (2003-12-26 00:08) [2]

ar
hdcScreen,hdcCompatible:HDC;
hbmScreen: Hbitmap;
begin
hdcScreen := GetDC(0);
hdcCompatible := CreateCompatibleDC(hdcScreen);
hbmScreen:= CreateCompatibleBitmap(hdcScreen,
GetDeviceCaps(hdcScreen, HORZRES),

GetDeviceCaps(hdcScreen, VERTRES));
if SelectObject(hdcCompatible, hbmScreen)<>0 then
showmessage("Compatible Bitmap Selection");

if not BitBlt(hdcCompatible ,
0,0,
200, 300,
hdcScreen,
0,0,
SRCCOPY) then

showmessage("Screen to Compat Blt Failed");
ShowWindow(handle, SW_SHOW);
image1.Canvas.Handle:=hdcCompatible;

пример MSDK

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c