数据库里面某表通过查询得到两列
ID NAME
1 A
2 B
3 C
4 D
5 E
6 F
我需要在DBComboBox上面显示出来NAME
但是当我选择 A的时候我要我需要得到 1 选择B时需要得到2的值 。如何实现?DBComboBox1可以实现吗
ID NAME
1 A
2 B
3 C
4 D
5 E
6 F
我需要在DBComboBox上面显示出来NAME
但是当我选择 A的时候我要我需要得到 1 选择B时需要得到2的值 。如何实现?DBComboBox1可以实现吗
解决方案 »
- 求解!!串口返回的数据中添加中文说明,具体见文章内容
- 有没好办法在打开窗体后就能看到所有记录,且不影响窗体打开速度?
- 如何把DLL上的变量回传到主调程序的EDIT1.TEXT中.
- 为什么ADOQuery.Locate查找不到纪录?
- 如何查看并修改html的源码?
- 救急,Ehlib控件,在DBGridEh1中录入十来条数据后提示错误
- -6E-05x3(3是立方)是-0.000006x3吗?
- 多个工具栏同用一个action,如何在action Execute里判断出是哪个工具栏激发的
- 谁能贴贴关于面向对象编程的文章!
- 如何得到打印机的详细设置?
- 如果清空变量的值???
- 如何用delphi加载别人的驱动?
使用一个QUERY
大体程序如下:
DBComboBox的onchange事件中
ss:string;
query1.close;
ss='selece * from tablex where name='+DBComboBox.text;
query1.sql.add(ss);
query1.open;
edit1.text=query1.feildbyname('id').asInteger;{或者ASSTRING}
SpeciesName: string;
CKList:=TStringList.Create;
ADOQCK.Open;
while not ADOQCK.Eof do
begin
DBComboBox1.Items.Add(ADOQCK.FieldByname('Mix_apellation').AsString);
CKList.Add(ADOQCK.FieldByname('ID').AsString);
ADOQCK.Next;
end;
if DBComboBox1.Text='' then
Exit;
ShowMessage(CKList.Strings[DBComboBox1.ItemIndex]);
设置KEYFIELD为ID ,LISTFIELD为NAME ,LISTSOURCE指向表
访问时
ShowMessage(IntToStr(DBLookupComboBox1.KeyValue))