غیر فعال کردن صفحه کلید(تمام کلیدها)

[parsidev]

سلام
چه طور میشه تمام کلیدهای صفجه کلید رو غیر فعال کرد یعنی خود صفحه کلید رو فعال کرد؟
(بسیار حیاتی)
پیشاپیش از جواب شما متشکرم.

[Touska]

سلام
چه طور میشه تمام کلیدهای صفجه کلید رو غیر فعال کرد یعنی خود صفحه کلید رو فعال کرد؟
(بسیار حیاتی)
پیشاپیش از جواب شما متشکرم.

من که نفهمیدم چی شد :متعجب:

[Mahdi_Delphi]

منظورشون غیر فعال کردن (قفل کردن) کی بورد بوده !

[parsidev]

منظورشون غیر فعال کردن (قفل کردن) کی بورد بوده !
درسته منظورم

[parsidev]

منظورشون غیر فعال کردن (قفل کردن) کی بورد بوده !
درسته منظورم همین بود

[parsidev]

یعنی کسی نمی دونه؟

[parsidev]

جوابی نداره؟
من فقط برای امنیت نرم افزار احتیاج به چنین کدی دارم .
یعنی فقط کی بورد غیر فعال باشه و کاربر فقط بتونه از موس استفاده کنه.

[Mahdi_Delphi]

چرا جواب که داره .

ولی چون بیشتر کاربردی برای ساخت ویروس یا برنامه های مخرب داره کسی جواب نمیده.

یه کد واسه این کار داشتم ولی خودم امتحانش نکردم.میگردم تا پیداش کنمو اگه درست بود برات میزارمش.

[mamizadeh]

با سلام
منم بدجوری دنبالشم اگه هر کی می دونه دریغ نکنه
با تشکر

[realman]

فکر کنم تنها راه اصولیش این باشه:



procedure TForm1.Button1Click(Sender: TObject) ;

function FuncAvail
(_dllname, _funcname: string; var _p: pointer):
boolean;
var _lib: tHandle;
begin
Result := false;
_p := NIL;
if LoadLibrary(PChar(_dllname)) = 0 then exit;
_lib := GetModuleHandle(PChar(_dllname)) ;
if _lib <> 0 then
begin
_p := GetProcAddress(_lib, PChar(_funcname)) ;
if _p <> NIL then Result := true;
end;
end;


var
xBlockInput : function(Block: BOOL):
BOOL; stdcall;

begin
if FuncAvail
('USER32.DLL', 'BlockInput', @xBlockInput) then
begin
xBlockInput(true) ;
Sleep(20000) ;
xBlockInput(false) ;
end;
end;


end.





با برداشتن تایمر می شه اون چیزی که می خواهید.ولی اگه اونو برداشتید حتما یه فکر برای فعال کردن مجددش بکنین :متفکر:

[realman]

البته این نکته رو هم بگم که کد بالا علاوه بر کیبورد ،موس رو هم غیر فعال می کنه.
به این سایت هم یک نگاهی بکنین.علاوه بر این که یکی از کاربردهای این عمل رو توضیح داده(تا فکر نکنین فقط به درد خراب کاری می خوره) یک شیوه جالب هم برای کنترل و از کار انداختن صفحه کلید استفاده کرده.

http://www.codeproject.com/samples/ForTheKids.asp

[parsidev]

اما من نمی خوام موس هم از کار بیفته!