ファイルへのアクセスが拒否されましたというエラーが出るのですが、原因が分かりません。
下は20年以上前に作ってエラーなんか起こったことはないのですが、
ウイルスバスタークラウドのせいかなとか思ったりしています。
何かヒントをもらえませんか？？
よろしくお願いします。
procedure SaveFile(s:string; filemei:string);
var
F: textfile;
inbuff:string;
begin
FileName :=filemei;
AssignFile(F, FileName); Rewrite(F);
InBuff:=s;
writeln(F,InBuff);
CloseFile(F);
end;
フォルダ指定しないか？
編集 削除してないか
編集 削除ファイル名はなんですか
実在しますか
ありがとうございました。
フォルダ指定はします。
これのエラーはパスが存在しませんとかになると思うんですが？？
保存するのにファイル名は自由に設定できると思いますが？？
とりあえず、firewallをoffにしていろいろしたら、エラーは出なくなりました。
２月に買って、ウィルスバスターが仮のやつなので、
何をブロックしたかを表示するウィンドウが表示されていません。
何かのときにブロックするとかにしたのではと？？
そのほかにも正常な働きをしていないところがあるんです。
もう、ホントにボケが出ていますので、これからもぼけた投稿をするかもですが、
よろしくお願いします。
ウィルスバスターを入れたら、完全に動作するようになりました。
今までは体験版だったのですが、何が違んでしょうね？？