全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2964
推到 Plurk!
推到 Facebook!

怎樣讀取javascript的返回值?

答題得分者是:QiUiQ_QQT
KFC123_60201
一般會員


發表:58
回覆:18
積分:15
註冊:2006-07-25

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-05-17 07:28:37 IP:139.78.xxx.xxx 訂閱
我在TWebbrowser控件的documentcomplement中加入了以外執行javascript的代碼

var
Doc: IHTMLDocument2;
HTMLWindow: IHTMLWindow2;
javafn: string;
begin
Doc := MyWebBrowser.Document as IHTMLDocument2;
if not Assigned(Doc) then Exit;
HTMLWindow := Doc.parentWindow;
if not Assigned(HTMLWindow) then Exit;
try
javafn := 'function foo() {if (x==''0'') {return 11;} else {return 22;}}';
HTMLWindow.execScript(javafn, 'JavaScript');
except
showmessage('error');
end;
end;

如果單單執行一個javascript的procedure則無問題,但我想知道如何才能在delphi中讀取javascript 函數的返回值?
kernelj
一般會員


發表:0
回覆:1
積分:0
註冊:2008-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-08-12 19:56:14 IP:221.4.xxx.xxx 訂閱
嘗試下在web中增加隱藏域,然后再Delphi中讀取該隱藏域的值。
QiUiQ_QQT
一般會員


發表:0
回覆:1
積分:5
註冊:2004-12-11

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-08-19 16:09:05 IP:121.56.xxx.xxx 訂閱
http://www.cnblogs.com/del/archive/2008/07/30/1256826.html

万老师的博客上有例子,你可以看看。
編輯記錄
QiUiQ_QQT 重新編輯於 2008-08-19 16:11:32, 註解 無‧
系統時間:2024-03-28 17:53:47
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!