我需要更新delphi7中的浏览器设计。我使用的是twebbrowser,但他在javascript和导航方面有很多问题。。所以我决定迁移到Chromium。问题是我找不到这些组件的代码。有人知道哪个命令与tchromium中的这个命令等效吗:
OleObject.Document.all.Item ('ElementbyId', 0) .value: = 'edit1.text';
我需要将文本从备忘录转移到html格式的文本区域,并在最后点击html格式上的按钮。如果有人知道这些命令并可以分享,我很感激。
一个比DOM访问更灵活的替代方案是在Javascript中使用TChromium的ExecuteJavaScript方法执行此操作。
根据您的摘要描述,JS可能类似于
document.getElementById('yourtextarea').value = <JSON stringified content of your memo>;
document.getElementById('yourform').submit();
或者,你可以在HTML中实现一个JS函数,并用ExecuteJavascript调用它,这样在Delphi端就不会有任何特定的东西(除了函数名(,HTML也可以自由发展。
function setTextAreaAndSubmit(value) {
document.getElementById('yourtextarea').value = value;
document.getElementById('yourform').submit();
}