iniファイルについて (ID:17217)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 いや、とんでもなく大きな文字列を渡せば不具合が出ます、ということです。 例えば、次の２つを比べてみてください。 TIniFileとTMemIniFileの違いだけです。 # 文字列Sの最後に'Z'を追加しているのは、最後までデータが書き込まれたかのチェックです。 procedure TForm1.Button1Click(Sender: TObject); var Ini: TIniFile; S: String; i: integer; begin Ini := TIniFile.Create(ChangeFileExt(Application.ExeName, '.ini')); try S := ''; for i := 0 to 1024*1024 - 1 do begin S := S + IntToHex(i mod 16, 1); end; S := S + 'Z'; Ini.WriteString('Section', 'Ident', S); finally Ini.UpdateFile; Ini.Free; end; end; procedure TForm1.Button1Click(Sender: TObject); var Ini: TMemIniFile; S: String; i: integer; begin Ini := TMemIniFile.Create(ChangeFileExt(Application.ExeName, '.ini')); try S := ''; for i := 0 to 1024*1024 - 1 do begin S := S + IntToHex(i mod 16, 1); end; S := S + 'Z'; Ini.WriteString('Section', 'Ident', S); finally Ini.UpdateFile; Ini.Free; end; end;