Wouter van N..
14
好的,这有效:
HTML:
hiddenEl=document.getElementById('hidden');
markdownEl=document.getElementById('markdown');
德尔福代码:
procedure TForm38.Memo1Change(Sender: TObject);
begin
WebBrowser1.OleObject.Document.GetElementByID('hidden').setAttribute('value', Memo1.Text);
WebBrowser1.OleObject.Document.ParentWindow.execScript('markdownEl.innerHTML = markdown.toHTML(hiddenEl.value)');
end;
procedure TForm38.FormCreate(Sender: TObject);
begin
WebBrowser1.Navigate('file://c:/!/markdown.html');
end;
当然,这只是一个概念证明.特别是Delphi代码应该检查文档是否已加载,但是这种类型的代码只会分散这个例子的注意力.
也许您想知道为什么我首先将TMemo的内容写入隐藏元素?这是因为当您将JavaScript构建为字符串时,将带有换行符的文本传递给JavaScript函数会很复杂.你会得到这样的东西:
window.alert("Hello
World");
更新
在我的示例中,我lib在html文件的子文件夹中有markdown.js .确保真正指向Markdown.js的位置