[Zmiana tekstu na wymiarze liniowym (dla początkującego)]

(vl-load-com)
(setq R (getdist "podaj rozstaw"))
(setq dim (vlax-ename->vla-object (car(entsel "Wybierz wymiar"))))
(setq A (vlax-get-property dim 'Measurement) )
(setq X (/ A R))
(vlax-put-property dim 'TextOverride (strcat "#8 co " (rtos X) " cm"))

wiersz2: podaje rozstaw

wiersz3: wybieram linie wymiarową, po zaakceptowaniu (Enter/spacja) pojawia się komunikat: "błąd: zbyt mało argumentów"

---------------------------------

pytanie 2: gdzie i jak mogę sprawdzić parametry linii wymiarowej (np 'Measurement) itd. Chodzi mi o to, żeby poznać nazwy parameterów danych obiektów.

[Zmiana tekstu na wymiarze liniowym (dla początkującego)]

Po dodaniu:

Cytuj

(vl-load-com)

1. wskazuje (wpisuje) rozstaw

2. wskazuje wymiar

komunikat: błąd: zbyt mało argumentów

[Zmiana tekstu na wymiarze liniowym (dla początkującego)]

Dziękuje za szybką odpowiedź.

Po wybraniu lini wymiarowej otrzymuje komunikat: "błąd: aplikacja jest zblokowana i nie można jej rozładować."

Czyżby Arcadia nie chciała współpracować?

[Zmiana tekstu na wymiarze liniowym (dla początkującego)]

Witam serdecznie, to mój pierwszy post - miejcie wyrozumiałość

Chciałem przyspieszyć moją pracę i na początek chciałbym napisać proste polecenie. Mam już istniejący wymiar liniowy (np. A). Chciałbym zamienić tekst na tym wymiarze i uzależnić tekst od wartości wymiaru (chcę opisać ile prętów zbrojeniowych mam na danym odcinku): tekst powinien wyglądać: "#8 co X cm". Gdzie X=A/R (zaokrąglone w górę do całkowitych), gdzie R jest rozstawem. Na początek chciałbym wpisywać w wierszu Rozstaw.

Albo, jeśli jest taka możliwość: rysując dany wymiar, chciałbym wprowadzać R i dostawać końcowy rezultat (wymiar z pożądanym tekstem).

Pracuję na  Arcadia Plus 12.0.109.0.x64.Release. 

Czy mogę prosić o pomoc?