Acet-ui-progress-safe

提供:GizmoLabs - だいたい CAD LISP なサイト
2023年11月22日 (水) 08:08時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ui-progress-safe messageOrPosition) ; 機能 : messageOrPositionが文字列の場合、プログレスメーターに新しいメッセージテキストが表示され、位置は0としてリセットされる。 : messageOrPositionが整数値の場合、プログレスメーターは指定された位置に更新される。正の値は、絶対位置にプログレスメーターを配置し、負の値はインクリメント…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(acet-ui-progress-safe messageOrPosition)


機能
messageOrPositionが文字列の場合、プログレスメーターに新しいメッセージテキストが表示され、位置は0としてリセットされる。
messageOrPositionが整数値の場合、プログレスメーターは指定された位置に更新される。正の値は、絶対位置にプログレスメーターを配置し、負の値はインクリメントを意味する。


引数
  • messageOrPosition … 文字列または整数


戻り値
メッセージ・テキストが更新された場合は T or nil、実際の位置値を返す。


サンプル
(progn
  (setq rep 100)
  (acet-ui-progress "進捗どうですか?:" rep)
  (repeat (/ rep 2)
    (acet-ui-progress-safe -1)
    (vl-cmdf "_delay" "3")
  )
  (acet-ui-progress-safe "\nやり直し:")
  (repeat rep
    (acet-ui-progress-safe -1)
    (vl-cmdf "_delay" "3")
  )
  (acet-ui-progress)
)


関連事項