Delphi7与Delphi5中的內部函數是不是不同啊？(請版主將前一個發言刪去) |
|
尚未結案
|
|
Black Knight
一般會員   發表：6 回覆：8 積分：2 註冊：2003-04-24 發送簡訊給我 |
我用Delphi5編譯李維的《Delphi 5.x 分布式多層應用系統篇》中的例程，一切OK。可是換了Delphi7后，在做第二章的DynamicSQLDemo例程時，總是在編譯的時候報錯 procedure TDynamicSQLDemoServer.GetAllTables(var vTables: OleVariant);
var
tblList : TStringList;
iCount : Integer;
begin
try
tblList := TStringList.Create;
adocDSQL.GetTableNames(tblList);
vTables := VarArrayCreate([0, tblList.Count - 1], varVariant);
for iCount := 0 to tblList.Count - 1 do
begin
vTables[iCount] := tblList.Strings[iCount];
end;
finally
tblList.Free;
end;
end; ---------------------------------------------------------------------------------
[Warning] PDynamicSQLDemo_TLB.pas(208): Unsafe type 'LicenseKey: Pointer'
[Warning] PDynamicSQLDemo_TLB.pas(211): Unsafe code '@ operator'
[Error] urdmDynamicSQLServer.pas(50): Undeclared identifier: 'VarArrayCreate'
[Fatal Error] PDynamicSQLDemo.dpr(7): Could not compile used unit 'urdmDynamicSQLServer.pas' 請指教這倒底是怎么回事，如何解決？
|
|
Justmade
版主  發表：94 回覆：1934 積分：2030 註冊：2003-03-12 發送簡訊給我 |
|
|
bebooo
一般會員 發表：8 回覆：11 積分：3 註冊：2002-04-15 發送簡訊給我 |
|
|
Ktop_Robot
站務副站長 發表：0 回覆：3511 積分：0 註冊：2007-04-17 發送簡訊給我 |
發表時間：2003-04-29 22:03:16
IP:218.94.xxx.xxx 未訂閱
系統時間：2024-05-04 5:02:07
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |