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

Вниз

Как заблокировать Print Screen ?   Найти похожие ветки 

 
boban   (2004-10-27 19:00) [0]

Как из приложения заблокировать клавишу "Print Screen", чтобы пользователь не мог снять копию экрана в буфер обмена ?

Заранее благодарю


 
Rex Well   (2004-10-27 19:34) [1]

Hook

Отлавливаешь сообщение нажатия кнопки, распознаешь эту кнопку - Prt Scr и сводишь состав сообщения на нет. Например, меняешь код клавиши, скажем на Pause Break или End, или еще какую-нить неиспользуемую клавишу...

Это как один из вариантов... А там смотри сам.


 
Boban   (2004-10-28 16:18) [2]

Нашел в 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;


 
Boban   (2004-10-28 16:19) [3]

Удалено модератором


 
cerber1 ©   (2004-10-31 13:27) [4]

А можно через Lockmemory с указателем на clipboard.


 
Anatoly Podgoretsky ©   (2004-10-31 13:36) [5]

Те кто очень хочет скопировать применяют специальные программы, которые работают без этой клавише и буфера обмена.



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

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

Наверх




Память: 0.48 MB
Время: 0.024 c
9-1092335172
Hasu
2004-08-12 22:26
2004.12.12
Какие директХ головки юзать?


14-1100695078
ms
2004-11-17 15:37
2004.12.12
Помогите разобраться с VC++ .NET...


14-1101297881
Маг Похмеляйнен
2004-11-24 15:04
2004.12.12
Про девчонок и вольтмод


1-1101664029
Express
2004-11-28 20:47
2004.12.12
Ошибки Delphi


3-1100178736
Layner
2004-11-11 16:12
2004.12.12
Люди добрые, поможите вставить аппостоф в SQL таблицу.