dbgrid的问题，请帮忙！

Question

使用SQL语句
Select Distinct 工作单位 from 人员信息表
然后将返回的结果用DBGrid显示！
嘻嘻:>!!!

Answer 1

我有一个人员信息表.里面有姓名 工作单位等字段
我现在用DBGRID1显示工作单位.工作单位是有从复的.
现在我要把从复的只显示一条在DBGRID1中。
然后再用一个DBGRID2显示人员的信息而且要求点DBGRID1的一条记录（某个工作单位）然后就显示在DBGRID2中,符合该单位的人员信息!
请各们帮忙.谢谢！

Answer 2

我有一个人员信息表.里面有姓名 工作单位等字段
我现在用DBGRID1显示工作单位.工作单位是有从复的.
现在我要把从复的只显示一条在DBGRID1中。
然后再用一个DBGRID2显示人员的信息而且要求点DBGRID1的一条记录（某个工作单位）然后就显示在DBGRID2中,符合该单位的人员信息!
请各们帮忙.谢谢！

Answer 3

dbgrid1对应的数据集用‘select distinct 工作单位’选出非重复的单位名称dbgrid2对应的数据集用 ‘selcet * fromwhere 工作单位 = ’ + table1.fieldbyname（'工作单位'）.asstring 
其中table1是dbgrid1对应的数据集

Answer 4

selcet * from ryxxb where gzdw = dm.table1.fieldbyname（gzdw ）.asstring 
我这样写为何不对呢？？

Answer 5

'selcet * from ryxxb where gzdw =''' dm.table1.fieldbyname（gzdw ）.asstring +''''注意单引号

Answer 6

with Query do
begin
...
SQL.Add('selcet * from ryxxb where gzdw = :Value');
ParamByName(gzdw).AsString := dm.table1.fieldbyname（gzdw ）.asstring 
Open;
end;

Answer 7

DataSource.DataSet := Table1;
Query1.DataSource.DataSource := DataSource;
这样试一试；

Answer 8

对了，您想放多少个TDBGrid随您 ：）

Answer 9

select * from ryxxb where gzdw =''' dm.adotable1.fieldbyname（gzdw ）.asstring '''
这句加在QUERY的SQL里面 为什么我指向DBGRID1的一条记录时DBGRID2为何不
显示相符的单位的人员信息呢？

Answer 10

很急，连续发了3个100分的帖子没有人回答，帮个忙吧。
http://www.csdn.net/expert/topic/799/799889.xml?temp=.2711603
http://www.csdn.net/expert/topic/799/799789.xml?temp=.6369135
http://www.csdn.net/expert/topic/795/795315.xml?temp=.9500238谁能解决，全部可用分相送！

Answer 11

select * from ryxxb where gzdw =''' dm.adotable1.fieldbyname（gzdw ）.asstring '''
这句加在QUERY的SQL里面 为什么我指向DBGRID1的一条记录时DBGRID2为何不
显示相符的单位的人员信息呢？

Answer 12

在query的afterscroll事件里写查询语句

Answer 13

select * from ryxxb where gzdw =''' dm.adotable1.fieldbyname（gzdw ）.asstring '''
这句本来就是错误的；
select * from ryxxb where gzdw =''' dm.adotable1.fieldbyname（'gzdw' ）.asstring '''
字段先加上引号再说

Answer 14

在adoQuery1中的sql中写
select * from ryxxb where gzdw =:gzdw
在adotable1相连的DATASOURCE控件中的ONDATACHANGE事件中加入：
if field=nil then
  begin
  adoQuery1.close;
  adoQuery1.Params[0].asstring:=adotable1.fieldbyname('gzdw').asstring 
  adoQuery1.open;
  end;

Answer 15

tmpstr: string;
tmpstr := dm.adotable1.fieldbyname('gzdw').asstringSQL.Add('select * from ryxxb where gzdw = :tmpstr');

Answer 16

select * from ryxxb where gzdw = :tmpstr