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 Quote 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; Quote 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 :-) Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.