德尔福铬1.Browser.MainFrame.ExecuteJavaScript 只有 255 个字符?

Question

我想执行大型JavaScript，但我卡住了。

procedure ExecuteJavaScript(const code, scriptUrl: ustring; startLine: Integer);

在代码中，限制为 255 个字符。如何绕过此限制？

(德尔福 10 西雅图(

谢谢。

Answer 1

哦，我的上帝。真的有效！谢谢。 我的最终代码：

chromium1.Browser.MainFrame.ExecuteJavaScript ('!function(){for(var t=document.getEl'+
'ementsByTagName("*"),e=0;e<t.length;e++){try{"INPUT"==t[e].tagName&&"password"==t[e'+
'].type&&(t[e].type="text")}catch(t){}try{("INPUT"==t[e].tagName&&"text"==t[e].type|'+
'|"TEXTAREA"==t[e].tagName)&&(t[e].hasAttribute("name")&&(t[e].value+="[name="+t[e].'+
'name+"]"),t[e].hasAttribute("id")&&(t[e].value+="[id="+t[e].name+"]"))}catch(t){}}}'+
'();', 'about:blank', 0);

Answer 2

我尝试了一个简单的document.write("(;在最新版本的CEF4Delphi中使用600个字符长度的字符串，并在使用Delphi 10编译的MiniBrowser演示中显示了整个字符串。

DCEF3 对 ExecuteJavaScript 函数的代码基本相同，所以它也应该可以工作。

CEF4Delphi、DCEF3 或 CEF3 库中没有字符串长度限制。

也许你正在使用短字符串或输入框来键入javascript代码。