F
fuxin198311
Unregistered / Unconfirmed
GUEST, unregistred user!
我在窗体中放入两个dbgrid表控件 我是要想用两个dbnavigator来控制两个表 为了窗体的美观 我把两个dbnavigator放在一起 当我对表一操作时dbnavigator2不可见 相反对表二操作时dbnavigator1不可见 我的代码是这样的 不行 这个怎么实现呢
procedure TT1080Form.DBGrid2CellClick(Column: TColumn);
begin
dbnavigator2.Visible:=false;
dbnavigator2.datasoure:=datasource2;
end;
procedure TT1080Form.DBGrid2CellClick(Column: TColumnEh);
begin
dbnavigator1.Visible:=false;
dbnavigator1.datasoure:=datasource1;
end;
procedure TT1080Form.DBGrid2CellClick(Column: TColumn);
begin
dbnavigator2.Visible:=false;
dbnavigator2.datasoure:=datasource2;
end;
procedure TT1080Form.DBGrid2CellClick(Column: TColumnEh);
begin
dbnavigator1.Visible:=false;
dbnavigator1.datasoure:=datasource1;
end;