線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1324
推到 Plurk!
推到 Facebook!

D 2007 dbExpress sybase SQLStoredProc 控件问题

缺席
传说中的虫
一般會員


發表:1
回覆:2
積分:0
註冊:2006-12-20

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-03-11 14:25:05 IP:60.160.xxx.xxx 訂閱
环境:Delphi 2007 Update4  sybase ASE 12.5

在主窗体中创建了数据连接,调用 DLL 中的窗体A ,并把数据连接传入到 窗体A中
InvokeExDiscount = function(App : TApplication; Scr : TScreen; var dbConnect : TSQLConnection; var aDLnkLst : TtdDoubleLinkList) : TForm; StdCall;

在 DLL 中,使用 SQLStoredProc1 , SQLStoredProc1.SQLConnection 为传入 dbConnect ,
在调用存储过程时 报 Field 'PARAM_POSITION' not found 这个错误。(存储过程正常)

另:该过程以前使用Update 2 编译,正常使用。
还有就是在DLL里直接创建一个新的 TSQLConnection ,并调用该存储过程,就能正常了。。。
这个是不是原代码的问题。


调用代码
with SQLStoredProc2 do begin
Close;
Params.Clear;
SchemaName := 'dbo';
StoredProcName := 'Yan_zkcx';

// Params.CreateParam(ftInteger, 'RETURN_VALUE', ptOutput);
Params.CreateParam(ftTimeStamp,
'@SDate', ptInput);
Params.CreateParam(ftTimeStamp,
'@EDate', ptInput);
Params.CreateParam(ftFixedChar,
'@Market', ptInput);

Params.ParamByName('@SDate').Value := DTP1.DateTime;
Params.ParamByName('@EDate').Value := DTP2.DateTime;
Params.ParamByName('@Market').Value := Copy(CBMarket.Text, Length(CBMarket.Text) - 4, 4);

Open;
end;
編輯記錄
传说中的虫 重新編輯於 2008-03-11 14:27:21, 註解 無‧
传说中的虫 重新編輯於 2008-03-11 14:28:04, 註解 無‧
传说中的虫 重新編輯於 2008-03-12 15:53:44, 註解 無‧
传说中的虫
一般會員


發表:1
回覆:2
積分:0
註冊:2006-12-20

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-03-13 11:12:28 IP:60.160.xxx.xxx 訂閱
 
带包 dcldbx4100.bpl 编译就好了。
系統時間:2024-05-16 22:03:14
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!