combobox或者dbcombobox有没有这样的功能,显示的是一个值,实际上是另外一个值,
比如:
性别
男    0
女    1显示的是男女,实际的值却是0,1.

解决方案 »

  1.   

    可以做到的...
    var
      StrList: TStrings;
      i: integer;
    begin
      StrList := TSTringlist.create;
      for i:= 1 to 10 to
      begin
        combobox.Items.add(假值);  
        StrList.add(真值);
    end;////////////
    之后可以根据indexs属性来得到值..
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      i: integer;
    begin
      for i:=0 to 9 do
      begin
        ComboBox1.AddItem('***', TObject(i*10));
      end;
    end;procedure TForm1.ComboBox1Change(Sender: TObject);
    begin
      ShowMessage(IntToStr(Integer(ComboBox1.Items.Objects[ComboBox1.ItemIndex])));
    end;