delphi 循环 Low High 用法
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;
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.033400058746338 seconds