我的Dhtml总是提示,不支持此接口.!!!
MailDhtml.DocumentHTML:='<html><body></body></html>';
self.MailDhtml.DocumentHTML :='HtmlBuffer.htm'
都不行.你有Dhtml的例子吗发给我一个[email protected]最好是delphi 2005的.
MailDhtml.DocumentHTML:='<html><body></body></html>';
self.MailDhtml.DocumentHTML :='HtmlBuffer.htm'
都不行.你有Dhtml的例子吗发给我一个[email protected]最好是delphi 2005的.
解决方案 »
- "Access violation at address 400057B0 in module 'rtl70.bpl'."
- 请问关闭adoconnection后,再次打开连接时为何会出现'OLE error 80030002'错误!急~~~~~~~~~~~~~~~~~~~~~~~~~~~!!
- 如何在DELPHI中打开WORD文档?
- 如何把字符串类型转换为money类型插入数据表中
- combobox的问题
- virtual , dynamic, override的区别是什么??简单问题
- TreeView1 与 ListView1 之间节点的同步问题
- 如何获得本地的IP地址?在线等待 急 急 急
- 数组,结构体 ,大侠们帮帮忙啊
- idftp 如何指定下载分块文件,就是多线程,get中没这个参数啊,(高人来呀)
- 如何获取一个网段内所有存在的计算机的ip地址
- 如何向指定的Word文件或模板中存在的表格中插入数据
知道这个问题原因所在的人并不多的~_~任何机器只要安装MS的补丁KB891781后,DHTML就动不了的!
现在的XPSP2,2003SP1等都内含那个补丁,所以DOM接口用不了的没有办法了么??有的,呵呵首先,保存Delphi系统下的OleCtrls.Pas到你的程序所在目录
然后修改部分代码,增加IOleContainer接口TOleControl = class(TWinControl, IUnknown, IOleClientSite,
IOleControlSite, IOleInPlaceSite, IOleInPlaceFrame, IDispatch,
IPropertyNotifySink, ISimpleFrameSite, IOleContainer)//IOleContainer
function EnumObjects(grfFlags: Longint; out Enum: IEnumUnknown):
HResult; stdcall;
function LockContainer(fLock: BOOL): HResult; stdcall;
function ParseDisplayName(const bc: IBindCtx; pszDisplayName:
POleStr; out chEaten: Longint; out mkOut: IMoniker): HResult; stdcall;function TOleControl.EnumObjects(grfFlags: Integer;
out Enum: IEnumUnknown): HResult;
begin
Result := E_NOTIMPL;
end;function TOleControl.LockContainer(fLock: BOOL): HResult;
begin
Result := E_NOTIMPL;
end;function TOleControl.ParseDisplayName(const bc: IBindCtx;
pszDisplayName: POleStr; out chEaten: Integer;
out mkOut: IMoniker): HResult;
begin
Result := E_NOTIMPL;
end;并修改
function TOleControl.GetContainer(out container: IOleContainer):
HResult;
begin
container:= Self;
Result:= S_OK;
end;做完以上修改后,DHTML就又能使用的:)
然后编译的吗?我用得好好的,呵呵如果你不想自己弄,直接下载http://lysoft.lz169.com/LYSoft/DHTML.rar
Type Library嘛,呵呵