Attivazione Bloc Maiusc (capslock)

[CIUFFO]

Come posso attivare automaticamente, all'apertura di una maschera di un database di access 2000 il tasto bloc maiusc?
Ciao a tutti.

[xegallo]

Originariamente inviato da CIUFFO
[B]Come posso attivare automaticamente, all'apertura di una maschera di un database di access 2000 il tasto bloc maiusc?
Ciao a tutti.

in vb funzione
in access non ne ho la minima idea prova
[code]
' in un modulo
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long
Private Declare Function SetKeyboardState Lib "user32" (lppbKeyState As Byte) As Long


Sub SetCapsLock(ByVal bnewValue As Boolean)
' get current state of all 256 virtual keys
Dim keystat(0 To 255) As Byte
GetKeyboardState keystat(0)
' modify bit 0 of the relevant item, and store back
keystat(vbKeyCapital) = (keystat(vbKeyCapital) And &HFE) Or (bnewValue And 1)
SetKeyboardState keystat(0)
End Sub


' nel load della maschera

setcapslock true

[CIUFFO]

La tua funzione inserita in un modulo funziona perfettamente.

Sei un mago!!

potresti però illustrarmi il funzionamento, perchè non ho capito come funziona.

Ciao e grazie mille.

[jumperless]

si puo' usare qualcosa di simile per c++?

[xegallo]

Originariamente inviato da jumperless
[B]si puo' usare qualcosa di simile per c++?
mi sembra di si in realtà c'è poco di visual basic in questo codice il lavoro lo fanno le api della user32.dll se le sai usare in c++ puoi usarne la funzioni
io non sono tanto bravo in c++ da poterti spiegare come