如何循环a b c d........?

我如何能用a   b   c......象1   2   3......for   i   =   1   to   5   这样做阿？ 问题点数：20、回复次数：7Top

1 楼jackie168（http://soft.eastrise.net）回复于 2002-07-18 19:59:15 得分 1

I   don't   understand?Top

2 楼shao528（远洋）回复于 2002-07-18 20:00:52 得分 5

var   c:char;  
  for   c   :=   'a'   to   'z'   do  
  ...Top

3 楼hjd_cw（）回复于 2002-07-18 20:01:00 得分 5

procedure   TForm1.Button1Click(Sender:   TObject);  
  var  
  i   :   char;  
  begin  
        for   i   :=   'a'   to   'c'   do  
          begin  
                  showmessage(i);  
          end;  
  end;  
  Top

4 楼cxb_zdl（韧峰）回复于 2002-07-18 20:48:57 得分 5

一种是以字符的形式，如楼上所述，还有一种是以枚举类型的方式：  
  定义：  
  Type  
       
        TEnum_Alpha=(a,b,c,d,e);  
   
  Var  
       
        i:TEnum_Alpha;  
   
  ...  
   
  For   i:=a   to   e   do  
      ...Top

5 楼madyak（无天）回复于 2002-07-18 20:52:47 得分 2

有序类型都可以循环!Top

6 楼bisc_sunny（总是当时携手处，游遍芳丛）回复于 2002-07-18 20:57:54 得分 2

Good!Top

相关问题

• tenum
• alpha
• begin
• var
• char

• 帖主：flyonskybird
• jackie168
• shao528
• hjd_cw
• cxb_zdl
• madyak
• bisc_sunny

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载