Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.04;
Скачать: 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 вся ветка

Текущий архив: 2003.09.04;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.017 c
14-10942
Dimedrol
2003-08-16 16:52
2003.09.04
Как PDF конвертнуть в TIFF ?


1-10742
Onward
2003-08-20 03:51
2003.09.04
Как узнать серийный номер CD средствами Delphi??


1-10799
Gena_R
2003-08-22 10:21
2003.09.04
dll


1-10815
Borealis
2003-08-18 20:21
2003.09.04
Что с иконками?, я не понимаю...


1-10820
sasami737
2003-08-12 00:39
2003.09.04
Установка компонентов