我要重A 到Z的循环怎么做?

解决方案 »

  1.   

    var ch: char; 
    begin
     for ch :='A' to 'Z' do 
     begin
     ....
     end;
    end;
      

  2.   

    for i:=1 to 26 do 
    begin
    //自己的程序。
    end;
    为什么一定要你那们循环。
      

  3.   

    晕,你自己不是已经写出来了吗?var
      ch:Char;for ch := 'A' to 'Z' do
      

  4.   

    var ch:char;
    begin
      for ch:='A' to 'Z' do
      begin
      end;
    end;
    或者:
    var i:integer;
        ch:char;
    begin
      for i:=0 to 25 do 
      begin
        ch:=chr(ord('A')+i);
      end;
    end;
      

  5.   

    对,同意,反正都是循环26 次,为什么非要a..z呢 ?
    在说了,如果你需要用到a..z 你可以用到 ch:=chr(ord('A')+i);
     
    或者其他方法啊
      

  6.   

    ehom(?!) ( ) 说的对呀.