Avatar billede cool-wil Nybegynder
07. februar 2002 - 13:56 Der er 9 kommentarer og
2 løsninger

Tastatur lås?

Er det muligt at lave en tastatur lås i delphi?
Så man f.eks. kan låse alle knapper på tastaturet undtagen f.eks. + og 8, og så for at låse dem op igen kunne man tryke +8
Kan dette lade sig gøre, og hvordan

wil/
Avatar billede deacon Nybegynder
07. februar 2002 - 14:05 #1
Du kan låse objekter som buttons osv... ved at sætte dens property til "Enabled : False" så kan brugeren ikke klikke på den...
Avatar billede stoney Nybegynder
07. februar 2002 - 14:05 #2
skal det gælde hele din appl. eller bare eksempelvis et edit felt ?

Stoney
Avatar billede deacon Nybegynder
07. februar 2002 - 14:06 #3
stoney har du ICQ?
hvis ja, kan jeg få dit nr.?
Avatar billede stoney Nybegynder
07. februar 2002 - 14:09 #4
deacon>> jeg har ikke ICQ

Stoney
Avatar billede deacon Nybegynder
07. februar 2002 - 14:12 #5
okay... IRC??
Avatar billede cool-wil Nybegynder
07. februar 2002 - 14:13 #6
jeg snakker om tastaturet:-) det man skriver på, kan man låse det mon?

Jeg vil lave et lille program der kan det, fordi at hver aften når jeg går i seng, så stepdanser min ilder oven på tastaturet, og åbner en masse ting når den trykker..

og nej jeg har ikke et tastatur cover:-)

Kan det lade sig gøre?
Avatar billede deacon Nybegynder
07. februar 2002 - 14:14 #7
hvad har det med delphi at gøre?
Avatar billede deacon Nybegynder
07. februar 2002 - 14:17 #8
hvorfor kobler du ikke bare tastaturet fra ?
Avatar billede cool-wil Nybegynder
07. februar 2002 - 14:57 #9
jeg vil bare lave et program der kan gøre det:-)
det må da være muligt at låse sit tastatur via delphi?
Avatar billede djernaes Nybegynder
07. februar 2002 - 17:12 #10
Hej,

Jeg har ikke en faerdig opskrift, men du skal nok kigge paa at lave et KeyboardHook!

Noget a la:
KeyboardHook := SetWindowsHookEx(WH_KEYBOARD, @HookProcedure, HInstance, 0);

I funktionen:
Function HookProcedure(Code : Integer; vkCode : WPARAM; MsgInfo : LParam) : LResult; StdCall;

Kan du nu bestemme om keyboard tasterne skal igennem eller ej ved at kalde:
Result := CallNextHookEx(0, Code, vkCode, MsgInfo);         

Nu skal det lige siges at hvis et andet Hook er inde "foer" dig, jaa saa kan du ikke bestemme noget som helst ;-(

Martin
Avatar billede djernaes Nybegynder
07. februar 2002 - 17:13 #11
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester