جلوگیری از ScreenShot و Snip

[masoode]

سلام دوستان
من در برنامه ای که دارم مینویسم، فایلهای نقشه که به صورت pdf و jpg است را نمایش میدهم ولی امکان پرینت و ذخیره سازی را محدود کرده ام. حالا میخواهم هم اسکرین شات را ببندم و هم Snip را. با بستن کلید Print Screen کارم راه نمی افته.
آیا راهی سراغ دارید؟
من دیده ام که اگر از صفحه بعضی از نرم افزارها که Screen shot میگیرم همه صفحه را میگیرد ولی آن قسمتی که فیلم یا عکس وجود ندارد سیاه میشود.

[دلفــي]

سلام دوستان
من در برنامه ای که دارم مینویسم، فایلهای نقشه که به صورت pdf و jpg است را نمایش میدهم ولی امکان پرینت و ذخیره سازی را محدود کرده ام. حالا میخواهم هم اسکرین شات را ببندم و هم Snip را. با بستن کلید Print Screen کارم راه نمی افته.
آیا راهی سراغ دارید؟
من دیده ام که اگر از صفحه بعضی از نرم افزارها که Screen shot میگیرم همه صفحه را میگیرد ولی آن قسمتی که فیلم یا عکس وجود ندارد سیاه میشود.


unit Unit1;


interface


uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;


type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
private
procedure WMHotKey(var Msg : TWMHotKey); message WM_HOTKEY;
{ Private declarations }
public
{ Public declarations }
end;


var
Form1: TForm1;


implementation


{$R *.dfm}


const id_SnapShot = 101;


procedure TForm1.FormCreate(Sender: TObject);
begin
RegisterHotKey(Self.Handle, id_SnapShot, 0, VK_SNAPSHOT) ;
end;


procedure TForm1.FormDestroy(Sender: TObject);
begin
UnRegisterHotKey(Self.Handle, id_SnapShot) ;
end;


procedure TForm1.WMHotKey (var Msg : TWMHotKey);
begin
if Msg.HotKey = id_SnapShot then
end;


end.

[masoode]

155669
من حتی میخواهم screen snip هم کار نکند
با کد شما فقط کلید Print Screen از کار می افتد