滚动条代码生成器

ttx9n · 发表于 2007-2-13 00:00:00

function copy2Clipboard() { 
            // Copies currently displayed code to user's clipboard 
        taCode.innerText = code.innerText; 
        textRange = taCode.createTextRange(); 
        textRange.execCommand("RemoveFormat"); 
        textRange.execCommand("Copy"); 
} 
--> 
</SCRIPT> 
<SCRIPT LANGUAGE="VBSCRIPT"> 
<!--

function fnReset()  
            // Unbold all spans 
        s3d1.style.fontWeight = "normal" 
        s3d2.style.fontWeight = "normal"     
        sArrow1.style.fontWeight = "normal" 
        sArrow2.style.fontWeight = "normal" 
        sBase1.style.fontWeight = "normal" 
        sBase2.style.fontWeight = "normal" 
        sDark1.style.fontWeight = "normal" 
        sDark2.style.fontWeight = "normal" 
        sFace1.style.fontWeight = "normal" 
        sFace2.style.fontWeight = "normal" 
        sHighlight1.style.fontWeight = "normal" 
        sHighlight2.style.fontWeight = "normal" 
        sShadow1.style.fontWeight = "normal" 
        sShadow2.style.fontWeight = "normal" 
         
    end function

function fnChange(sInProp)     
         
        fnReset() 
     
        Select Case sInProp 
                 
            Case "3d"                       
                oTextArea.style.scrollbar3dLightColor = _ 
                    o3d.options(o3d.selectedIndex).value 
                s3d2.innerText = o3d.options(o3d.selectedIndex).value     
                s3d2.style.fontWeight = "bold" 
                s3d1.style.fontWeight = "bold" 
         
            Case "arrow"  
                oTextArea.style.scrollbarArrowColor = _ 
                    oArrow.options(oArrow.selectedIndex).value 
                sArrow2.innerText = oArrow.options(oArrow.selectedIndex).value 
                sArrow2.style.fontWeight = "bold" 
                sArrow1.style.fontWeight = "bold" 
         
            Case "base" 
                oTextArea.style.scrollbarBaseColor = _ 
                    oBase.options(oBase.selectedIndex).value 
                sBase2.innerText = oBase.options(oBase.selectedIndex).value 
                sBase2.style.fontWeight = "bold" 
                sBase1.style.fontWeight = "bold" 
         
            Case "dark" 
                oTextArea.style.scrollbarDarkShadowColor = _ 
                    oDark.options(oDark.selectedIndex).value 
                sDark2.innerText = oDark.options(oDark.selectedIndex).value 
                sDark2.style.fontWeight = "bold" 
                sDark1.style.fontWeight = "bold" 
         
            Case "face" 
                oTextArea.style.scrollbarFaceColor = _ 
                    oFace.options(oFace.selectedIndex).value 
                sFace2.innerText = oFace.options(oFace.selectedIndex).value 
                sFace2.style.fontWeight = "bold" 
                sFace1.style.fontWeight = "bold" 
         
            Case "highlight" 
                oTextArea.style.scrollbarHighlightColor = _ 
                    oHighlight.options(oHighlight.selectedIndex).value 
                sHighlight2.innerText = oHighlight.options(oHighlight.selectedIndex).value 
                sHighlight2.style.fontWeight = "bold" 
                sHighlight1.style.fontWeight = "bold" 
         
            Case "shadow" 
                oTextArea.style.scrollbarShadowColor = _ 
                    oShadow.options(oShadow.selectedIndex).value         
                sShadow2.innerText = oShadow.options(oShadow.selectedIndex).value 
                sShadow2.style.fontWeight = "bold" 
                sShadow1.style.fontWeight = "bold" 
     
        End Select     
     
    end function

'--> 
</SCRIPT> 
 
 
<STYLE> 
P        { margin-top: .6em;  
           margin-bottom: .6em; 
        } 
     
BODY    { margin-left: 0pt; 
          margin-top: 0pt; 
          font-size: 80%;             
          font-family: Verdana, Arial, Helvetica, MS Sans Serif; 
        } 
     
H1        { font-size: 145%; 
          margin-top: 1.35em; 
          margin-bottom: .5em; 
        } 
         
PRE        { font-family: Courier New; 
          font-size: 130%; 
          background: #EEEEEE; 
          margin-top: 1em; 
          margin-bottom: 1em;     
          margin-left: 0pt; 
          padding-top: 5pt; 
          padding-bottom: 5pt;  
          padding-left: 5pt; 
          padding-right: 5pt; 
        }

TABLE    { font-size: 100%; }

TR        { vertical-align: top; }

TD        { margin: 3pt; }

</STYLE> 
 
</HEAD>

<P> 
<TABLE BORDER="2" BGCOLOR="#DDDDDD" WIDTH="100%"> 
<TR> 
<TD VALIGN="TOP"> 
<TABLE WIDTH="401"> 
<TR> 
<TD BACKGROUND="graygrid.gif" ALIGN=CENTER VALIGN="CENTER" BGCOLOR="#EEEEEE" HEIGHT="300" WIDTH="400"> 
<TEXTAREA cols=40 rows=5 wrap=off ID="oTextArea" onkeyup="sTextArea.innerText=oTextArea.innerText">This is text inside a TEXTAREA element.   
You can change the color of the scrollbars for this element with the controls below. 
This is text inside a TEXTAREA element.   
You can change the color of the scrollbars for this element with the controls below. 
This is text inside a TEXTAREA element.   
You can change the color of the scrollbars for this element with the controls below. 
This is text inside a TEXTAREA element.   
You can change the color of the scrollbars for this element with the controls below. 
This is text inside a TEXTAREA element.   
You can change the color of the scrollbars for this element with the controls below.

plvo189 · 发表于 2023-3-31 10:01:28

终于找到了，我擦

a75620618 · 发表于 2023-12-12 05:11:06

看到这帖子真是高兴！

6hruhg · 发表于 2024-3-15 12:18:11

搞个免费的用用

白狐软件 · 发表于 2024-3-28 02:06:23

哈哈哈哈哈哈哈

uj9lpc · 发表于 2024-4-28 03:12:31

啦啦啦啦啦啦哈哈哈

locopy · 发表于 2024-6-28 10:38:40

哈哈哈哈哈哈哈

jhf · 发表于 2024-9-7 08:23:49

那三门，你们谁寂寞才快乐撒

雪龙Ui79 · 发表于 2024-9-23 02:56:28

而快乐你们快乐马年快乐

数据TG@shuju96 · 发表于 2024-10-1 02:09:47

额风风风微风微风违法

账号		自动登录	找回密码
密码			立即注册

[JavaScript] 滚动条代码生成器

Scrollbar Color Properties

相关帖子