| Вопрос: LoadKeyboardLayout | Добавлено: 28.02.07 22:04 |
Автор вопроса:  DRONGO | ICQ: 177606798 |
|
Помогите пожалуйста чайнику
У меня одна такая код Private Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long Private Const KLF_ACTIVATE = 1 Public Sub SetLanguage(ByVal s As String) Select Case UCase(Left(s, 1)) Case "R" LoadKeyboardLayout "00000419", KLF_ACTIVATE Case "U" LoadKeyboardLayout "00000422", KLF_ACTIVATE Case "E" LoadKeyboardLayout "00000409", KLF_ACTIVATE Case Else End Select End Sub Private Sub Command1_Click() 'Вызывается соответственно с параметром "R", "U" или "E" SetLanguage ("R") End Sub Все мне понятно …..только что это означает Private Const KLF_ACTIVATE = 1 Почему KLF_ACTIVATE…… |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  GSerg Вопросов: 0 Ответов: 1876 
|
Профиль | | #1 | Добавлено: 01.03.07 05:09 |
| http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/userinput/keyboardinput/keyboardinputreference/keyboardinputfunctions/loadkeyboardlayout.asp | ||
Страница: 1 |