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;

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