掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
フォーム無しのコンソール・アプリで FormCloseQuery の処理をするには? (ID:21717)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
すでに解決していますが・・・ 上記のソースをみるとFormCloseQuery相当の処理が必要ですか? 単にアプリ終了時に処理をしたいのであれば finalization節に書けばいいのでは? コンソールアプリの場合はプロジェクトファイルには書けませんので別のユニットに例えば ---------------------------------------- unit u_last; interface implementation uses SysUtils; procedure do_final; var f: TextFile; begin AssignFile(f, 'test.txt'); {$I-} Append(f); if IOResult <> 0 then Rewrite(F); {$I+} Writeln(f, DateTimeToStr(Now)); Flush(f); CloseFile(f); end; initialization finalization do_final; end. ---------------------------------------- だけでよいような。 意味が違っていたらごめんんさい
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.