10/04/14 13:44:23
>>575
URLﾘﾝｸ(d.hatena.ne.jp)
URLﾘﾝｸ(d.hatena.ne.jp)
この辺を応用すると一応書ける
uses .., Types;
var
s: string;
i: Integer;
begin
for s in TStringDynArray.Create('One!','Two!!','Three!!!') do
ShowMessage(s);
for i := 0 to 2 do
ShowMessage(TStringDynArray.Create('One!','Two!!','Three!!!')[i]);
end;