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

Rак сохранить изображение целой формы   Найти похожие ветки 

← →
Zed ©   (2003-08-20 09:45) [0]

Подскажите как сохранить изображение целой формы

я делаю следующее

bmp := Screen.ActiveForm.GetFormImage;

но в файле получается только клиентская часть всей формы
без заголовка и меню

---

← →
Amoeba   (2003-08-20 11:01) [1]

Все очень просто. Лелай так и бутет тебе счастье:

...
var
Bmp: TBitmap;
DC: HDC;

...

Bmp := TBitmap.Create;
with Form do
begin
Bmp.Height := Height;
Bmp.Width := Width;
DC := GetWindowDC(Handle); //Дескpиптоp окна
try
bitblt(Bmp.Canvas.Handle, 0, 0, Width, Height, DC, 0, 0, SrcCopy);
finally
ReleaseDC(Handle, DC);
end;
end;

---

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

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



Память: 0.44 MB
Время: 0.017 c