Delphi の文字列型stringについて

質問

以下のコードで string は AnsiString、Char は AnsiChar です。

　buf: array[1..16] of Char;
を
　buf :string[16];
と宣言しては意図通りに動きません。なぜでしょう？

　TPerson = record
　　Age : Integer;
　　Name: string[30];
　end;
　TPersonArray = array of TPerson;

procedure TForm1.Nantoka;
var
　i,j: Integer;
　buf: array[1..16] of Char;　//buf :string[16];　ではダメ！
　Fs : TFileStream;
　R　: TPersonArray;
begin
　SetLength(R, 100);　//配列のサイズを決定
　for i := 0 to 99 do //動的配列の添え字は常に０から始まる
　begin
　　R[i].Age := Random(100);
　　for j := 1 to 16 do buf[j] := Chr( Random(26)+97 );
　　//buf :string[16]; では buf[j] が'文字'にならない！
　　R[i].Name := 'Stream '+buf;
　end;
end;

回答No.1

maywindow · ベストアンサー

Delphi の String 型 (文字列型) は、文字列を代入すればその文字列がセットされて、文字列の長さが決まります。
buf : string[16];
は格納可能な文字の領域をバイト数で確保するだけです。
各要素に「文字」を代入しても「文字列」としての長さは設定されません。つまり、String 型の「文字列」としては認識してくれません。
どうしてもというのであれば、
Byte(buf[0]) := 16;
とすれば、実際の「文字列」としての長さ(バイト単位)を設定できます。

> buf[j] が'文字'にならない！

文字列としての長さは buf に設定されませんが、「文字」としては代入されています。
余計なお世話かも知れませんが、Delphi 関係のコミュニティの場で質問された方がレスが期待できると思いますよ。

お礼

お礼が遅れました。丁寧な回答まことにありがとうございます。