"AND" "OR"
Главная Информер Журнал Форум

Как показать диалоговое окошко настроек порта.

Автор: Steve Anderson

Возможно, Вы замечали, когда смотрели настройки системы, что можно посмотреть настройки LPT и COM портов. Такое диалоговое окошко можно отобразить при помощи API функции ConfigurePort.

Создайте новый стандартный EXE-проект, добавьте кнопку (Command button) на form1 и поместите следующий код в form1:

Private Declare Function ConfigurePort _
Lib "winspool.drv" Alias "ConfigurePortA" _
(ByVal pName As String, ByVal hwnd As Long, _
ByVal pPortName As String) As Long

Private Sub Command1_Click()
MsgBox ConfigurePort("", Me.hwnd, "COM4")
MsgBox ConfigurePort("", Me.hwnd, "LPT1")
End Sub

 

Теперь запустите проект (F5) и кликните по кнопке. Должены появиться свойства для COM4 и LPT1 портов.