初 初学者1 Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-15 #2 procedure TForm1.DBGrid1CellClick(Column: TColumn); for i:=0 to ?do begin dbgrid2.fields:=dbgrid1.fields; end;
procedure TForm1.DBGrid1CellClick(Column: TColumn); for i:=0 to ?do begin dbgrid2.fields:=dbgrid1.fields; end;
Z zhangpg Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-15 #3 var tempstr:string; DBGrid2.datasounce.dataset 为table则 取得tempstr:=DBGrid1.datasounce.dataset.fieldbyname('关键字名称').asstring 再 DBGrid2.datasounce.dataset.fliter='关键字名称=tempstr'; DBGrid2.datasounce.dataset.flited:=true;
var tempstr:string; DBGrid2.datasounce.dataset 为table则 取得tempstr:=DBGrid1.datasounce.dataset.fieldbyname('关键字名称').asstring 再 DBGrid2.datasounce.dataset.fliter='关键字名称=tempstr'; DBGrid2.datasounce.dataset.flited:=true;
萧 萧月禾 Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-15 #4 to zhangpg: DBGrid2.datasounce.dataset.fliter='[关键字名称]='+tempstr; 或 DBGrid2.datasounce.dataset.fliter='[关键字名称]='''+tempstr'''';
to zhangpg: DBGrid2.datasounce.dataset.fliter='[关键字名称]='+tempstr; 或 DBGrid2.datasounce.dataset.fliter='[关键字名称]='''+tempstr'''';
L liuxiaouo Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-16 #5 Query1查询出的数据用DBgrid1显示; 然后在DBgrid1上任一行双击,在DBgrid1 的ondbclick事件里调用DBgrid2所在form 在DBgrid2里显示的是你的答案 前提Bgrid1和DBgrid2的datasource的 dataset属性都设置为query1;
Query1查询出的数据用DBgrid1显示; 然后在DBgrid1上任一行双击,在DBgrid1 的ondbclick事件里调用DBgrid2所在form 在DBgrid2里显示的是你的答案 前提Bgrid1和DBgrid2的datasource的 dataset属性都设置为query1;
R redsky.l Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-16 #6 DBgrid1、DBgrid2对应Table1、 Table2,在Table1的BeforeScroll事件中将当前记录拷贝至 Table2就行了!
W wanfangme Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-16 #8 dbgrid2.datasource:=datasource2; datasource2.dataset:=query1; query2.sql.add ('select * from table where 关键字段=@y')// 在事件中, @y:=query1.fieldbyname('关键字段').asstring;
dbgrid2.datasource:=datasource2; datasource2.dataset:=query1; query2.sql.add ('select * from table where 关键字段=@y')// 在事件中, @y:=query1.fieldbyname('关键字段').asstring;
A Athena@!~ Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-16 #9 当单击 DBGrid1 时,你在数据库中找到单击的 这条记录,然后在 DBGrid2 中显示这条记录即可。 要用两个 Table, 两个 DataSource 控件。
C chenlh Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-16 #10 用一个stringgrid显示岂不是更好 afterscroll事件里几行代码就完了
D Derlin Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-17 #11 我看还是在 OnClick 里面写吧, 保险一些,嘻嘻.....