掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ファイルへ書き込むには？ (ID：2696)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんにちは。 ファイルを新規で作成し、 そこに文字(Str)を書き出そうとしています。 procedure TForm1.Button1Click(Sender: TObject); var FileName,Str: String; FileHandle,Size: Integer; begin Str := 'abcdefg'; FileHandle := FileCreate('C:\test.txt'); FileName := '???'; //←何を入れる？ //FileHandle := FileOpen(FileName,fmOpenReadWrite); Size := GetFileSize(FileHandle, nil); FileWrite(FileHandle,FileName,Size); ~~~??~~~ end; ヘルプなどを見たのですが、書き込むことができません。 Str の"abcdefg"という文字を書き込むにはどのようにすればよいのでしょうか？ お分かりの方がいましたら、宜しくお願いします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.