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

Вниз

Эмуляция нажатия клавиши   Найти похожие ветки 

 
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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.011 c
1-26072
Magic
2002-04-26 10:53
2002.05.09
Формат файлов


3-25991
Yuraz
2002-04-15 15:46
2002.05.09
2 вопроса, 1) как проверить на компе есть ли ADO библ.


3-26029
a_k
2002-04-16 16:31
2002.05.09
Проблемы с фильтром.


14-26227
McSimm
2002-04-01 11:30
2002.05.09
Встреча в чате. Сайт приобретает широкую известность


1-26065
VS2001
2002-04-18 18:15
2002.05.09
Как высчитать интервал прошедшего времени в минутах