名前
題名
▼ Mr.XRAYさん > > 途中の要素に「文字」を代入しても，要素 0 には文字数は格納されません． > > つまり，文字列が代入されていないのと同状態となります． > > なんですが，代入した「文字」はもちろん取り出せます． > その確認コードです． > 質問している方は > > >//buf :string[16]; では buf[j] が'文字'にならない！ > > と書いていますが，そんなことはありません． > buf[j] には間違いなく '文字' が格納されます， > > 動作確認は Windows 7 U64(SP1) + Delphi XE(UP1) Pro です． > テストする場合，文字列を初期化しないとゴミが入ることがあります． > > procedure TForm1.Button2Click(Sender: TObject); > var > i : Integer; > buf : string[16]; > LText : string; > begin > //初期化 > buf := ''; > > for i := 1 to 16 do begin > buf[i] := AnsiChar(Ord('A') + i - 1); > end; > Memo1.Lines.Add('Buttn2 : ' + string(Buf)); > > > LText := ''; > for i := 1 to 16 do begin > LText := LText + buf[i]; > end; > Memo1.Lines.Add('Buttn2 : ' + LText); > end; >
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link