R
rjw
Unregistered / Unconfirmed
GUEST, unregistred user!
在WINDWOS XP和WINDOWS 2003中用网页调用thumbctl.displayfile无法显示文件
R
rjw
Unregistered / Unconfirmed
GUEST, unregistred user!
在WINDWOS XP和WINDOWS 2003中用网页调用thumbctl.displayfile无法显示文件
R
rjw
Unregistered / Unconfirmed
GUEST, unregistred user!
thumbctl控件是c:/winnt/system32/webvw.dll中的一个控件，它在WIN98下可以用，在WIN2000下能在网页中使用，在WIN XP和WIN 2003 中不知为什么在网页中显示不出内容，但也没报错，在的DELPHI中通过Import Type Library 可以看到这个控件.
这个问题很急，请各位高手赐教！！！
这个问题很急，请各位高手赐教！！！
C
chenybin
Unregistered / Unconfirmed
GUEST, unregistred user!
册了一下，确实不行，楼主画要不要把间的html发出来看一下
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
<SCRIPT ID=clientEventHandlersJS LANGUAGE=javascript>
<!--
function button1_onclick() {
document.aaa.ThumbCtl1.displayFile("c:/a.bmp"
;
if (bRet) {
alert("成功"
}
//ebViewFolderIcon31.
}
//-->
</SCRIPT>
</HEAD>
<BODY>
<form name=aaa>
<P><INPUT id=button1 type=button value=Button name=button1 LANGUAGE=javascript onclick="return button1_onclick()">
<OBJECT id=ThumbCtl1
data=data:application/x-oleobject;base64,AABlcajo0hGWUgDAT8MIcQADAADYEwAA2BMAAA==
classid=clsid:71650000-E8A8-11D2-9652-00C04FC30871 VIEWASTEXT></OBJECT>
</P>
</form>
</BODY>
</HTML>
他好像只有OnThumbnailRead方法，我的环境是2003
但是在VB里面却正常
Private Sub Command1_Click()
ThumbCtl1.displayFile "c:/a.bmp"
End Sub
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
<SCRIPT ID=clientEventHandlersJS LANGUAGE=javascript>
<!--
function button1_onclick() {
document.aaa.ThumbCtl1.displayFile("c:/a.bmp"
;if (bRet) {
alert("成功"
;}
//ebViewFolderIcon31.
}
//-->
</SCRIPT>
</HEAD>
<BODY>
<form name=aaa>
<P><INPUT id=button1 type=button value=Button name=button1 LANGUAGE=javascript onclick="return button1_onclick()">
<OBJECT id=ThumbCtl1
data=data:application/x-oleobject;base64,AABlcajo0hGWUgDAT8MIcQADAADYEwAA2BMAAA==
classid=clsid:71650000-E8A8-11D2-9652-00C04FC30871 VIEWASTEXT></OBJECT>
</P>
</form>
</BODY>
</HTML>
他好像只有OnThumbnailRead方法，我的环境是2003
但是在VB里面却正常
Private Sub Command1_Click()
ThumbCtl1.displayFile "c:/a.bmp"
End Sub
R
rjw
Unregistered / Unconfirmed
GUEST, unregistred user!
这是我的HTML，在2000下可以，在XP，2003下不行
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<body>
<object id=tl classid="clsid:71650000-E8A8-11D2-9652-00C04FC30871" style="width: 150px; height: 150px; margin:1mm" border=1 FileP="E:/tt/template/testtab3.htm" TITLE="testtab3.htm"></object>
<script language="JavaScript">
mytext="c://testgrid2.htm";
var to=document.all.tl;
alert(to);
if (to.displayfile(mytext))
{
alert("have thumbnail"
}
</script>
<INPUT id=HTML1241740 checked type=radio value=Radio name=radiogroup FileP="E:/tt/template/testtab3.htm">
</body>
</HTML>
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<body>
<object id=tl classid="clsid:71650000-E8A8-11D2-9652-00C04FC30871" style="width: 150px; height: 150px; margin:1mm" border=1 FileP="E:/tt/template/testtab3.htm" TITLE="testtab3.htm"></object>
<script language="JavaScript">
mytext="c://testgrid2.htm";
var to=document.all.tl;
alert(to);
if (to.displayfile(mytext))
{
alert("have thumbnail"
;}
</script>
<INPUT id=HTML1241740 checked type=radio value=Radio name=radiogroup FileP="E:/tt/template/testtab3.htm">
</body>
</HTML>
C
chenybin
Unregistered / Unconfirmed
GUEST, unregistred user!
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<body>
<object id=tl classid="clsid:71650000-E8A8-11D2-9652-00C04FC30871" style="width: 150px; height: 150px; margin:1mm" border=1 FileP="E:/tt/template/testtab3.htm" TITLE="testtab3.htm" VIEWASTEXT></object>
<script language="JavaScript">
mytext="c://a.bmp";
var to=document.all.tl;
//alert(to);
if (to.displayfile(mytext))
{
//alert("have thumbnail"
}
</script>
<INPUT id=HTML1241740 checked type=radio value=Radio name=radiogroup FileP="E:/tt/template/testtab3.htm">
</body>
</HTML>
显示很正常，里面放了一个bmp文件，没有问题，放jpg也可以，不过很奇怪，word和网页显示不了
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<body>
<object id=tl classid="clsid:71650000-E8A8-11D2-9652-00C04FC30871" style="width: 150px; height: 150px; margin:1mm" border=1 FileP="E:/tt/template/testtab3.htm" TITLE="testtab3.htm" VIEWASTEXT></object>
<script language="JavaScript">
mytext="c://a.bmp";
var to=document.all.tl;
//alert(to);
if (to.displayfile(mytext))
{
//alert("have thumbnail"
;}
</script>
<INPUT id=HTML1241740 checked type=radio value=Radio name=radiogroup FileP="E:/tt/template/testtab3.htm">
</body>
</HTML>
显示很正常，里面放了一个bmp文件，没有问题，放jpg也可以，不过很奇怪，word和网页显示不了
R
rjw
Unregistered / Unconfirmed
GUEST, unregistred user!
在WIN 2003和WIN XP下显示正常吗？我这边，试过几个计算机，只在2000下显示正常，在XP，2003下显示为空白
C
chenybin
Unregistered / Unconfirmed
GUEST, unregistred user!
楼主可能要放弃了，显示图片文件没有问题，但是htm文件就有问题
Private Sub Command1_Click()
ThumbCtl1.displayFile "c:/a.htm"
End Sub
我的用法错了？
Private Sub Command1_Click()
ThumbCtl1.displayFile "c:/a.htm"
End Sub
我的用法错了？
老
老人家
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
begin
ThumbCtl1.displayFile('c:/sample.htm');
end;
procedure TForm1.ThumbCtl1ThumbnailReady(Sender: TObject);
var
Bmp1:TBitmap;
begin
Bmp1:=TBitmap.create;
Bmp1.Width:=ThumbCtl1.width;
Bmp1.Height:=ThumbCtl1.Height;
ThumbCtl1.PaintTo(Bmp1.Canvas,0,0);
Bmp1.SaveToFile('c:/temp.bmp');
end;
begin
ThumbCtl1.displayFile('c:/sample.htm');
end;
procedure TForm1.ThumbCtl1ThumbnailReady(Sender: TObject);
var
Bmp1:TBitmap;
begin
Bmp1:=TBitmap.create;
Bmp1.Width:=ThumbCtl1.width;
Bmp1.Height:=ThumbCtl1.Height;
ThumbCtl1.PaintTo(Bmp1.Canvas,0,0);
Bmp1.SaveToFile('c:/temp.bmp');
end;
R
rjw
Unregistered / Unconfirmed
GUEST, unregistred user!
你们说的我都知道,但在XP,2003下是用不了的,,在2000下也只是在网页中可以使用,不知是什么原因,是否有什么方法可以在XP,2003下实现与2000下相同的效果,如果实在不行又是什么原因,是WINDOWS各版本之间相互不兼容吗