Vla-setrowheight

提供:GizmoLabs - だいたい CAD LISP なサイト
2016年1月31日 (日) 15:26時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vla-setrowheight ''vla-object'' ''row'' ''height'') ; 機能 : 表内の指定した行インデックスの行の高さを指定する。...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-setrowheight vla-object row height)


機能
表内の指定した行インデックスの行の高さを指定する。


引数
  • vla-object … Table のVLAオブジェクト
  • row … テーブル内の行。
  • height … 行の高さ。


戻り値
nil


サンプル
(vl-load-com)
(defun c:example_setrowheight
  ; 選択した表の2行目の行高さを返すサンプル
  (setq Tbl (vlax-EName->vla-Object (car (entsel))))
  (setq rowcnt (vla-get-rows Tbl))
  (setq rowhgt (vla-getRowHeight Tbl 0))
  (alert (strcat "表の最初の行の行高さは" (rtos rowhgt) "です。"))
  (vla-setRowHeight Tbl 0 15))
  (alert (strcat "表の最初の行の行高さを" (rtos (vla-getRowHeight Tbl 0)) "にしました。"))
)

関連事項