兄弟我的dhtmledit的程序打开html的文件,为什么看不到图片呀.怎么解决.
解决方案 »
- 怎样再次启动已经执行完的线程?
- 我想使用鍵盤enter?怎么辦?沒分了,無奈。下次一定记的回帖的人補分給你們。
- Object Pascal 的接口函数
- 用SetwindowPos将一个窗口HWND_TOPMOST之后怎么变成正常(不是最前的)的窗口啊?
- 关于string的问题
- delphi怎样给数据库动态添加字段
- 请教,如何直接操作并口打印机,而无需经过驱动程序?最好有例子
- Delphi DBGrid中能否对其中的Cell设置只读属性?是Cell(单元格)不是Column,请帮忙!
- 关于pascal语言的问题 6
- 请问如何在改变窗体时,可以时各种控件的位置等倍放大
- 急问一个问题...,与定时器有关
- 巨难问题,高分求教:利用ICS的FTP下载文件,每隔396X个文件就报无法下载
一个是浏览模式,一个是编辑模式(这个需要图片保存在本地的,才可以看的)检查你的HTML源码,看看图片连接是否无效,是否在本地:)
DHTML我用得好好的,并不存在图片不能浏览编辑的问题用DHTML的HrExecCommand(IDM_IMAGE, True, True, False, NilVariant)插入图片的方法来看看
vo := DOMInterface.Selection.CreateRange;
vo.pasteHTML(''); // clear selected data
vo.pasteHTML('<IMG src="' + Filename + '">');也可以用用
一段html的代码打开的.picture就是不显示.
procedure THTMLEdit.LoadFromFile(const Filename : String);
var
pVIn : OleVariant;
Prompt : OleVariant;
begin
pVIn := Filename;
Prompt := False;
DHTML.LoadDocument(pVIn, Prompt);
DocComplete := False;
end;
直接赋值不行的
if 0 = hHTMLText then RaiseLastWin32Error;
CopyMemory(Pointer(hHTMLText), PChar(Html), Length(Html));
OleCheck(CreateStreamOnHGlobal(hHTMLText, True, Stream));
try
OleCheck(DHTML.Document.QueryInterface(IPersistStreamInit, psi));
try
OleCheck(psi.InitNew);
OleCheck(psi.Load(Stream));
finally
psi := nil;
end;
finally
Stream := nil;
end;具体自己研究研究吧