「Vle-alert」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
 
62行目: 62行目:


;サンプル
;サンプル
<syntaxhighlight lang="lisp" line>
<pre class="brush:autolisp;">
(vle-alert "My CAD App" "Dear Customer ...." (+ 4 32 4096))
(vle-alert "My CAD App" "Dear Customer ...." (+ 4 32 4096))
 
</pre>
</syntaxhighlight>
 


-----
-----

2023年6月18日 (日) 04:38時点における最新版

構文
(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 


サンプル
(vle-alert "My CAD App" "Dear Customer ...." (+ 4 32 4096))

関連事項