枚举类型的问题.很简单的吧.(50分)

X

xwings

Unregistered / Unconfirmed
GUEST, unregistred user!
先说一句.我是才学习的哦

最近我在写一个程序.里面的组件有个属性是枚举类型.比如是 TColr(black,white,red,blue)
var
colr:Tcolr
现在我要在程序中判断Colr的值是哪一个. 枚举类型好像应该是 序数从 0 开始的吧.

但是我因该如何判断呢? 不会再重新声明一个吧. 各位快来拿分吧.
 
ord(black)便返回0
 
if colr=black then.....
else colr=red then......
 
以前学turbo pascal的时候只会用if...then嵌套or case...of,现在D5也只知道这样。
 
CASE一下哦
 
if 不会错的
 
谢谢各位.不过
那个组件我没有源代码.
好像 if colr=black就无法通过编译了.
是不是要在单元里把那个枚举类型要重新定义一下?
 
没有人回答了么?

 
不会啊,if colr=black没有问题啊
你看看这个类型定义是否放在unit的interface位置,
另外该unit是否已被use
 
多人接受答案了。
 

Similar threads

顶部