ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / ComboBox в качестве параметра процедуры/функции
12 сообщений из 12, страница 1 из 1
ComboBox в качестве параметра процедуры/функции
    #39969931
Sensor230
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sensor230
Гость
Программисты, помогите кто чем может.
при создании формы список ComboBox.Items создается програmмно из SQL-запроса
Так как ComboBox-ов на форме несколько и все их надо заполнять, хочу засунуть это в процедуру или функцию
что то типа
Код: pascal
1.
procedure AddItemsCombo (Collum, Table, ComboBox: string);


Collum - Столбец в таблице из которого формируется Items
Table - таблица БД в которой этот столбец находится (для формирования SQL-запроса)
ComboBox - в который надо засунуть созданый список Items.

Сейчас работает в цикле с перебором и проверкой на дубликаты, как то так:
Код: pascal
1.
ComboBox1.Items.Add(ADOQuery1.FieldByName(Collum).AsString);


Подскажите как в этой строчке поменять ComboBox1 на другой, например ComboBox2.
Писать отдельный (одинаковый) блок на заполнение каждого ComboBox наверное не правильно.
Можно передавать процедуре/функции кроме параметров в какой таблице и из какого столбца создавать Items, ещё и в имя ComboBox-a в который этот Items будет записываться? спс.
...
Рейтинг: 0 / 0
16.06.2020, 19:45
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39969935
s62
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
s62
Участник
Sensor230
...
Можно передавать процедуре/функции кроме параметров в какой таблице и из какого столбца создавать Items, ещё и в имя ComboBox-a в который этот Items будет записываться? спс.

Можно имя, а можно комбобокс (ссылку на комбобокс).

Код: pascal
1.
procedure AddItemsCombo(const aColumn, aTableName: string; aComboBox: TComboBox);



Код: pascal
1.
aComboBox.Items.Add(ADOQuery1.FieldByName(aColumn).AsString);



Вызов
Код: pascal
1.
AddItemsCombo('username', 'users', ComboBox1);
...
Рейтинг: 0 / 0
16.06.2020, 20:00
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39969936
Sensor230
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sensor230
Гость
s62,
Здесь самые программистые программисты! )))) СПАСИБО!!! Работает!!!
...
Рейтинг: 0 / 0
16.06.2020, 20:10
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39969955
энди
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
энди
Участник
Лучше все же передавать не сам компонент, а его Items :)
Тогда не только в комбобокс данные пихать можно будет :)
...
Рейтинг: 0 / 0
16.06.2020, 21:24
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39969970
s62
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
s62
Участник
энди
Лучше все же передавать не сам компонент, а его Items :)
Тогда не только в комбобокс данные пихать можно будет :)
Кстати да, согласен. TStrings передавать.
...
Рейтинг: 0 / 0
16.06.2020, 22:31
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39969976
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DimaBr
Участник
энди
Лучше все же передавать не сам компонент, а его Items :)
Тогда не только в комбобокс данные пихать можно будет :)

Лучше передавать Компонент, тогда можно заполнять не только TStrings
...
Рейтинг: 0 / 0
16.06.2020, 23:00
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39970062
mkr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mkr
Участник
Sensor230,

мне кажется, лучше не колонку и таблицу, а SQL запрос.
да и id, не помешал бы (но тут уже dbcombobox нужен)

p.s. сбросьте уже текст AddItemsCombo на код-ревью)
...
Рейтинг: 0 / 0
17.06.2020, 10:31
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39970074
Gerasimenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gerasimenko
Участник
mkr
Sensor230,

мне кажется, лучше не колонку и таблицу, а SQL запрос.
да и id, не помешал бы ( но тут уже dbcombobox нужен )

p.s. сбросьте уже текст AddItemsCombo на код-ревью)

А чем обычный ComboBox не устраивает?
...
Рейтинг: 0 / 0
17.06.2020, 11:03
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39970080
mkr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mkr
Участник
Gerasimenko
mkr
Sensor230,

мне кажется, лучше не колонку и таблицу, а SQL запрос.
да и id, не помешал бы ( но тут уже dbcombobox нужен )

p.s. сбросьте уже текст AddItemsCombo на код-ревью)

А чем обычный ComboBox не устраивает?


"из коробки" нет механизма прямого добавления keyvalue значений, поэтому необходима немногим более сложная логика добавления и работы с keyvalue.
...
Рейтинг: 0 / 0
17.06.2020, 11:13
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39970085
Gerasimenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gerasimenko
Участник
mkr
Gerasimenko
пропущено...

А чем обычный ComboBox не устраивает?


"из коробки" нет механизма прямого добавления keyvalue значений, поэтому необходима немногим более сложная логика добавления и работы с keyvalue.
AddItem вам в руки
...
Рейтинг: 0 / 0
17.06.2020, 11:16
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39970109
alekcvp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alekcvp
Участник
Gerasimenko
AddItem вам в руки

С AddItem() у компонентов, кстати, была какая-то засада. ЕМНИП, он не может запоминать значение -1, потому что оно внутри используется как маркер "нет значения"...
...
Рейтинг: 0 / 0
17.06.2020, 11:51
| Ответить | Цитировать | Написать  
ComboBox в качестве параметра процедуры/функции
    #39970110
Gerasimenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gerasimenko
Участник
alekcvp
Gerasimenko
AddItem вам в руки

С AddItem() у компонентов, кстати, была какая-то засада. ЕМНИП, он не может запоминать значение -1, потому что оно внутри используется как маркер "нет значения"...
id = -1 суровая у Вас БД
...
Рейтинг: 0 / 0
17.06.2020, 11:53
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / ComboBox в качестве параметра процедуры/функции
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&fpage=42&tid=2038217]:
 0ms
get settings:
 8ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 58ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 221ms
total:  367ms
созд. / загр.: 367ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]