主题:[讨论]此类问题如何解决 (高分区)
我Dephi7开发数据库,编译的时候没有问题,运行的时候经常会弹出下面的对话筐,然后连接数据库就找不到参数了。如何解决此类问题。
我仿造你们的<Dephi数据库案例分析>第二章设计如下程序:
在类mydata中放有ADOconnection 控件的name为 cnn
在 Form1中onshow事件中进行连接数据库:
mydata.cnn.connectstring:='^^^^^^^';//连接代码此省列了
mydata.cnn.open;
在Form2 的onshow事件中
ADOStoredproc1.close;
ADOStoredproc1.proedureName:='yy';//yy是存储过程名称
…………//提供参数的代码就省列了
ADOStoredproc1.parameters.……('@jb').value:=2;
ADOStoredproc1.connection:=mydata.cnn;
ADOStoredproc1.open;
DataSource1.Dataset:=ADOStoredproc1;
DBGrid1.DataSourcs:=DataSource1
end;
在DBGrid1双击事件中
ADOStoredproc2.close;
ADOStoredproc2.proedureName:='yy';
ADOStoredproc2.parameters.……('@jb').value:=1;
ADOStoredproc2.parameters.……('@hh').value:=trim(ADOStoredproc1.fields[2].value);
ADOStoredproc2.connection:=mydata.cnn;
ADOStoredproc2.open;
i:=ADOStoredproc2.parameters.CreateParamete('@fs',ftwidestring,pdOutPut,50,str);
DataSource2.Dataset:=ADOStoredproc2;
DBGrid2.DataSourcs:=DataSource2
end;
DBGrid1能正常显示数据,双击DBGrid1时出现如下对话窗口:
---------------------------
Debugger Exception Notification
---------------------------
Project ykglxt.exe raised exception class EAccessViolation with message 'Access violation at address 00D264D5 in module 'msado15.dll'. Read of address 00000008'.
Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
能够帮我修改一下程序吗参考吗???我在此非常感谢你们的!!!!!@
我仿造你们的<Dephi数据库案例分析>第二章设计如下程序:
在类mydata中放有ADOconnection 控件的name为 cnn
在 Form1中onshow事件中进行连接数据库:
mydata.cnn.connectstring:='^^^^^^^';//连接代码此省列了
mydata.cnn.open;
在Form2 的onshow事件中
ADOStoredproc1.close;
ADOStoredproc1.proedureName:='yy';//yy是存储过程名称
…………//提供参数的代码就省列了
ADOStoredproc1.parameters.……('@jb').value:=2;
ADOStoredproc1.connection:=mydata.cnn;
ADOStoredproc1.open;
DataSource1.Dataset:=ADOStoredproc1;
DBGrid1.DataSourcs:=DataSource1
end;
在DBGrid1双击事件中
ADOStoredproc2.close;
ADOStoredproc2.proedureName:='yy';
ADOStoredproc2.parameters.……('@jb').value:=1;
ADOStoredproc2.parameters.……('@hh').value:=trim(ADOStoredproc1.fields[2].value);
ADOStoredproc2.connection:=mydata.cnn;
ADOStoredproc2.open;
i:=ADOStoredproc2.parameters.CreateParamete('@fs',ftwidestring,pdOutPut,50,str);
DataSource2.Dataset:=ADOStoredproc2;
DBGrid2.DataSourcs:=DataSource2
end;
DBGrid1能正常显示数据,双击DBGrid1时出现如下对话窗口:
---------------------------
Debugger Exception Notification
---------------------------
Project ykglxt.exe raised exception class EAccessViolation with message 'Access violation at address 00D264D5 in module 'msado15.dll'. Read of address 00000008'.
Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
能够帮我修改一下程序吗参考吗???我在此非常感谢你们的!!!!!@