使用TSQLConnection与TSimpleDataSet的问题(100分)

  • 主题发起人 主题发起人 sanhoot
  • 开始时间 开始时间
S

sanhoot

Unregistered / Unconfirmed
GUEST, unregistred user!
在窗口中放入一个TSQLConnection1(scnn1)与两个TSimpleDataSet(sds1,sds2)
双击scnn1设置其连到Interbase数据库(如系统的EMPLOYEE.GDB),测试连接成功。
设置sds1,sds2的Connection为scnn1,
设置sds1的DataSet.CommandText为select * from EMPLOYEE
设置sds2的DataSet.CommandText为select * from JOB where JOB_CODE=:JOB_CODE
然后点击sds2.DataSet.Params后面的“...”,设置参数JOB_CODE的DataType为ftString,ParamType为ptInput

在窗体上再放置两组TDataSource,TDBNavigator,TDBGrid分别为(ds1,dn1,dg1;ds2,dn2,dg2)分别连到sds1和sds2

在sds1的AfterScroll输入下面语句:
try
self.sds2.Active:=false;
self.sds2.DataSet.Params.ParamByName('JOB_CODE').Value:=self.sds1.fieldbyname('JOB_CODE').Value;
self.sds2.Active:=true;
except
on exception do
end;
[?][?]
问题:
不管怎么操作dn1,dg1,在dg2就是没有任何数据
按我本意是要在dg2显示dg1当前记录的JOB_CODE的详细内容的

[:D][:D]请哪位大哥大姐给指导一下
[:)][:)]不胜感激!!

注:数据库为系统的"./Program Files/Common Files/Borland Shared/Data/EMPLOYEE.GDB"
 
兄弟:
设定SD2中设定MasterSource为DataSource1,在设定MasterFeildsDetail Fields 和Master Field中的字段,添加,不必书写语句即可自动实现。
 
多谢2楼的老兄
你的方法确实很高效

不过我的问题出现在哪里呢
有谁能为我指出
谢谢!!
 
接受答案了.
 
后退
顶部