とりあえずテキストに吐きだしたい時に使う。 既存のファイルに上書き。 var txtFile: TextFile; str, path: string; begin str := Format('%s %s', ['hoge', 'hoge']); pat...