delphi数据连接

 

去掉头部

写入查询语句

 

 

 隐藏列表

把列表改为选择类型

 

 

执行结果