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

Вниз

Как получить изображение раб стола???   Найти похожие ветки 

 
nikulin ©   (2003-02-14 12:11) [0]

Помогите пожалуйста!

Как получить изображение раб стола и сохранить его в файл?

Заранее благодарен!


 
MBo ©   (2003-02-14 12:31) [1]

свернуть окна, GetDC(0), BitBlt, ReleaseDc


 
Vint ©   (2003-02-14 12:33) [2]

примерно так:
var
FonCan: HDC;
Bitmap: TBitMap;


надо описать формат картинки, например:
Bitmap := TBitMap.Create;
Bitmap.PixelFormat := pf24bit;
Bitmap.Width := 800;
Bitmap.Height := 600;


Запоминаем:
FonCan := GetDC(0);
bitblt(Bitmap.Canvas.Handle, 0, 0, Sh, Sw,FonCan, SL, ST, SRCCOPY);
ReleaseDC(0, FonCan);

Сохраняем:
Bitm.SaveToFile("...bmp");

вроде все.


 
Vint ©   (2003-02-14 12:37) [3]

не Bitm.SaveToFile("...bmp"), а Bitmap.SaveToFile("...bmp"); поспешил...
ну и ... Bitmap.Free; в конце :)


 
Dms   (2003-02-14 13:47) [4]

Зачем только все окна то сворачивать ? GetDC(0) всегда выдает dc рабочего стола.


 
Vint ©   (2003-02-14 14:29) [5]

>Dms (14.02.03 13:47)
Нет,
GetDC(0) дает DC экрана - всего, с окнами, иконками и т.д., но можно указать любой Handle. Не помню, но помоему GetDC(GetDesktopWindow()) указывает на рабочий стол.




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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
1-75950
Grizin
2003-02-12 12:36
2003.02.24
Создание обработчика события из редактора компонента


3-75753
denis24
2003-02-05 16:41
2003.02.24
добавление записи


6-76055
Thomas Brandon
2003-01-05 14:44
2003.02.24
Дан вот такой заголовок TCP-пакета...


3-75825
andwcomm
2003-02-06 21:14
2003.02.24
Как из программы стартовать Interbase Server 6,7


3-75814
UnderSun
2003-02-05 00:27
2003.02.24
Проблемы с обновлением запроса из др потока (IB 6.5)