別のフォームがモーダルで表示されているときに無効になっていないフォームを作成するにはどうすればよいですか？

Question

私は、アプリケーションを使用しているときに常にアクセス可能なユーティリティダイアログ（非モーダルで上に留まる）を持っています（アプリケーションで作業中にメモを取るために使用できるダイアログボックスを考えてください）モーダルダイアログが表示されます。

残りのアプリケーションは変更できません。

可能ですか？どうすればそれについて行くことができますか？

Answer 1

ShowModalが呼び出されると、既存のすべての最上位ウィンドウが無効になります。それがモダリティが機能する方法です。対話が合理的なウィンドウがある場合は、再度有効にするだけです。

たとえば、あなたは、ユーティリティウィンドウにこれを追加することができます。これは、あなたのユーティリティウィンドウが無効にすることはできませんことを確認します

type 
    TMyUtilityForm = class(TForm) 
    protected 
    procedure WMEnable(var Message: TWMEnable); message WM_ENABLE; 
    end; 
.... 
procedure TMyUtilityForm.WMEnable(var Message: TWMEnable); 
begin 
    if not Message.Enabled then 
    EnableWindow(Handle, True); 
    inherited; 
end; 

。