Topic: ac Vertical Alignment middle in a Table

[DEVITG]

With this defun I want to locate a text in a cel , in VerticalAlignmentmiddle

Code: [Select]

(defun fill-cell ( txt heig  row col styl color)
(vla-settext tabla row col txt)
(vla-SetCellTextStyle tabla row col styl)
(vla-SetCellTextHeight tabla row col heig)
(vla-put-colorindex acmcol color)
(vla-SetCellContentColor tabla row col acmcol)
(vla-setcellalignment tabla row col  acVerticalAlignmentmiddle)

);_
(fill-cell "TERRENO NATURAL" 7 2 0 "ROMAND" 4)



Shown at the dwg.
But it does not work
Could you help me ?

[Jeff_M]

From the Help, there is no acVerticalAlignmentmiddle....:

AcCellAlignment enum; the cell alignment

acBottomCenter

acBottomLeft

acBottomRight

acMiddleCenter

acMiddleLeft

acMiddleRight

acTopCenter

acTopLeft

acTopRight

[Jeff_M]

I would guess that you'd want acMiddleCenter.

[DEVITG]

Hi , as I put on the right table , I need it to be vertical , the RED text .
If it can not be done ,I will try to arrange the table in in 2 or more tables.

[Jeff_M]

OK, sorry, I hadn't looked at your drawing.


(vla-setcellalignment tbl 2 0 acMiddleLeft)
(vla-settextrotation tbl 2 0 acdegrees270)

[DEVITG]

Hi Jeff , that was the trick .
Thanks for it.
Another fact :
I noticed that when filling a table the task is developed in a slow pace , and it get slow , step by step,  when the rows are bigger .
i have a list with about 300 item an in each row 3 cell are fill
when I try with 30 , it run quick row by row , but when I run the whole list , the row pace is slower.

[Jeff_M]

I discovered this little trick from somewhere.......

Place this in your code after creating the table but prior to adding any data to the table:

Code: [Select]

(vla-put-RegenerateTableSuppressed table :vlax-true);;don't regen table with every addition/change
Then, once the table is filled add this:

Code: [Select]

(vla-put-RegenerateTableSuppressed table :vlax-false);;Now we can regen the table
This really helps to speed things up, since the table is regenerated with EVERY cell change by default.