unicombobox add value

[erdal]

unicombobox hidden value

 

string or integer;

 

 

If you use numbers instead of pointer use TObject.

 

usage:

 

procedure TMainForm.UniButton1Click(Sender: TObject);

var arrList : array[0..0] of String;

begin

arrlist[0]:='020';

UniComboBox1.Items.AddObject('Active',Pointer(arrList[0]));

 

arrlist[0]:='030';

UniComboBox1.Items.AddObject('deActive',Pointer(arrList[0]));

 

uniComboBox1.ItemIndex:=1;

ShowMessage(String(pString(uniComboBox1.Items.Objects[uniComboBox1.ItemIndex])));

end;

[wjdelphi]

good idea. but it is much better if uniCombobox or uniRadioGroup have values property which map items property.