DELPHI如何调用页面里的JS
答案:1 悬赏:10 手机版
解决时间 2021-03-20 00:28
- 提问者网友：不爱我么
- 2021-03-19 20:11
DELPHI如何调用页面里的JS
最佳答案
- 五星知识达人网友：等灯
- 2021-03-19 20:56
var
js: OleVariant;
str: string;
begin
js := CreateOleObject('ScriptControl'); // 创建组件
js.Language := 'JavaScript'; // 指定组件所使用的语言，也可以是VBScript
js.AddCode(Memo1.Text); // 加入JS代码，如上面的代码
str := js.Eval('getTime()');// getTime() function from JS
ShowMessage(str);
end;
Memo1.text内容
function getTime(){
var d, s = "";
var c = "";
d = new Date();
s += d.getYear()+c;
s += (d.getMonth() + 1) + c;
s += d.getDate() + c;
s += d.getHours() + c;
s += d.getMinutes() + c;
s += d.getSeconds() + c;
s += d.getMilliseconds();
return s;
}
js: OleVariant;
str: string;
begin
js := CreateOleObject('ScriptControl'); // 创建组件
js.Language := 'JavaScript'; // 指定组件所使用的语言，也可以是VBScript
js.AddCode(Memo1.Text); // 加入JS代码，如上面的代码
str := js.Eval('getTime()');// getTime() function from JS
ShowMessage(str);
end;
Memo1.text内容
function getTime(){
var d, s = "";
var c = "";
d = new Date();
s += d.getYear()+c;
s += (d.getMonth() + 1) + c;
s += d.getDate() + c;
s += d.getHours() + c;
s += d.getMinutes() + c;
s += d.getSeconds() + c;
s += d.getMilliseconds();
return s;
}
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯