频道分类

delphi 循环 Low High 用法

作者:admin 来源: 日期:2020/3/10 17:27:16 人气: 标签:

 
var
  S: string;
  I: Integer;
  Found: Boolean;
begin
  S := 'Hello World';
  Found := False;
  for I := Low (S) to High (S) do
  Memo1.Lines.Add(S[I]);


另一个循环用法:
var
  S: string;
  I: Integer;
  Found: Boolean;
begin
  S := 'Hello World';
  Found := False;
  I := Low (S);
  while not Found and (I <= High(S)) do
  begin

  Memo1.Lines.Add(S[I]);
    {if (S[I]) = 'o' then
      Found := True;   }
    Inc (I);
  end;

上一篇:delphi case of下一篇:没有资料