Delphi - Je možné uložiť ID záznamu v TComboBox pre každú položku, aby sa nezobrazilo?

Mám tabuľku. Z nej chcem dať hodnoty z určitého stĺpca do TComboBox. Lenže po výbere v ňom by som musel hľadať ID vybraného záznamu. Nedá sa to urobiť nejako jednoduchšie? Myslím tým uloženie ID záznamu do TComboBox.Items tak, aby sa ID nezobrazovalo? Niečo na spôsob TCheckBox.Tag podľa ktorého sa dá ľahko pracovať so správnym TCheckBox, prípadne inou komponentou. Ide o to, že sa mi zdá neefektívne spätne vyhľadávať vybraný záznam, ak si môžem jeho ID niekde uchovať. Nejde o rýchlosť, ale o jednoduchosť zápisu programu, ktorý by bol vlastne zbytočne zložitejší.

Předmět	Autor	Datum
Dúfam, že nenapíšem kravinu, ale možno by sa to dalo riešiť cez DELIMETER keďže položky sú triedy TS… Len tak 26.02.2007 22:50	Len tak	26.02.2007 22:50
Toto je presne, čo potrebujem. Pozrel som to v helpe a zrejme je to ono. Len si sa zmýlil. Je to Del… msx. 26.02.2007 23:04	msx.	26.02.2007 23:04
Bohes myslel som si že DELIMITER, ja neviem prečo to volám DELIMETER... Ale hlavné je, že vieme o čo… Len tak 27.02.2007 01:08	Len tak	27.02.2007 01:08
Delimiter nepomohol.:-( msx. 01.03.2007 11:06	msx.	01.03.2007 11:06
var Name: string; ID: Integer; ... ComboBox1.Items.AddObject(Name, Ptr(ID)); ... ID := Integer(Combo… Monkey 27.02.2007 02:59	Monkey	27.02.2007 02:59
Vyzerá to podľa mojich predstáv, len mám problém s násilným prevodom Integer na Ptr, prípadne na TOb… poslední msx. 01.03.2007 11:16	msx.	01.03.2007 11:16

Dúfam, že nenapíšem kravinu, ale možno by sa to dalo riešiť cez DELIMETER keďže položky sú triedy TStrings, príklad :

combobox1.items[0]:= 'popispolozky=ID-1';
combobox1.items[1]:= 'popispolozky=ID-2';
...
combobox1.items.delimeter:= '=';
// možno to pôjde, vravím len z pamäti
// ak by to šlo, tak v Comboboxe by sa ti mali zobraziť iba položky pred '=', čiže 'popispoložky'

Skôr si urob pole ID čísiel...

Toto je presne, čo potrebujem. Pozrel som to v helpe a zrejme je to ono. Len si sa zmýlil. Je to Delimiter, ale pomohol si mi dosť. Zajtra to budem testovať, a prípadne označím za vyriešené. Takže vrelá vďaka.

Bohes myslel som si že DELIMITER, ja neviem prečo to volám DELIMETER... Ale hlavné je, že vieme o čo sa jedná.

Delimiter nepomohol.

var
  Name: string;
  ID: Integer;

...

ComboBox1.Items.AddObject(Name, Ptr(ID));

...

ID := Integer(ComboBox1.Items.Objects[ComboBox1.ItemIndex]);

Vyzerá to podľa mojich predstáv, len mám problém s násilným prevodom Integer na Ptr, prípadne na TObject.

Zpět do poradny Odpovědět na původní otázku Nahoru