中身空のtxtファイルを生成したいだけなので、
SaveToFileをTMemoとかTPictureなしで使いたいんですがどうしたらいいでしょうか。