• Home
 · 
• Windows API Call/Explanation
 · 
• get GetKeyboardLayout language from a thread

get GetKeyboardLayout language from a thread

hi!this is my first submit
finely i think i can put something usefull
for other users.
this code read the keyboard language from
another application all you need is to send
the handle of the thread window.

Inputs
winHWND is the thread window Handle

Side Effects
i think NON i tested it on my mechine

API Declarations
Public Declare Function GetKeyboardLayout Lib "user32" (ByVal dwLayout As Long) As Long
Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long) As Long


Rate get GetKeyboardLayout language from a thread

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'find out what keyboard language a theard is 
Public Sub FindTheardlanguage ()
Dim TheardId As Long
Dim TheardLang As Long
  TheardId = get_threadId 'call function
  TheardLang = GetKeyboardLayout(ByVal TheardId)
  TheardLang = TheardLang Mod 10000
  
 Select Case TheardLang 
  Case 9721 'english
  'do your stuff
  
  Case 1869 'hebrew
   'do your stuff
  
 End Select
  
End Sub

Public Function get_threadId() As Long
Dim threadid As Long, processid As Long
get_threadId = GetWindowThreadProcessId(winHWND, processid)
End Function