网页色值转Rbg值 Public Function hextorgb(hexcolo[2条回复]

当前位置：首页

开发技术指南» 文章正文

引言：

·使用c#的web编程，：如何获取多个checkbox的值并删除掉谢谢 »显示摘要«

摘要： default.aspx： <asp:datagrid id="datagrid1" runat="server" width="100%"> <headerstyle wrap="false" horizontalalign="center" verticalalign=......

·使用c#后台服务程序如何实现html的<input type="reset">功能<asp:button id="button1" runat="server" text="清除" /> »显示摘要«

摘要：在html中的<input type="resert" value="复位">功能，使用asp.net时，使用服务器端控件<asp:button id="button1" runat="server" text="清除" />，如何写其服务器端后台程序？谢谢。 ......

求解下列Vb函数ToDelphi6

网页色值转Rbg值

Public Function hextorgb(hexcolor As String)
input format = #FFCC00
Dim r, g, b As Byte
r = CByte("&H" & Mid(hexcolor, 2, 2))
g = CByte("&H" & Mid(hexcolor, 4, 2))
b = CByte("&H" & Mid(hexcolor, 6, 2))
hextorgb = r & "," & g & "," & b
End Function

NO.1 作者： Little2000

Function hextorgb(hexcolor: String): String
var
r,g,b: Byte;
begin
r := StrToInt($+MidStr(hexcolor,2,2));
g := StrToInt($+MidStr(hexcolor,4,2));
b := StrToInt($+MidStr(hexcolor,6,2));
result := IntToStr(r)+,+IntToStr(g)+,+IntToStr(b);
end;

NO.2 作者： YFLK

Delphi的色值用4字节整型量存贮,表示形式#00RRGGBB,直接写一个相应的函数就可以.

·我的api viewer 不见了，如何让她回到加载程序管理器，用那个添加加载项的按钮也不行。 »显示摘要«

摘要： rt ......

» 本期热门文章：