O
oldsheep35
Unregistered / Unconfirmed
GUEST, unregistred user!
用了DhtmlEdit开发了这么久，终于受不了了！深入开发下去。问题越来越多。
以下是个人总结的一些问题：
1：
代码如下
AllImage := IHTMLDocument2(DHTMLEdit1.DOM).images;
For i := 0 to AllImage.length -1 do
begin
Vi := AllImage.item(i,varempty);
TempStr := vi.href;
//TempStr显示的有时是完整路径，有时是相对路径的（天哪你到底是黑是白呀）
......
end;
2：
代码如下
While DHTMLEdit1.Busy do
Application.ProcessMessages;
DHTMLEdit1.SaveDocument(varFileName);
While DHTMLEdit1.Busy do
Application.ProcessMessages;
DHTMLEdit1.LoadDocument(varFileName);
首先输入全部是英文的文档，处理下面的代码，保存后打开，
然后再新建编辑含中文的文档，保存后依然处理上面的代码，那么中文将显示为乱码！
3：从Word拷贝（Ctrl+C，Ctrl+V）过来的文本，几乎无法再进行设置字体，原因是没有Word拷贝过来的不仅仅是文字。还有N多的脚本在里面。
4：在某些机器启动程序要调用office2000的安装。但安装MSDN的方法
ShellExecute(0, 'Open', 'msiexec', Pchar('/i '+sProductID+' /qb- REMOVE=HTMLSourceEditing'),nil, SW_HIDE);
仍然没有效果，难道我的office是盗版的原因？（此问题极度郁闷，发现注册表根本找不到office2000的ProductID，肯定是没有效果的）
这DhtmlEdit的问题怎么这么多，真希望微软能给个解释！也希望研究DhtmlEdit的DFW来共同攻关！
以下是个人总结的一些问题：
1：
代码如下
AllImage := IHTMLDocument2(DHTMLEdit1.DOM).images;
For i := 0 to AllImage.length -1 do
begin
Vi := AllImage.item(i,varempty);
TempStr := vi.href;
//TempStr显示的有时是完整路径，有时是相对路径的（天哪你到底是黑是白呀）
......
end;
2：
代码如下
While DHTMLEdit1.Busy do
Application.ProcessMessages;
DHTMLEdit1.SaveDocument(varFileName);
While DHTMLEdit1.Busy do
Application.ProcessMessages;
DHTMLEdit1.LoadDocument(varFileName);
首先输入全部是英文的文档，处理下面的代码，保存后打开，
然后再新建编辑含中文的文档，保存后依然处理上面的代码，那么中文将显示为乱码！
3：从Word拷贝（Ctrl+C，Ctrl+V）过来的文本，几乎无法再进行设置字体，原因是没有Word拷贝过来的不仅仅是文字。还有N多的脚本在里面。
4：在某些机器启动程序要调用office2000的安装。但安装MSDN的方法
ShellExecute(0, 'Open', 'msiexec', Pchar('/i '+sProductID+' /qb- REMOVE=HTMLSourceEditing'),nil, SW_HIDE);
仍然没有效果，难道我的office是盗版的原因？（此问题极度郁闷，发现注册表根本找不到office2000的ProductID，肯定是没有效果的）
这DhtmlEdit的问题怎么这么多，真希望微软能给个解释！也希望研究DhtmlEdit的DFW来共同攻关！