Question

delphi怎样写代码把下面库表内容由Tcombobox控件显示？

combobox1列框内有中国、美国、英国等 。
库表见:
http://t.qq.com/p/t/271173032361227?pgv_ref=im.remindtips_viewbtn&ptlang=2052
大家一看就知道数据间的领属关系. 请问高手怎么代码实现上述功能。谢谢！

Answer 1

不就是  sql查询 把ParentID为1的过滤出来

循环遍历查询结果  把 ConText字段值  加到combobox控件上去 

随便写个ADOQuery1查询

  with ADOQuery1 do

  begin

    Close;

    SQL.Clear;

    SQL.Add('select * from 表名 where ParentID=1);

    open;

      First;

      while not Eof do

      begin

        ComboBox1.AddItem(fieldbyname('ConText').AsString,ComboBox1);

        Next;

      end;

  end;

追问

老师：我业余学的，pascal语法差劲。
combobox2 与 combobox3要显示相应的下属项目的代码该怎么写呀？100悬赏分呢，不过也无以为谢了。

追答

我也是业余的，给你做了个 上海重复 自己想办法去 （用循环查找combobox里是不是已有上海有就不additem了）...考虑到你 语法菜，不用开域语句

Answer 2

你根本就不用费什么事，也用不着查询或读取代码来实现。非常简单的。将控件改为;DBLookupCombobox（在控件VCL的Data Controls里面），将你那个表的数据源指向此控件的ListSource属性，再将此控件的关键字段（KeyField）属性指向ConText, 在属性行用鼠标选取就行。字段值（国家名）就可以在编译运行后的DBLookupCombobox上显示出来了。
试试效果，不错吧？点选一下，你还会发现，数据库表的指针也同步变化了，能省去多少代码呀？

追问

您提供的方法只适合一个DBLookupCombobox组件。而我的要求是下拉组合框1显示国别；下拉组合框2显示对应国别的省（美国是州)分，以此类推下拉组合框3显示该省份下主要城市。

追答

举一反三。

Answer 3

看不到微博内容。
不过这个东西逻辑很简单
简单给你划分， Combox 为 Com国，Com省，Com市

首先读取国家列表到数据集，然后循环数据集
把国家名称添加到 Com国 控件里， 记得在循环之前 添加一个 空项目，设置 COm省，Com市内容为空

当Com国选择了对象之后（AfterSelect 事件）
根据国家名称，或国家编号，检索省份信息，用如上的方法添加到
Com省 控件里，设置第一个为默认值；同时 以 Com省 里的值 作为条件，检索 内容填充到COm市控件里，并设置一个默认值（一般设置为第一个）

追问

在库表小图上单击一下就会看清了。

Answer 4

可根据该ikvbj