'Find' dialog custom

[NEOGURi]

こんにちは！

Find、View Applet Source、Inspect、...など
Curl Appletが実行される間、使用者側に発生する特別なイベントがあります。
そのうち'Ctrl+Pointerの右ボタンクリック'でポップアップなるInspect類のメニューの場合、{disable-inspection-gesture} procでdisableさせることができます。

私は'Ctrl+F'で実行されるFind機能をcustom化したいです。
ここで2つの質問があります。
1.Findウィンドウのポップアップをdisableする方法がありますか?
(KeyPress Eventを制御する方法ではない 、{disable-inspection-gesture} procとようにCurlで自主的に支援すること)
2.Findウィンドウのdialogにアプローチできる方法がありますか?
(Match caseの有無、Wrap aroundの有無、Direction選択肢の値、照会された結果、...など)

[dyoshida]

Ctrl+FにcustomのFind機能をアサインしたい場合は
KeyAccelを使うのはどうでしょうか？

Code:

{def layout =
    {VBox
        {bold Key Accel Test},
        "Please press Ctrl + F",
        {TextField width = 5cm}
    }
}

{do
    {layout.add-event-handler
        {on AttachEvent do
            def fm = {layout.get-focus-manager}
            {fm.add-key-accel
                {KeyAccel
                    key-accel-string = "Ctrl+F",
                    {on Action do
                        {popup-message "My Find Dialog"}
                    }
                }
            }
        }
    }
}


{value
    layout
}