DMアプリケーションウィンドウが最小化されたときに遅延タスクによってポストされたモーダルダイアログを処理する方法は？

Question

これはやや難解な質問ですが、私が実際に使っているDMスクリプトモジュールには実際に影響します。カスタムモーダルダイアログを使用して、遅延メインスレッドタスクによって検出されたエラー状態をユーザーに警告しようとしています。ほとんどの場合、これはうまくいきますが、エラーメッセージが表示されたときにDMアプリケーションウィンドウが最小化されると、DMはフォアグラウンドアプリケーションとして復元されたときに異常な状態になります。モーダルダイアログは表示されませんが、それでも 'enter'または 'esc'キーストロークで終了するまでは、DM内のユーザーアクションを禁止します。

は、以下のサンプルコードは、GMS 2以降で動作します同等以上の回避策があり、問題を実証し、

GMS 1で働いていたソリューションを言及しますか？

Answer 1

解決策をLaunchExternalProcess（）関数と外部プログラムに基づいて提案すると、答えへのパスが提供されます。 AutoHotKeyと呼ばれる無料のオープンソースのWindowsマクロ作成パッケージを使用することで、RestoreDM.exeという非常にコンパクトな実行可能ファイルを作成することができました。この実行可能ファイルをDMスクリプトから簡単にアクセスできるフォルダに配置することで、LaunchExternalProcessAsync（）を使用して起動して、カスタムダイアログをポストする前にDMアプリケーションウィンドウが復元されていることを確認できます。以下は、オリジナルのテストスクリプトの修正版この解決策を説明し、AutoHotkeyをスクリプトの詳細を提供している：

class DeferredAlertTask 
{ 
    Number deferredTaskID; 

    DeferredAlertTask(Object self) 
    { 
     Number taskDelay_sec = 5; 
     String message = "Click OK and then minimize the DM app window.\n"; 
     message += "After 5 seconds, select DM on the task bar to restore it.\n"; 
     message += "Dialog will be invisible, must hit 'enter' or 'esc' to go on."; 
     OKDialog(message); 

     deferredTaskID = AddMainThreadSingleTask(self, "Task", taskDelay_sec); 
    } 

    void Task(Object self) 
    { 
     String banner = "Error dialog"; 
     String message = "Error message details."; 

     // Create the dialog box descriptor TagGroup 
     TagGroup dialogItemsSpec; 
     TagGroup dialogSpec = DLGCreateDialog(banner, dialogItemsSpec); 

     // Create and add the content box and text field to the layout 
     TagGroup contentBoxItemsSpec; 
     TagGroup contentBoxSpec = DLGCreateBox(contentBoxItemsSpec); 
     TagGroup contentLabelSpec = DLGCreateLabel(message); 
     contentBoxItemsSpec.DLGAddElement(contentLabelSpec); 
     dialogItemsSpec.DLGAddElement(contentBoxSpec); 

     // If the DM app window has been minimized, 
     // this modal dialog will be invisible, 
     // but it will still inhibit further user action 
     // within DM as it awaits 'esc' or 'enter'. 

     // The following is a remedy that works in GMS1, but not in GMS2 
     // GetApplicationWindow().WindowSelect(); 

     // For GMS2, we can use an executable that restores the DM app window. 
     // The lines below launch RestoreDM.exe, placed in C:\ProgramData\Gatan, 
     // where RestoreDM is an executable of the following AutoHotKey script: 
     // IfWinNotActive, Digital Micrograph 
     //  WinRestore, Digital Micrograph 
     String commandDir = GetApplicationDirectory(3, 0); 
     String restoreCommand = commandDir.PathConcatenate("RestoreDM"); 
     LaunchExternalProcessAsync(restoreCommand); 
     Sleep(0.1); 

     Object dialog = Alloc(UIFrame).Init(dialogSpec); 
     String result = (dialog.Pose()) ? "OK" : "Cancel"; 
     OKDialog(result); 
    } 
} 

void main() 
{ 
    Alloc(DeferredAlertTask); 
} 

main(); 

繰延警告タスクが上と呼ばれているので、非同期バリアントを使用する必要があるLaunchExternalProcessAsync（）したがって、RestoreDMプログラムによってプロンプトが出されたときに、DMがウィンドウを復元するのをブロックします（DMがハングする）。カスタムダイアログが表示される前にDMアプリケーションウィンドウが復元されるようにするには、外部プログラムを呼び出した後に短いスリープが必要であることにも注意してください。