比如:男,1;女,0,在系统中有默认的对应关系。但是我没在数据库中建立该表。
现Delphi中怎样才能在DBComboBox中选择男,则相应表中的数值为1,选择女,则相应表中的数值为0。
现Delphi中怎样才能在DBComboBox中选择男,则相应表中的数值为1,选择女,则相应表中的数值为0。
解决方案 »
- 每天发蛋,每天+30----今天是一只天鹅蛋
- 提问:用DBEdit控件来编辑数据时,无法撤销记录信息!
- 一个下拉框,没有的可以输入并保存到字典表中,有的选择,两者都保存对应ID如何设计啊?(一个按纽保存)谢谢
- 我找数据库工作,就暂时不用买insideVCL或源码分析之类的书来看吧?
- chart创建图表的问题,在线等待
- 三喜临门,散分3000庆祝(之一)
- 我想把所有正在运行的程序都关掉,不知如何作啊,2:00结帖,快来啊
- 1?每人解决得了了?没有高手??
- 请问在类中声明一个属性域的类型为TNotifyEvent时,该属性如何使用,为什么要声明该种类型的属性?
- 关于memo控件内容存储问题
- 几个超级简单问题,没有资料,懒得找了!
- 有没有pascal语言的资料,是doc格式的,搞定了马上给分,谢谢!
双击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;
不知道有没有属性可以设!
你的可以用DBRadioGroup1
他的items 填写男、女
values 填写 1、0
代码就不要写了