case语句出错求解决办法(20分)

  • 主题发起人 主题发起人 大名顶顶
  • 开始时间 开始时间
如果你的分支不是有序类型,而且又无法用静态数组来转换成有序类型的话,只能用if语句。
 
case语句中的类型应为序数类型
 
var
Src: TStringList;
s: string;
begin
Src := TStringList.Create;
Src.Add('name');
Src.Add('address');
Src.Add('telephone');
s := 'name';

case Src.IndexOf(s) of
0: //'name'
1: //'address'
2: //'telephone'
....
end;
Src.Free;
end;
 
也可作一枚举型的,然后CASE!
 
有如下几种类型可以用于case语句。
整形 当然用1、2、3。。。。选择访问了。
字符型 (注意,不是字符串,是单个字符) 用a、b、c。。。。选择访问。
枚举型 定义一个枚举型type colour(yellow,red,blue);
用yellow、red、blue选择访问。
这是语言规则,没有为什么。
 
需有序才能用 case
 

Similar threads

I
回复
0
查看
577
import
I
I
回复
0
查看
601
import
I
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部