Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DBComboBox [D2005, XP]


jacksotnik ©   (2012-04-23 10:23:00) 

Всем привет. Подскажите можно-ли как-то реализовать такое средствами только DBComboBox.
Подключаю datasource и datafield к комбобоксу, затем заполняю айтемсы у него(текстовые значения) но поле в БД у меня int. Ну собственно вот и задача отобразить в ДБКомбике текстовые значения а в базу чтоб писались соответствующие им int значения. Несколько вариантов реализации есть но я хочу узнать можно-ли это сделать только средствами DBComboBox


AV   (2012-04-23 13:31:00) [1]


> просто привести число к TObject

побоялся :)
а вдруг потом как-нибудь обратишься (м.б., косвенно) и AV словишь..


sniknik   (2012-04-23 12:50:00) [2]

> как-то так
ради одного инт значения можно не "париться" с объектом, его же после и освобождать желательно...
просто привести число к TObject, а читая делать обратное преобразование. и ни создания ни уничтожения объектов не нужны.


AV   (2012-04-23 12:27:00) [3]

TDBLookupComboBox?

или делал как-то с обычным TComboBox
сейчас точно не вспомню, как-то так
type
 TMYOB = class
   ID: Integer;
 end;

var
 MyOb : TMYOB;
begin
MyOb := TMYOB.Create;
MyOb.ID := 121212;
ComboBox1.AddItem('fgfgfgfgfg', MyOb);
MyOb := TMYOB.Create;
MyOb.ID := 2323232;
ComboBox1.AddItem('qqqsdsdsdgfg', MyOb);
end;

procedure TfrmToStart.ComboBox1Change(Sender: TObject);
begin
 ShowMessage( IntToStr( TMYOB(ComboBox1.Items.Objects[ComboBox1.ItemIndex]).ID ));


Наверх

Титульная страница Поиск, карта сайта Написать письмо