работа с Tcomcombobox

@KIRA93 · Регистрация: 27.09.2013

Студворк — интернет-сервис помощи студентам

Есть объект tcomport в нем есть свойство port в нем хранятся список портов. Мне нужно зделать выборку портов как вы поняли при помощи Tcomcombobox. Вот что пытался делать но работает не совсем как надо

Delphi
1
cbb1.Items.Add(cmprt1.Port);

выдается только тот порт который выбран а мне нужен весь список и собственно переключение на другой порт!
Буду благодарен)

@northener · 11.10.2013, 13:48

Сообщение от KIRA93

Есть объект tcomport в нем есть свойство port в нем хранятся список портов.

Нет в нем никакого списка.

@KIRA93 · 11.10.2013, 13:56 **[ТС]**

northener, https://www.cyberforum.ru/atta... 1381485143

Добавлено через 3 минуты
northener, Подскажите когда как мне получиться список. сейчас пробую с помощью обычного combobox вывести, просто ввожу в item в ручную и вывести вот код

Delphi
1
cmprt1.Port := String( cbb1.Items);

@northener · 11.10.2013, 14:18

Свойство Port какого типа?

@KIRA93 · 11.10.2013, 14:32 **[ТС]**

northener, 232

Добавлено через 1 минуту
northener, оййй string

Добавлено через 9 минут
northener, может в ini напрямую в файл записывать номер порта?

@northener · 11.10.2013, 14:32

Сообщение от KIRA93

оййй string

Я такого типа "оййй string" не знаю

Поставьте у комбобокса стиль csDropDownList
Набейте в дизайнере в комбобокс список
COM1
COM2
COM3
...
COM9
(на первый случай хватит 9 портов)
В программе пишете

Delphi
1
cmprt1.Port := cbb1.Text;

@KIRA93 · 11.10.2013, 14:41 **[ТС]**

[QUOTE=northener;5168443]
Набейте в дизайнере в комбобокс список

это свойство text?

@northener · 11.10.2013, 14:54

Сообщение от KIRA93

это свойство text?

Это свойство Items

@KIRA93 · 11.10.2013, 14:57 **[ТС]**

northener, Если вы говорите про comcombobox то его там нет, а вот в обычном combobox есть) в обычном попробовал ваш способ не работает!

@northener · 11.10.2013, 15:08

Сообщение от KIRA93

northener, Если вы говорите про comcombobox то его там нет, а вот в обычном combobox есть) в обычном попробовал ваш способ не работает!

Что такое comcombobox я не знаю. Это что-то наверно идущее вместе с тем компонентом компорта. С обычным все должно работать только сначала нужно выбрать компорт в выпадающем списке комбобокса.

@KIRA93 · 11.10.2013, 15:16 **[ТС]**

northener, ммм вы сути вопроса не поняли, в ком порт уже есть выборка портов, я работаю в виртуалке
https://www.cyberforum.ru/atta... 1381489966
в объекте ком порт он уже выбран, а если выбрать в комбобоксе то вот что выдает
https://www.cyberforum.ru/atta... 1381490075

@northener · 11.10.2013, 15:26

Сообщение от KIRA93

northener, ммм вы сути вопроса не поняли, в ком порт уже есть выборка портов, я работаю в виртуалке

Ну так надо точнее объяснять суть вопроса.
Знать не может этот компонент открыть COM1. Не помню что означает ошибка 2. И посмотреть сейчас негде. То ли такого порта нет, то ли этот порт уже занят, то ли ...
И компонент писали индусы. Не могли словами сказать причину.

@KIRA93 · 11.10.2013, 15:37 **[ТС]**

northener, а так если нажать на кнопку открыть то работает, но мне нужен выбор портов)

Добавлено через 5 минут
northener, а ошибка значит не может открыть ком порт

@northener · 11.10.2013, 15:47

Сообщение от KIRA93

а ошибка значит не может открыть ком порт

Unable - не могу
to open - открыть
com port - com порт

Добавлено через 3 минуты

Сообщение от KIRA93

так если нажать на кнопку открыть то работает, но мне нужен выбор портов

Т.е. вы сначала открыли порт, а потом решили выбрать какой?

@KIRA93 · 11.10.2013, 15:49 **[ТС]**

northener, передохну ко я а то мозг ваще )

Добавлено через 1 минуту
northener, ком порт его сам открывает, если очистить свойство port все равно остается выбранным тот который был установлен последний раз

@northener · 11.10.2013, 15:56

Сообщение от KIRA93

ком порт его сам открывает

Значит сначала надо закрыть соответствующей кнопкой, а потом уже менять выбор и открывать заново.

@KIRA93 · 14.10.2013, 09:31 **[ТС]**

northener, я просто false прописал в свойстве port и все работает

спс за помощь

Добавлено через 1 час 47 минут
northener, только от error 2 не могу избавиться ( видимо в kom port не предусмотрено чтобы было прописано в свойстве port false, тоесть я выбираю порт любой не к которому подключен прибор выводит error 2 пытаюсь вывести человеческое сообщение об ошибке, а так если выбрать тот порт к которому прибор подключен то все рубит) можешь помочь

@northener · 14.10.2013, 11:30

error 2 это already open. Каким образом ты получаешь эту ошибку при попытке открыть любой другой порт я не понимаю. И не могу понять не имея перед глазами исходников.

@KIRA93 · 14.10.2013, 12:08 **[ТС]**

northener,

Delphi
1
2
3
4
5
6
7
 cmprt1.Open;
    if cmprt1.Connected = True  then
    lbl1.Caption := 'Порт открыт'
    else
    //cmprt1.Connected = True
 
    lbl1.Caption := 'Порт закрыт';

14.10.2013, 12:20

А случайно нет свойства Opened вместо Connected?

Новые блоги и статьи Все статьи Все блоги /
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .

@northener пофигист широкого профиля 4769 / 3204 / 862 Регистрация: 15.07.2013 Сообщений: 18,612
	11.10.2013, 14:18
	Свойство Port какого типа? 0

@KIRA93 0 / 0 / 0 Регистрация: 27.09.2013 Сообщений: 44
	11.10.2013, 14:32 [ТС]
	northener, 232 Добавлено через 1 минуту northener, оййй string Добавлено через 9 минут northener, может в ini напрямую в файл записывать номер порта? 0

@KIRA93 0 / 0 / 0 Регистрация: 27.09.2013 Сообщений: 44
	11.10.2013, 14:41 [ТС]
	[QUOTE=northener;5168443] Набейте в дизайнере в комбобокс список это свойство text? 0

@KIRA93 0 / 0 / 0 Регистрация: 27.09.2013 Сообщений: 44
	11.10.2013, 14:57 [ТС]
	northener, Если вы говорите про comcombobox то его там нет, а вот в обычном combobox есть) в обычном попробовал ваш способ не работает! 0

@KIRA93 0 / 0 / 0 Регистрация: 27.09.2013 Сообщений: 44
	11.10.2013, 15:16 [ТС]
	northener, ммм вы сути вопроса не поняли, в ком порт уже есть выборка портов, я работаю в виртуалке https://www.cyberforum.ru/atta... 1381489966 в объекте ком порт он уже выбран, а если выбрать в комбобоксе то вот что выдает https://www.cyberforum.ru/atta... 1381490075 Миниатюры 0

@KIRA93 0 / 0 / 0 Регистрация: 27.09.2013 Сообщений: 44
	11.10.2013, 15:37 [ТС]
	northener, а так если нажать на кнопку открыть то работает, но мне нужен выбор портов) Добавлено через 5 минут northener, а ошибка значит не может открыть ком порт 0

@KIRA93 0 / 0 / 0 Регистрация: 27.09.2013 Сообщений: 44
	11.10.2013, 15:49 [ТС]
	northener, передохну ко я а то мозг ваще ) Добавлено через 1 минуту northener, ком порт его сам открывает, если очистить свойство port все равно остается выбранным тот который был установлен последний раз 0

@KIRA93 0 / 0 / 0 Регистрация: 27.09.2013 Сообщений: 44
	14.10.2013, 09:31 [ТС]
	northener, я просто false прописал в свойстве port и все работает спс за помощь Добавлено через 1 час 47 минут northener, только от error 2 не могу избавиться ( видимо в kom port не предусмотрено чтобы было прописано в свойстве port false, тоесть я выбираю порт любой не к которому подключен прибор выводит error 2 пытаюсь вывести человеческое сообщение об ошибке, а так если выбрать тот порт к которому прибор подключен то все рубит) можешь помочь 0

@northener пофигист широкого профиля 4769 / 3204 / 862 Регистрация: 15.07.2013 Сообщений: 18,612
	14.10.2013, 11:30
	error 2 это already open. Каким образом ты получаешь эту ошибку при попытке открыть любой другой порт я не понимаю. И не могу понять не имея перед глазами исходников. 0

angstrom
	14.10.2013, 12:20
	А случайно нет свойства Opened вместо Connected?