Как получить список доступных COM портов в Delphi


Получаем доступные COM порты в Delphi

1) Для начала разместим компоненты на форме (2 компонента Buton и 1 Компонент StringList), примерно так:

-Com-порты Как получить список доступных COM портов в Delphi

2) Свойство Enabled у Button2 устанавливаем в false, в разделе var создаем глобальную переменную Phandle:Thandle;

3) Создаем обработчик событий на Button1, где прописываем следующее:

4) Создаем обработчик событий на Button2, и прописываем там:

Запускаем проект, жмем на Button1, и если вы все выполняли внимательно, то в нашем ListBox1 получим полный список СОМ портов, которые есть на вашем компьютере.

Вообще есть еще способ получения информации о портах из реестра, но опробовав его я убедился в его некорректности. На стационарной машине, где контроллер COM порта расположен на материнской плате, он работает, а когда вставляю в USB разъем конвертер USB/COM найти его в системе не удаётся.