DBComboBox

← →
jacksotnik (2012-04-23 10:23) [0]

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

← →
AV © (2012-04-23 12:27) [1]

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 ));

← →
sniknik © (2012-04-23 12:50) [2]

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

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

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

DBComboBox Найти похожие ветки