关于DBGRID的问题，各位高手请进！

Question

你可以用两个query 去链数据库！
一个显示全部记录也就是
select * from table
另一个则有条件，也就是你说的离职的？
select * from table where 字段='离职'

Answer 1

if 表1.工作状况 =’离职’ then
begin
  insert into 表二;
  delete from 表一；
end;

Answer 2

datasouce1.dataset:=query1;
datasouce2.dataset:=query2;
dbgrid1.datasource:=datasource1;
dbgrid2.datasource:=datasource2;
with query1 do
begin
  close;
  sql.clear;
  sql.add('select * from empTable');
  open;
end;
with query2 do
begin
  close;
  sql.clear;
  sql.add('select * from emptable where 工作状况:="离职"'）
　open;
end;

Answer 3

各位大侠看看我做的部份吧！顺便指出该怎幺修改？
放一个AdoQuery,一个DataSource,一个DbGrid,DataSource的DataSet设为AdoQuery,DbGrid的DataSource设为DataSource.
代码部分：
procedure TForm1.Button1Click(Sender: TObject);
begin
   AdoQuery1.Sql.Add('select * "from personnel_No.DB"  where fieldname=:value');
   AdoQuery1.Parameters[0].Value:= '组长';
      AdoQuery1.open;
end;
  不过编译执行时出现这样的错误信息：List index out of bounds(0)

Answer 4

用一个最笨的方法去解决它。（两个数据源）
var kk:int;
source1:=adoquery1.sql.add('select * from table where 字段 '离职'）;
kk:=adoquery1.recno;
     
source2:=adoquery1.sql.add('select * from table);
kk:=adoquery1.recno=kk;这样应该可以啦！你试试吧！  

Answer 5

上面缺少了条件
用一个最笨的方法去解决它。（两个数据源）var kk:int;
source1:=adoquery1.sql.add('select * from table where 字段 ='离职''）;
kk:=adoquery1.recno;
     
source2:=adoquery1.sql.add('select * from table');
kk:=adoquery1.recno=kk;这样应该可以啦！你试试吧！  

Answer 6

TO:kinvb
   你的方法也无法达到目的。不过还是要谢谢你。
　　　请各位大侠继续关注！！！

Answer 7

TDataSet.AfterScroll(DataSet: TDataSet);
var
i:integer;
begin
    if table1.fieldbyname('').asstring='离职'then
    begin
        table2.active:=true;
        table2.edit;
        for i:=0 to table2.recordcount-1 do
        table2.field[i]:=table1.field[i];
        table2.post;
    end;
end;