|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
|
2003/10/21 10:47:04 |
标题: |
|
加入我的收藏 |
楼主: |
如何把一个TColor的值保存到一个String或Char数组里面。(因为要传输)。
----------------------------------------------
- |
作者: |
catanx (catanx) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2003/10/21 11:09:42 |
1楼: |
a:Tcolor b:string
b:=inttohex(a);
----------------------------------------------
我常逛的一个电影站,写写程序看看电影,不要太累了,会死人的:) www.ddvan.com 很有特色哦,自己发觉吧。
|
作者: |
|
2003/10/21 11:18:07 |
2楼: |
一楼仁兄,我试过不行阿。
----------------------------------------------
-
|
作者: |
bryan (bao) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2003/10/21 11:32:51 |
3楼: |
ColortoString函数, 反向用StringToColor.
----------------------------------------------
-
|
作者: |
cjtds (delphi老黄牛) |
★☆☆☆☆ |
-
|
普通会员 |
|
2003/10/21 11:45:34 |
4楼: |
3楼说得对
----------------------------------------------
东升
|
作者: |
|
2003/10/21 11:56:50 |
5楼: |
问题解决了,另外想问,二进制数如何与Sting转换呢?我原来想TColor是二进制数据,所以想找那样的函数,可没找到。
----------------------------------------------
-
|
作者: |
catanx (catanx) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2003/10/21 13:46:48 |
6楼: |
procedure TForm1.Button1Click(Sender: TObject); var a:TColor; begin a:=ColorDialog1.Color; edit1.Text:=inttohex(a,6); end;
procedure TForm1.Button2Click(Sender: TObject); begin ColorDialog1.Execute; end;
----------------------------------------------
我常逛的一个电影站,写写程序看看电影,不要太累了,会死人的:) www.ddvan.com 很有特色哦,自己发觉吧。
|
|