Как быстрее всего зделать скриншорт

← →
Чайник Д (2003-10-25 23:06) [0]

Как быстрее всего зделать скриншорт.Знаю есть такое BitBLT, но как с ним работать? Буду очень благодарен.

← →
wicked © (2003-10-25 23:15) [1]

var bitmap: TBitmap; dc: HDC; w, h: integer; begin try bitmap := TBitmap.Create; w := GetSystemMetrics(SM_CXSCREEN); // ширина экрана h := GetSystemMetrics(SM_CYSCREEN); // высота экрана bitmap.Width := w; bitmap.Height := h; dc := GetDC(0); BitBlt(bitmap.Canvas.Handle, 0, 0, w, h, dc, 0, 0, SRCCOPY); .... { сохраняем скриншот } .... finally if dc <> 0 then ReleaseDC(0, dc); bitmap.Free; end; end;

← →
Чайник Д (2003-10-25 23:22) [2]

Спасибо

Как быстрее всего зделать скриншорт Найти похожие ветки