erich.wanker Posted October 22, 2018 Share Posted October 22, 2018 Hy... in a loop - i add Database values to a uniComboBox: while not ZQuery1.Eof do begin UniComboBox1.Items.Append(ZQuery1.FieldByName('customer_name').asstring); ZQuery1.Next; end; Can i save the "unique database Integer" to the item also ? .. i want to read the unique Integer AND the UniComboBox1.Text in procedure TuniForm.UniComboBox1Change(Sender: TObject); ThanX Link to comment Share on other sites More sharing options...
Sherzod Posted October 22, 2018 Share Posted October 22, 2018 Hi, For example... UniComboBox1.Items.AddObject('Text1', TObject(1)); procedure TMainForm.UniComboBox1Change(Sender: TObject); begin ShowMessage(IntToStr(Integer(UniComboBox1.Items.Objects[UniComboBox1.ItemIndex]))); end; Link to comment Share on other sites More sharing options...
erich.wanker Posted October 22, 2018 Author Share Posted October 22, 2018 PERFECT .. Thank you very much :-) Link to comment Share on other sites More sharing options...
Recommended Posts
Please sign in to comment
You will be able to leave a comment after signing in
Sign In Now