Форум: "WinAPI";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];
ВнизЭмуляция нажатия клавиши Найти похожие ветки
← →
Shadow (2002-03-08 13:58) [0]Как эмулировать нажатие клавиши Print Screen
← →
Song (2002-03-08 14:42) [1]По поиску точно штук пять таких вопросов найдёшь.
1. Самой эмуляцией нажатия клавиши:
keybd_event(VK_SNAPSHOT, 0, 0, 0);
keybd_event(VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0)
2. Программной реализацией захвата экрана:
Screen.Cursor:=CrHourGlass;
DeskTopCanvas:=TCanvas.Create;
BitMap:=TBitMap.Create;
try
DeskTopCanvas.Handle:=GetDC(HWND_DeskTop);
Rect:=Bounds(0,0,Screen.Width,Screen.Height);
With BitMap Do
Begin
Height:=Screen.Height;
Width:=Screen.Width;
Canvas.CopyRect(Rect,DeskTopCanvas,Rect);
SaveToFile("\screenshot.bmp"); // В файл
ClipBoard.Assign(BitMap); // В буфер обмена
End;
ReleaseDC(DeskTopCanvas.Handle,HWND_DeskTop);
finally
BitMap.Free;
DeskTopCanvas.Free;
end;
← →
Song (2002-03-08 14:43) [2]из второго убери Screen.Cursor.. случайно зацепил при копировании из своей программы
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c