stringgridの保存 (ID:7329)

名前

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

本文 stringgridの内容を保存を下記の手続きで保存しようとしたところ ファイルは作られているのですが、全くアクセスができません。 削除もrenameもできません。 chkdskとデフラグをかけましたが、効果ありません。 原因と対処法は？(Win-Xp-home,D7-pro) procedure TForm1.saving(grid:Tstringgrid; fname: string); var st:tstringlist; i,j,pcol,prow:integer; sstr:string; begin st:=tstringlist.create; pcol:=grid.colcount; prow:=grid.rowcount+2; for i:=0 to prow do begin sstr:=''; for j:=0 to pcol do sstr:=sstr+grid.Cells[j,i]+ chr(vk_tab); st.add (sstr); end; st.savetofile(fname); st.free; end;