Acet-ui-progress-safe

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(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)
)


関連事項