Změna klávesnice

Postup:
V deklarační části formuláře deklarujte:

Private Declare Function ActivateKeyboardLayout Lib "user32" _
   (ByVal HKL As Long, ByVal flags As Long) As Long

Na formulář přidejte tlačítko a na jeho událost Click zapište:
ActivateKeyboardLayout 0, 0

Zpět

Autor: The Bozena