| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Работа с экраном [D4, Win95/98]

Нестеров Игорь ©   (2002-12-14 13:00:00) 

Как можно скопировать изображение с экрана (скажем в буфер обмена), не используя при этом Print Scrn?

---

Rouse_   (2002-12-14 13:43:00) [1]

winHWND: HWND;
winDC: HDC;
Rect: TRect;
fBitmap:TBitmap;
begin
winHWND := GetDesktopWindow();
winDC := GetDC(winHWND);
fBitmap:=TBitmap.Create;
GetWindowRect(winHWND, rect);
fBitmap.width := rect.right-rect.left;
fBitmap.height := rect.bottom-rect.top;
fBitmap.PixelFormat := pf32bit;
BitBlt(fBitmap.canvas.handle, 0, 0, fBitmap.width,
fBitmap.height, winDC, 0, 0, SRCCOPY);
ReleaseDC(winHWND, winDC);
//В битмапе теперь скриншот
fBitmap.Free;

Желаю успехов

---

KSergey   (2002-12-14 13:06:00) [2]

Desktop есть обычное окно с определенными предустановленными параметрами. найти его хендл -и вперед. Как - яндекс вам поможет (вопрос стандартный, в факах его часто освещают)

---

Наверх