比如:男,1;女,0,在系统中有默认的对应关系。但是我没在数据库中建立该表。
现Delphi中怎样才能在DBComboBox中选择男,则相应表中的数值为1,选择女,则相应表中的数值为0。

解决方案 »

  1.   

    添加'男'、'女'到DBComboBox的Items中,
    双击Query把字段添加进去,在字段的OnGetText和OnSetText事件中:procedure TForm1.Query1FieldNameGetText(Sender: TField; var Text: String;
      DisplayText: Boolean);
    begin
      if Sender.AsString = '1' then Text := '男' else
      if Sender.AsString = '0' then Text := '女'
    end;procedure TForm1.Query1FieldNameSetText(Sender: TField; const Text: String);
    begin
      if Text = '男' then Sender.AsString := '1' else
      if Text = '女' then Sender.AsString := '0'
    end;
      

  2.   

    我是用代码进行了一次转换再存入DataSet里面,我用的是ComboBox,如果用的是DbComboBox,
    不知道有没有属性可以设!
      

  3.   

    同意楼上
    你的可以用DBRadioGroup1
    他的items 填写男、女
    values 填写 1、0
    代码就不要写了
      

  4.   

    sysu(死树) 的解答很完美了。100双手献上。