![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как заблокировать Print Screen ? [D5]
boban © (2004-10-27 19:00:00)Как из приложения заблокировать клавишу "Print Screen", чтобы пользователь не мог снять копию экрана в буфер обмена ?
Заранее благодарю
Anatoly Podgoretsky (2004-10-31 13:36:00) [1]Те кто очень хочет скопировать применяют специальные программы, которые работают без этой клавише и буфера обмена.
cerber1 (2004-10-31 13:27:00) [2]А можно через Lockmemory с указателем на clipboard.
Boban (2004-10-28 16:19:00) [3]Удалено модератором
Boban (2004-10-28 16:18:00) [4]Нашел в FAQ, может кому интересно:
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;
Rex Well (2004-10-27 19:34:00) [5]Hook
Отлавливаешь сообщение нажатия кнопки, распознаешь эту кнопку - Prt Scr и сводишь состав сообщения на нет. Например, меняешь код клавиши, скажем на Pause Break или End, или еще какую-нить неиспользуемую клавишу...
Это как один из вариантов... А там смотри сам.