pen的style枚举常量的用法(50分)

1

13668908226

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-31

• #1

问题是这样的：
模版A中把A.canvas.pen.style的属性保存文件 F 中了，已经是字符串了。
模版B中要把 F 中的相应的属性[已经是字符串了]取出,怎么把它再转为枚举常量??
赋值给B.canvas.pen.style:= ????

请帮忙解答，谢谢

 

C

chen_jianxiong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-31

• #2

如果是这样好像要自己定义一个对应,还不如干脆保存枚举的值.

 

C

chen_jianxiong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-31

• #3

Ord取出

 

W

wlmmlw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-31

• #4

> 模版A中把A.canvas.pen.style的属性保存文件 F 中了，已经是字符串了
怎么样保存的，结果是什么（假若Canvas.Pen.Style = psSolid）？

 

S

slb_anders

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-31

• #5

动手试一试，就知道了

 

1

13668908226

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-31

• #6

因为还有其他的，我吧它保存为....,style=psSolid,.....
现在取出来不知道该怎么用？

想到一种方法好像，就是不太好。
取出字符串str
if pos('psSolid',str) <> 0 then ....:= psSolid ;
穷举style所有类型...
if pos('psDot',str) <> 0 then .....:= psDot ;

但是这个还好，如果遇到像TFontColor这样的怎么办呢？

 

Q

qianwt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-31

• #7

你保存的时候非要保存字符串呀，保存整型数据不就没有问题了