RSS订阅 | 匿名投稿
标签

delphi 禁止截屏PrintScreen

procedureTForm1.FormCreate(Sender:TObject);beginRegisterHotKey(Handle,IDHOT_SNAPDESKTOP,0,VK_SNAPSHOT);end;procedureTForm1.FormClose(Sender:TObject;varAction:TCloseAction);beginUnregisterHotKey(Handle…
类别:系统 作者:admin 日期:2013-01-20 11.36.47 点击:249 评论:0