如何把colordialog的颜色转成为string?(10分)

X

xiaocai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-25

• #1

同题，就象DELPHI的颜色设置一样，用户选择颜色后，用$XXXXXXXX九位STRING来表示？

 

L

li_zhifu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-25

• #2

ShowMessage(Format('$%x',[ColorDialog1.Color]));

 

X

xiaocai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-26

• #3

比如有个颜色的字符串$AA00FF，怎么样才能让一个shape.brush.color根据它设置TCOLOR
呢？

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-26

• #4

转换为字符：IntToHex(ColorDialog1.Color,8)
赋值：shape.brush.color:=StrToInt($00AA00FF)

 

X

xiaocai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-26

• #5

多人接受答案了。