このフォームは、次のリンクからダウンロードできます。Modal_Msgt.fmbこの例では、次の3つのアラートを作成しました。名前：1。 Good_Msg2。 Error_Msg3。 Ask_Alert次のコードは、通常のメッセージを表示するための「ShowGoodMessage」ボタン用に記述されています。このコードは任意のPLSQLブロックで使用できます。Declare--数値変数を作成してshow_alertを保持しますreturnvaluenalertbuttonnumber;Begin--設定alertset_alert_property（'good_msg'、alert_message_text、'レコードは正常に保存されました。'）;-以下のステートメントの後、[OK]をクリックするまで実行が保持されます。モーダルwindownalertbutton：=show_alert（'good_msg'）;:alertblock.result：='それは良いメッセージでした。';-この後、任意のタスクを実行できます...終了;次のコードは、エラーメッセージを表示するための[エラーメッセージの表示]ボタン用に記述されています。 'エラーが発生しました。'）;-以下のステートメントの後、[OK]をクリックするまで実行が保持されます。これはモーダルウィンドウであるためです。nalertbutton：=show_alert（'error_msg'）;:alertblock.result：='これはエラーでした。メッセージ。';-この後、任意のタスクを実行できます...終了; 次のコードは、確認を求める「確認を求める」ボタン用に記述されています。
宣言-show_alert戻り値nalertbutton番号を保持する数値変数を作成します;開始-alertset_alert_property（'ask_alert'、alert_message_text、 ' [はい]または[いいえ]を確認しますか？'）;-以下のステートメントの後、[OK]をクリックするまで実行が保持されます。 nalertbutton =alert_button1 then：alertblock.result：='[はい]を選択します。';else：alertblock.result：='[いいえ]を選択します。';endif;-この後、任意のタスクを実行できます...終了;
購読して、次のような最新の更新の電子メール通知を取得します：
電子メールアドレスを入力してください：