Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.19;
Скачать: CL | DM;

Вниз

Возможно ли (вернее как это сделать) программно сделать скриншот   Найти похожие ветки 

 
Не скажу кто   (2003-05-05 08:34) [0]

Возможно ли (вернее как это сделать) программно сделать скриншот и сохранить его в BMP.


 
Babay ©   (2003-05-05 09:16) [1]

Примеры по дельфи в паке help


 
Кот Бегемот ©   (2003-05-05 09:43) [2]

Можно,но НЕ СКАЖУ КАК :)))


 
default ©   (2003-05-05 12:37) [3]

function ImageDesktopToBMP: TBitmap;
var
DtDC: HDC;
begin

Result := TBitmap.Create;
Result.Width := Screen.Width;
Result.Height := Screen.Height;
DtDC := GetDC(0);
BitBlt(Result.Canvas.Handle, 0, 0, Result.Width,
Result.Height, DtDC, 0, 0, SRCCOPY);
ReleaseDC(0, DtDC)

end;


 
viman   (2003-05-05 15:24) [4]

var bmp: TBitmap;
jpg: TJPEGImage;
begin
try
bmp := Screen.ActiveForm.GetFormImage;
jpg := TJPEGImage.Create;
jpg.CompressionQuality := 65;
jpg.Assign(bmp);
jpg.SaveToFile(fn+".jpg");
freeAndNil(jpg);
FreeAndNil(bmp);
except on EAccessViolation do ;
end;




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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
14-59884
alxx
2003-04-29 09:59
2003.05.19
Печать ActiveX контролов в Access e


3-59595
AlexGof
2003-04-28 12:51
2003.05.19
Проблемы с уровнем изоляции в MS SQL !


1-59703
Суперчайник
2003-05-08 01:51
2003.05.19
Проблема со строками


3-59547
Шапранов Сергей Николаевич
2003-04-25 15:13
2003.05.19
Table is full


3-59624
Remis
2003-04-29 01:37
2003.05.19
SQL добавлание записи