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;
再現性がないようなので、DelphiでなくOSの問題かも？
無視して下さい。