高手请进,ADOStoredProc参数问题，在线等.....

[yltest]

var
exam_subject,course_code :string;
blank1,blank2,blank3 :integer;
.
.
.
.
ADOStoredProc1.Parameters.Clear;
ADOStoredProc1.Parameters.CreateParameter('@tablename',ftstring,Pdinput,20,self.Edit1.Text);
ADOStoredProc1.Parameters.CreateParameter('@exam_subject',ftstring,Pdinput,20,exam_subject);
ADOStoredProc1.Parameters.CreateParameter('@course_code',ftstring,Pdinput,20,course_code);
ADOStoredProc1.Parameters.CreateParameter('@blank1',ftinteger,Pdinput,4,blank1);

.
.
.


提示:应用程序目前操作所使用的值的类型不正确!!!
跟踪时错在最后一句
ADOStoredProc1.Parameters.CreateParameter('@blank1',ftinteger,Pdinput,4,blank1);
什么原因?

[xiaocha]

检查StoreProc的@blank1的类型是否是 int，input

[yltest]

检查过了还是那个错误提示

[yltest]

ADOStoredProc1.Parameters.CreateParameter'@course_code',ftstring,Pdinput,20,course_code);有错!!!痛苦

[yltest]

高手们哪去了?

[stdcall]

先ADOStoredProc1.Parameters.Refresh;下
在给参数符值就可以了