データの保存について (ID:40262)

名前

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

本文 pasteの件ではありがとうございました。 すみません、また質問させてください。 自作メモ帳で、stringlistを使って保存したデータを次のプログラムで読み込んだときに読み込めないという問題が出ました。 AssignFile(F, FileName); Reset(F); i:=0; repeat i:=i+1; readln(F,InBuff); a[i]:=Inbuff; until eof(f); おかしいのは、「名前を付けて保存」したものは読み込めないのに、「上書き保存」したものは読み込める点です。 「名前を付けて保存」した後すぐに「上書き保存」したものは読み込めるんです。 if FileName2<>'' then begin //上書き保存です StrL := TStringList.Create; try StrL.Text := RichEdit1.Lines.Text; StrL.SaveToFile(FileName2); finally StrL.Free; end; FormFiler.Caption:='FilerV2-----'+FileName2; end else begin //名前をつけて保存です if SaveDialog1.Execute then begin FileName2:=SaveDialog1.FileName; StrL := TStringList.Create; try StrL.Text := RichEdit1.Lines.Text; StrL.SaveToFile(FileName2); finally StrL.Free; end; FormFiler.Caption:='FilerV2---'+FileName2; end; end; 「名前を付けて保存」したものを読み込みたいんですが、どうしたらいいでしょうか。 よろしく、お願いします。