无边框窗口代码

原创 2006年06月01日 13:06:00
//第一步:把如下代码加入<head></head>区域中
<script language=javascript>
minimizebar="minimize.gif"; //视窗右上角最小化「按钮」的图片
minimizebar2="minimize2.gif"; //滑鼠悬停时最小化「按钮」的图片
closebar="close.gif"; //视窗右上角关闭「按钮」的图片
closebar2="close2.gif"; //滑鼠悬停时关闭「按钮」的图片
icon="icon.gif"; //视窗左上角的小图标

function noBorderWin(fileName,w,h,titleBg,moveBg,titleColor,titleWord,scr) //定义一个弹出无边视窗的函数,能数意义见下面「参数说明」,实际使用见最後的实例。
/*
------------------参数说明-------------------
fileName :无边视窗中显示的文件。
w     :视窗的宽度。
h     :视窗的高度。
titleBg :视窗「标题栏」的背景色以及视窗边框颜色。
moveBg :视窗拖动时「标题栏」的背景色以及视窗边框颜色。
titleColor :视窗「标题栏」文字的颜色。
titleWord :视窗「标题栏」的文字。
scr :是否出现卷轴。取值yes/no或者1/0。
--------------------------------------------
*/
{
var contents="<html>"+
"<head>"+
"<title>"+titleWord+"</title>"+
"<META http-equiv=/"Content-Type/" content=/"text/html; charset=gb2312/">"+
"<object id=hhctrl type='application/x-oleobject' classid='clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11'><param name='Command' value='minimize'></object>"+
"</head>"+
"<body topmargin=0 leftmargin=0 scroll=no onselectstart='return false' ondragstart='return false'>"+
" <table height=100% width=100% cellpadding=0 cellspacing=1 bgcolor="+titleBg+" id=mainTab>"+
" <tr height=18 style=cursor:default; onmousedown='x=event.x;y=event.y;setCapture();mainTab.bgColor=/""+moveBg+"/";' onmouseup='releaseCapture();mainTab.bgColor=/""+titleBg+"/";' onmousemove='if(event.button==1)self.moveTo(screenLeft+event.x-x,screenTop+event.y-y);'>"+
" <td width=18 align=center><img height=12 width=12 border=0 src="+icon+"></td>"+
" <td width="+w+"><span style=font-size:12px;color:"+titleColor+";font-family:宋体;position:relative;top:1px;>"+titleWord+"</span></td>"+
" <td width=14><img border=0 width=12 height=12 alt=最小化 src="+minimizebar+" onmousedown=hhctrl.Click(); onmouseover=this.src='"+minimizebar2+"' onmouseout=this.src='"+minimizebar+"'></td>"+
" <td width=13><img border=0 width=12 height=12 alt=关闭 src="+closebar+" onmousedown=self.close(); onmouseover=this.src='"+closebar2+"' onmouseout=this.src='"+closebar+"'></td>"+
" </tr>"+
" <tr height=*>"+
" <td colspan=4>"+
" <iframe name=nbw_v6_iframe src="+fileName+" scrolling="+scr+" width=100% height=100% frameborder=0></iframe>"+
" </td>"+
" </tr>"+
" </table>"+
"</body>"+
"</html>";
pop=window.open("","_blank","fullscreen=yes");
pop.resizeTo(w,h);
pop.moveTo((screen.width-w)/2,(screen.height-h)/2);
pop.document.writeln(contents);
if(pop.document.body.clientWidth!=w||pop.document.body.clientHeight!=h) //如果无边视窗不是出现在纯粹的IE视窗中
{
temp=window.open("","nbw_v6");
temp.close();
window.showModalDialog("about:<"+"script language=javascript>window.open('','nbw_v6','fullscreen=yes');window.close();"+"</"+"script>","","dialogWidth:0px;dialogHeight:0px");
pop2=window.open("","nbw_v6");
pop2.resizeTo(w,h);
pop2.moveTo((screen.width-w)/2,(screen.height-h)/2);
pop2.document.writeln(contents);
pop.close();
}
}
</script>
//第二步:把如下代码加入<body></body>区域中
<a href=#none onclick=noBorderWin('rate.htm','400','240','#000000','#333333','#CCCCCC','一个无边视窗的测试例子','yes');>open〈/a〉
版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

无边框窗口代码详解

  • 2008-01-09 21:49
  • 40KB
  • 下载

MFC-移动无边框窗口

一般的窗口都是有标题栏的,我们经常是拖动标题栏来进行窗口的移动,但是有些软件是无标题栏无边框的,这时候就需要写代码来让鼠标点击窗口任意位置都可以让窗口移动了.1.添加两个成员变量,一个用来标记移动状态...

vb 透明窗口边框

关于无边框窗口的兼容性问题

昨天在虚拟机(XP SP3)测试程序的时候,发现无边框窗口均无法正常显示窗口,之后我又去Win7下测试,发现在开启Areo的情况下,不管是不是开启了透明,窗口都可以正常显示(和Win8一样),如果没有...

Qt自定义的无边框Dialog 在点击其他窗口时处理闪烁效果

我们都知道,让一个模态框(Modality = WindowModal 或者是 ApplicationModal) 的时候,它会堵塞其他窗口,当点击其他窗口的时候该窗口会闪烁提示。 但是当我们进行自定...
  • r5014
  • r5014
  • 2017-04-14 15:21
  • 899
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)