社区
ASP
帖子详情
颜色选择对话框控件的紧急问题,请大家帮忙!
zqrhero
2002-09-27 02:04:38
这是颜色选择对话框控件
<object name=dlg CLASSID="CLSID:F9043C85-F6F2-101A-A3C9-08002B2F49FB"></object>
<input type=button onclick=dlg.showColor() value=showColor>
但是我发现这还是有局限性,在有些客户端的机器上会出现“对象不支持dlg.showColor()的方法”,请问这是怎么一回事?如何解决啊?
...全文
45
3
打赏
收藏
颜色选择对话框控件的紧急问题,请大家帮忙!
这是颜色选择对话框控件 但是我发现这还是有局限性,在有些客户端的机器上会出现“对象不支持dlg.showColor()的方法”,请问这是怎么一回事?如何解决啊?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
zqrhero
2002-09-27
打赏
举报
回复
秋水大哥,你能保证这样无论客户端是Windows的什么版本?都不会在弹出错误吗?
qiushuiwuhen
2002-09-27
打赏
举报
回复
<script>function colorpicker() {colorvalue.value=(0x1000000+dlgHelper.ChooseColorDlg()).toString(16).substr(1);}</script>
<OBJECT id=dlgHelper CLASSID="clsid:3050f819-98b5-11cf-bb82-00aa00bdce0b" WIDTH="0px" HEIGHT="0px"></OBJECT>
<input type="button" value="Color Picker" onclick="colorpicker()"><input type="text" name=colorvalue>
iStringTheory
2002-09-27
打赏
举报
回复
<HTML>
<HEAD>
<TITLE>颜色</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<STYLE TYPE="text/css">
td {font-size: 10.8pt}
body {font-size: 10.8pt}
BUTTON {width:5em}
</STYLE>
<SCRIPT LANGUAGE=JavaScript>
var SelRGB = '';
var DrRGB = '';
var SelGRAY = '120';
var hexch = new Array('0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F');
function ToHex(n)
{ var h, l;
n = Math.round(n);
l = n % 16;
h = Math.floor((n / 16)) % 16;
return (hexch[h] + hexch[l]);
}
function DoColor(c, l)
{ var r, g, b;
r = '0x' + c.substring(1, 3);
g = '0x' + c.substring(3, 5);
b = '0x' + c.substring(5, 7);
if(l > 120)
{
l = l - 120;
r = (r * (120 - l) + 255 * l) / 120;
g = (g * (120 - l) + 255 * l) / 120;
b = (b * (120 - l) + 255 * l) / 120;
}else
{
r = (r * l) / 120;
g = (g * l) / 120;
b = (b * l) / 120;
}
return '#' + ToHex(r) + ToHex(g) + ToHex(b);
}
function EndColor()
{ var i;
if(DrRGB != SelRGB)
{
DrRGB = SelRGB;
for(i = 0; i <= 30; i ++)
GrayTable.rows(i).bgColor = DoColor(SelRGB, 240 - i * 8);
}
SelColor.value = DoColor(RGB.innerText, GRAY.innerText);
ShowColor.bgColor = SelColor.value;
}
</SCRIPT>
<SCRIPT LANGUAGE=JavaScript FOR=ColorTable EVENT=onclick>
SelRGB = event.srcElement.bgColor;
EndColor();
</SCRIPT>
<SCRIPT LANGUAGE=JavaScript FOR=ColorTable EVENT=onmouseover>
RGB.innerText = event.srcElement.bgColor;
EndColor();
</SCRIPT>
<SCRIPT LANGUAGE=JavaScript FOR=ColorTable EVENT=onmouseout>
RGB.innerText = SelRGB;
EndColor();
</SCRIPT>
<SCRIPT LANGUAGE=JavaScript FOR=GrayTable EVENT=onclick>
SelGRAY = event.srcElement.title;
EndColor();
</SCRIPT>
<SCRIPT LANGUAGE=JavaScript FOR=GrayTable EVENT=onmouseover>
GRAY.innerText = event.srcElement.title;
EndColor();
</SCRIPT>
<SCRIPT LANGUAGE=JavaScript FOR=GrayTable EVENT=onmouseout>
GRAY.innerText = SelGRAY;
EndColor();
</SCRIPT>
<SCRIPT LANGUAGE=JavaScript FOR=Ok EVENT=onclick>
window.returnValue = SelColor.value;
window.close();
</SCRIPT>
</HEAD>
<BODY bgcolor=menu>
<div align="center"><center><table border="0" cellspacing="10" cellpadding="0"><tr><td>
<TABLE ID=ColorTable BORDER=0 CELLSPACING=0 CELLPADDING=0 style='cursor:hand'>
<SCRIPT LANGUAGE=JavaScript>
function wc(r, g, b, n)
{
r = ((r * 16 + r) * 3 * (15 - n) + 0x80 * n) / 15;
g = ((g * 16 + g) * 3 * (15 - n) + 0x80 * n) / 15;
b = ((b * 16 + b) * 3 * (15 - n) + 0x80 * n) / 15;
document.write('<TD BGCOLOR=#' + ToHex(r) + ToHex(g) + ToHex(b) + ' height=8 width=8></TD>');
}
var cnum = new Array(1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0);
for(i = 0; i < 16; i ++)
{
document.write('<TR>');
for(j = 0; j < 30; j ++)
{
n1 = j % 5;
n2 = Math.floor(j / 5) * 3;
n3 = n2 + 3;
wc((cnum[n3] * n1 + cnum[n2] * (5 - n1)),
(cnum[n3 + 1] * n1 + cnum[n2 + 1] * (5 - n1)),
(cnum[n3 + 2] * n1 + cnum[n2 + 2] * (5 - n1)), i);
}
document.writeln('</TR>');
}
</SCRIPT>
</TABLE></td><td>
<TABLE ID=GrayTable BORDER=0 CELLSPACING=0 CELLPADDING=0 style='cursor:hand'>
<SCRIPT LANGUAGE=JavaScript>
for(i = 255; i >= 0; i -= 8.5)
document.write('<TR BGCOLOR=#' + ToHex(i) + ToHex(i) + ToHex(i) + '><TD TITLE=' + Math.floor(i * 16 / 17) + ' height=4 width=20></TD></TR>');
</SCRIPT>
</TABLE></td></tr></table></center></div>
<div align="center"><center><table border="0" cellspacing="10" cellpadding="0">
<tr><td rowspan="2" align="center">
选中色彩<table ID=ShowColor border="1" width="40" height="30" cellspacing="0" cellpadding="0">
<tr><td></td></tr></table></td>
<td rowspan="2">基色: <SPAN ID=RGB></SPAN><BR>
亮度: <SPAN ID=GRAY>120</SPAN><BR>
代码: <INPUT TYPE=TEXT SIZE=7 ID=SelColor></td>
<td><BUTTON ID=Ok TYPE=SUBMIT>确定</BUTTON></td></tr>
<tr><td><BUTTON ONCLICK="window.close();">取消</BUTTON></td></tr></table></center></div>
</BODY>
</HTML>
UI和其他
小
问题
,关于树
控件
,选中的
问题
?就是怎么得到当前选中项怎样在标题栏上添加自己的button或其他
控件
请
问显示桌面按钮触发的Windows消息是什么?哪位有像Windows2000任务管理器中性能的那个曲线图的源代码。
控件
中如何...
我在CSDN参与的3000个帖子
2:100分急求,随机输出十个小写字母,但是,要求这十个字母不相同 3:求Sn=a+aa+aaa+…+aaa…a(n个a)之值 4:数组题 望高手
帮忙
! 5:呵呵,来推荐一下我的网站,本站提供大量当今流行的免费的音乐和免费电影,...
电脑小
问题
不求人
电脑小
问题
不求人--鼠标.软驱.打印机.硬盘.风扇.常见事故处理鼠标鼠标的故障分析与维修比较简单,大部分故障为接口或按键接触不良、断线、机械定位系统污垢等原因造成的。少数故障为鼠标内部元器件或电路虚焊造成的...
【10w字】超详细【百分百拿offer】的面试教程,集合5000多家软件测试公司面试题。
本次文档是为了方使各位群友,在面试中遇到的些
问题
,1.2 背景此文档历经3年,基本概括了深圳与广州,上干家公司的面试
问题
并结合程序璃教育软件则试课程结合,编写与整理的面试文档,基本盖了,95%以上的面试
问题
,...
基础
各位兄弟,在SDK编程中如果实现...求助:通过编程DirectX抓屏------>masterz:再麻烦你一下,谢谢熟悉RichEdit的朋友过来看一下,RichEdit的几个
问题
.如何对 I/O 端口进行操作?有了该
问题
就有了思考(100分 献礼!)如何
ASP
28,408
社区成员
356,967
社区内容
发帖
与我相关
我的任务
ASP
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
复制链接
扫一扫
分享
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章