将所有可能出现的字符串列举出来并定义成一个枚举类型.在CASE 中使用该枚举类型即可.
解决方案 »
- 有没办法将两个edit控件中的数字合并起来再在第三个editi控件中显示。而且可以动态变化???
- 不知为什么DBGrid的纵向滚动条一直都出现着,不管只有一条记录或几条记录?请高手指点?
- 200分在线征答
- 如何用一个button来删除DBGrid中当前所选的一条信息?
- TIDftp 控件 get
- 特郁闷的问题:本人发现DOA控件进行数据库操作时,在多线程并发非同步时存在BUG,而用ODAC控件时问题更郁闷,高手们出手!这可是救命!
- 高分,有关拼音码识别的问题,急急急!
- 请帮我修改一下这段代码。。
- DELPHI 制作视频问题
- 关于ADOQuery中使用Delete语句执行错误的问题
- (100分)如何修改SHBrowseForFolder对话窗口,使它能添加新目录
- 哪有下载Delphi汉化包??特别是help文当!!!!!
或A、B、C代替嘛
case tviewstyle of
vsIcon: do statement;
vsSmallIcon: do statement;
vsList: do statement;
vsReport: do statement;
else do statement;
end;
这是用到的一个枚举类型来实现你的要求,不仅实现,而且增加程序的可读性,你可以试一试
不过程序中用的是TlistView的属性,你可以换成你自己所需要的值来做。