Как глобально перехватить нажатие кнопки PrintScreen?

Delphi , ОС и Железо , Клавиши

Как глобально перехватить нажатие кнопки PrintScreen?

В примере для глобального перехвата нажатия клавиши print screen регистрируется горячая клавиша (hot key).

Code:

type 

                      TForm1 = class(TForm) 

                        procedure FormCreate(Sender: TObject); 

                        procedure FormDestroy(Sender: TObject); 

                      private 

                        { Private declarations } 

                        procedure WMHotKey(var Msg : TWMHotKey); message WM_HOTKEY; 

                      public 

                        { Public declarations } 

                      end; 

         

                    var 

                      Form1: TForm1; 

         

                    implementation 

         

                    {$R *.DFM} 

         

                    const id_SnapShot = 101; 

         

                    procedure TForm1.WMHotKey (var Msg : TWMHotKey); 

                    begin 

                      if Msg.HotKey = id_SnapShot then 

                        ShowMessage('GotIt'); 

                    end; 

         

                    procedure TForm1.FormCreate(Sender: TObject); 

                    begin 

                      RegisterHotKey(Form1.Handle, 

                                     id_SnapShot, 

                                     0, 

                                     VK_SNAPSHOT); 

                    end; 

         

                    procedure TForm1.FormDestroy(Sender: TObject); 

                    begin 

                      UnRegisterHotKey (Form1.Handle,  id_SnapShot); 

                    end;

Статья Как глобально перехватить нажатие кнопки PrintScreen? раздела ОС и Железо Клавиши может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

:: 2011-08-24 15:05:31 :: re:Как глобально перехватить нажатие кнопки PrintScreen?

пользователь: miro.

Перехватить то перехватывает, но вот если я создам объект image и загружу в него то, что якобы отскриншотило (заменяем showmessage), то ничего не вставится, т.е. сама функция кнопки разрушается. Что делать тогда как быть?

:: 2011-10-12 21:13:45 :: re:Как глобально перехватить нажатие кнопки PrintScreen?

пользователь: kan.

В данном примере на кнопку PrintScreen вешается вызов ShowMessage('GotIt'); а не копирование экрана.

Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.

:: Главная :: Клавиши ::

24.04.2024 15:56:32/0.0067930221557617/0