掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ファイルの作成、保存について (ID：2561)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
データを保存するためにファイルを新規作成してから保存するということを やりたいのですが上手くいきません。 var i,j:Integer;F:TextFile; mat:array [0..9,0..9] of Integer;FS:TFileStream; begin FS := TFileStream.Create('D\tes.txt',fmOpenWrite + fmShareExclusive); AssignFile(F, 'tes.txt'); Rewrite(F); for i := 1 to 10 do begin for j := 1 to 10 do begin mat[i,j] := i+j; end; end; for i := 1 to 10 do begin for j := 1 to 10 do begin Writeln(F, IntToStr(mat[i,j])); end; end; FS.Free; end; とやり実行すると『classes.pasがありません』といった内容のメッセージが 出てきます。このやり方でファイルの保存を行うにはどのように設定すればよいの でしょうか？ヘルプや本を見ても詳しくは書いてないので困っています。 どうかご存知の方教えていただけないでしょうか？
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.