掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
処理期間中の「実行中・・」の表示と消滅をさせるには？ (ID:23523)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
OnShowイベントではなく，OnActivateイベントを使用されては どうでしょうか？ procedure TForm2.FormActivate(Sender: TObject); begin {行いたい処理を書く。} PostMessage(Handle, WM_CLOSE, 0, 0); //処理後，自動でフォームを閉じる場合。 end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.