Tja, hur kan man fånga en viss keykombination i hela appen utan att en viss kontroll elller annat måste vara fokuserad Enklast är att slå på KeyPreview i formuläret, då händer alla tangent tryckningar på formulärsnivå... Här är ett utdrag från MSDN: Staffan: den koden du har funkar bara om INGEN annan kontrol har fokus än form, så den skulle inte funka Hej Händelser vid tangenttryckningar utförs väl i allmänhet vi när man trycker ner tangenten inte när man släpper upp den. Hej Är inte det din gamla vanliga "jag hade fel..."-kommentar? Tror nog att Sök på Tips & tricks efter "keylogger", så kommer mitt enkla men effektiva program upp, den använder API men det är inte så krångligt som du förhoppningsvis kommer att upptäcka. MickeB var den enda som läste hela frågan........Fånga KeyPress/Ascii
jag vet att det finns nån API för det man aldrig fått det å funka
för att jag skulle vilja ha en keykombination
CTRL-SHIFT-ALT-V
typ så ska den köra en sub/func i vb6
specifiera även alla tagenter så att man kan mixa mellan dem
/FR - Om du inte kan övertyga dem, förvirra dem.Sv: Fånga KeyPress/Ascii
Sv: Fånga KeyPress/Ascii
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Shifttest = Shift And 7
Select Case Shifttest
Case 1 ' or vbShiftMask
MsgBox "You pressed the SHIFT key."
Case 2 ' or vbCtrlMask
MsgBox "You pressed the CTRL key."
Case 4 ' or vbAltMask
MsgBox "You pressed the ALT key."
Case 3
MsgBox "You pressed both SHIFT and CTRL."
Case 5
MsgBox "You pressed both SHIFT and ALT."
Case 6
MsgBox "You pressed both CTRL and ALT."
Case 7
MsgBox "You pressed SHIFT, CTRL, and ALT."'
End Select
'End SubSv: Fånga KeyPress/Ascii
Trash: eeh, va?
/FR - Om du inte kan övertyga dem, förvirra dem.Sv: Fånga KeyPress/Ascii
FR du måste ställa Formens KeyPreview = True,
det gör du i Designläge.
Sedan tycker jag att det är bättre att lägga Staffans kode
i Formens KeyUp. (kommer inte på något bra argument
just nu varför , men det sitter i bakhuvudet)
mvh
SvenSv: Fånga KeyPress/Ascii
Musklickshändelser däremot utförs vanligen när man släpper upp knappen.Sv: Fånga KeyPress/Ascii
>Lyssna på farbror Sven, han har helt rätt!
Njaaa nu tog du i ! . Jag har haft fel en gång i år.
Det var när jag trodde att min sambo hade rätt !
mvh
SvenSv: Fånga KeyPress/Ascii
jag har sett den innan... *smile*
/EmmaSv: Fånga KeyPress/Ascii
API-funktionen som jag använder är GetAsyncKeyState och du behöver inte ha någonting fokuserat, den kollar tangenterna ändå! (om du har startat programmet och sen går du in i Notepad t.ex och skriver så loggar mitt program tangenterna fastän inte Form1 eller några kontroller på Form1 har fokus).Sv: Fånga KeyPress/Ascii
jag frågade efter ett API... inte keypress för det det jag...
MickeB: Tack, ska kolla