DLL 調用問題 ? |
|
尚未結案
|
|
dialog
一般會員   發表：33 回覆：18 積分：10 註冊：2002-09-07 發送簡訊給我 |
type
TFS=function(H:THandle,a:pchar):TAdoQuery;stdcall;
var
FS:TFS;
H:hwnd;
S:TAdoQuery;
C:stirng;
begin
try
H:=LoadLibrary('D.dll');
@FS:=getprocaddress(H,'F');
S:=FS(Handle,'select F1,F2 from table1'); c:=S.fieldbyname('F1').AsString; FreeLibrary(H);
except
showmessage('aaaa');
end;
end; DLL文件返回一個 TAdoQuery﹐執行的是編譯后的 EXE 文件﹐以下不解請教﹕
1. 執行完后出現錯誤框﹐ "Access Violaton at address 00404704 in module project1.exe . Read of address 025cc4A0"
如果不要 c:=S.fieldbyname('F1').AsString; 不會出現錯誤 2. 為什么錯誤提示不是 "aaaa" ?
|
|
wyndog
資深會員  發表：7 回覆：362 積分：348 註冊：2004-10-12 發送簡訊給我 |
發表時間：2005-06-17 18:46:01
IP:219.133.xxx.xxx 未訂閱
系統時間：2024-06-29 22:10:10
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |