Функция InitCommonControls

Declare Sub InitCommonControls Lib "comctl32" ()

InitCommonControls регистрирует и инициализирует класс окна, используемый для создания различных элементов управления. Данная функция является устаревшей. Новые приложения должны использовать InitCommonControlsEx

Возвращаемое значение

Ничего не возвращается

Параметры

Функция не имеет параметров

Пример

' Программно создадим элемент управления Индикатор прогресса (ProgressBar)
InitCommonControls
mWnd = CreateWindowEx(0, "msctls_progress32", "Russian_Project_Control", WS_VISIBLE Or WS_CHILD, 0, 0, 300, 50, Me.hwnd, ByVal 0&, ByVal 0&, ByVal 0&)

' Перед выходом уничтожаем окно
Private Sub Form_Unload(Cancel As Integer)
    DestroyWindow mWnd
End Sub

Категория

Common Controls