類型不相符 |
尚未結案
|
shelly.hong
一般會員 發表:6 回覆:1 積分:1 註冊:2003-01-10 發送簡訊給我 |
各位大大,請教一下:
為何run到client端的傳參數至server端時會出現類型不相符
client端
procedure test(Sender: TObject);
var
iTaxARID: OleVariant;
begin
iTaxARID := test.GetID;
sResult := DataModule.RemoteServer.AppServer.test1(iTaxARID);
end; function test.GetID : variant;
var SelectedItem : variant;
i : integer;
begin
For i=0 to 2 do
SelectedItem[ i ] := 1;
end;
result := SelectedItem;
end; server端
function test1(iTaxARID: OleVariant): WideString;
var i
begin
i:=0;
showmessage(iTaxARID[i] );
end;
|
jieshu
版主 發表:42 回覆:894 積分:745 註冊:2002-04-15 發送簡訊給我 |
引言: 您的程式碼有點遺漏, sResult不知是何型態, test1 function沒有Result, 您完整的錯誤訊息是什麼, 會不會是test1 function不是在Type Library寫的, 所以不能給Client呼叫. <iFrame src="http://www.coss.com.tw/jieshu/sign.htm" width=400 height=105 scolling="NO" border="0"></iFrame> 震江系統(股)公司: http://www.coss.com.tw/ 捷舒軟體設計坊: http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行 人若為善,福雖未至,禍已遠離 人若為惡,禍雖未至,福已遠離 http://www.taconet.com.tw/jieshu/ |
Ktop_Robot
站務副站長 發表:0 回覆:3511 積分:0 註冊:2007-04-17 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |