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

Вниз

Скриншот десктопа   Найти похожие ветки 

 
Velocity   (2002-01-25 22:33) [0]

Знаю, тема старая, но! Надо бы тоже самое но без использования TBitmap.Canvas, т.е. чисто апишными ф-циями. Пишу такое...

DC:HDC;
BitMap:HBITMAP;

DC:=GetWindowDC(GetDesktopWindow);
BitMap:=CreateCompatibleBitmap(DC,GetSystemMetrics(SM_CYSCREEN),
GetSystemMetrics(SM_CXSCREEN));
BitBlt(BitMap,0,0,GetSystemMetrics(SM_CXSCREEN),GetSystemMetrics(SM_CYSCREEN),DC,0,0,SRCCOPY);
ReleaseDC(GetDesktopWindow,DC);

...и понять не могу - то ли правильным путем иду, то ли нет... в общем если все же грамотно сохранил скриншот десктопа (?), есть его хэндл - как теперь всю эту бяку в файл запихнуть? или куда-нить в память?


 
Velocity   (2002-01-28 06:42) [1]

Что, никто не знает? Хммм...


 
MrAngel ©   (2002-01-28 16:51) [2]

Так есть совет. Правда здесь будет задействован класс TBITMAP/
Замени эту строку:
BitBlt(BitMap,0,0,GetSystemMetrics(SM_CXSCREEN),GetSystemMetrics(SM_CYSCREEN),DC,0,0,SRCCOPY);

на
var BitMap:TBitmap; //а это дело сначало создай

BitBlt(BitMap.Canvas.Handle,0,0,GetSystemMetrics(SM_CXSCREEN),GetSystemMetrics(SM_CYSCREEN),DC,0,0,SRCCOPY);

Потом удали вот это:

BitMap:=CreateCompatibleBitmap(DC,GetSystemMetrics(SM_CYSCREEN),
GetSystemMetrics(SM_CXSCREEN));





 
serjant   (2002-01-28 17:11) [3]

Функция keyb_event(vk_snapshot,1,0,0).1-фотографируем окно, 0-фотографируем десктоп.После ее вызова картинка у тебя в буфере.
Я такую прогу недавно писал, если заинтересуют подробности- пиши.



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
1-90816
Ольга
2002-03-13 13:33
2002.03.28
pascal


1-90917
alex1111
2002-03-18 15:43
2002.03.28
Unicode


3-90799
KHunter
2002-03-04 15:57
2002.03.28
EhLib


14-91055
nikulin
2002-02-13 13:47
2002.03.28
Кто либо сдавал на MCSD?


1-90951
d_oleg
2002-03-14 10:54
2002.03.28
Font pitch