Vle-alert

提供:GizmoLabs - だいたい CAD LISP なサイト
2023年1月28日 (土) 07:55時点におけるGizmon (トーク | 投稿記録)による版
構文
(vle-alert title msg flags)


機能
Windows の MessageBox を使ったメッセージボックスを表示する。


引数
  • title :メッセージボックスのタイトル(キャプション文字列)
  • msg : 表示されるメッセージ。ワードラップされます
  • flags : 振る舞いを指定する整数の組み合わせ(加算)


戻り値
終了するために使用されたボタンの番号
* 1 OK ボタン
* 2 キャンセルボタン
* 3 中止ボタン
* 4 再試行ボタン
* 5 無視ボタン
* 6 Yes ボタン
* 7 No ボタン
* 10 [再試行]ボタン
* 11 続行ボタン

引数:flag の内容

ボタンのフラグ

0   MB_OK
1   MB_OKCANCEL
2   MB_ABORTRETRYIGNORE
3   MB_YESNOCANCEL
4   MB_YESNO
5   MB_RETRYCANCEL
6   MB_CANCELTRYCONTINUE

アイコンのフラグ

32   MB_ICONQUESTION
48   MB_ICONEXCLAMATION
64   MB_ICONASTERISK /MB_ICONINFORMATION

デフォルトボタンのフラグ

0       MB_DEFBUTTON1
256   MB_DEFBUTTON2
512   MB_DEFBUTTON3
768   MB_DEFBUTTON4

動作のフラグ

0 MB_APPLMODAL
4096 MB_SYSTEMMODAL
8192 MB_TASKMODAL
16384 MB_HELP
65536 MB_SETFOREGROUND
131072 MB_DEFAULT_DESKTOP_ONLY
262144 MB_TOPMOST
524288 MB_RIGHT
1048576 MB_RTLREADING 


サンプル

<syntaxhighlight lang="lisp" line> (vle-alert "My CAD App" "Dear Customer ...." (+ 4 32 4096))

</syntaxhighlight>



関連事項