Vla-put-scmtimevalue

提供:GizmoLabs - だいたい CAD LISP なサイト
2016年1月19日 (火) 17:09時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vla-put-scmtimevalue ''vla-object'' ''sec'') ; 機能 : ショートカットメニューを表示する長押しの有効時間を設定して...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-put-scmtimevalue vla-object sec)


機能
ショートカットメニューを表示する長押しの有効時間を設定して、操作時間に制限のある右クリックを設定する。


引数
  • vla-object … PreferencesUser の VLAオブジェクト
  • sec … 100 から 10,000 までのミリ秒数。初期値は 250。


戻り値
nil


  • このプロパティは、SCMTimeMode プロパティが True に設定されていると、右クリックの動作に影響する。
サンプル
(vl-load-com)
(defun c:Example_SCMTimeValue()
    ;; ショートカットメニューを表示する長押し時間を変更するサンプル
    (setq acadObj (vlax-get-acad-object))
    (setq preferences (vla-get-Preferences acadObj))
    
    ;; ショートカットメニューを表示する長押しの有効時間を取得
    (vla-put-SCMTimeMode (vla-get-User preferences) :vlax-true)

    (setq originalValue (vla-get-SCMTimeValue (vla-get-User preferences)))
    (alert (strcat "現在の長押し時間 : " (itoa originalValue)))
    
    (setq newValue 1000)
    (vla-put-SCMTimeValue (vla-get-User preferences) newValue)
    
    (alert (strcat "新しい長押し時間: " (itoa (vla-get-SCMTimeValue (vla-get-User preferences)))))

    ;; 戻す
    (vla-put-SCMTimeValue (vla-get-User preferences) originalValue)
    (alert (strcat "ショートカットメニューを表示する長押し時間を次に戻しました : " (itoa originalValue)))
)

関連事項