alf

Dodaliśmy do zwpack 4 nowe funkcje:
sumowanie długości wzdłuż klikanych punktów - mdist,  zmiana stylu istniejącej multilinii,   źródło https://wstaw.net/H7rPMsXd wymiarowanie polilinii, źródło https://wstaw.net/jbTYLih szyfrowanie lispów - źródło  Więcej o nakładce.
 


 
 

Po wczytaniu pliku ZRX (tylko w wersji Professional) można w pasku właściwości odczytać niektóre właściwości brył np. objętość.
Pliki do pobrania (aby je wczytać wystarczy tylko przeciągnąć plik nad obszar rysunku).
ZwGeomProps_x64.zrxZwGeomProps_Win32.zrx
 
Na rysunku poniżej jest kilka zaznaczonych brył oraz włączony panel właściwości z dostępnymi informacjami bez załadowanych plików zrx.

 
Na rysunku poniżej w żółtej ramce zaznaczyliśmy dodatkowe informacje, jakie będą wyświetlane po wczytaniu powyższego pliku zrx.

Martin. Sam doświadczasz niedostatków wersji Architecture. Wygląda, że zadziałała maksyma Francuskiej Legii Cudzoziemskiej. W każdym produkcie infomatycznym user oczekuje działania zgodnie ze specyfikacją i oczekuje, że problem, który ma do rozwiązania jest w tej aplikacji do rozwiązania. Konkurencja, szczególnie ta wiodąca ma kompletne i ugruntowane na rynku rozwiązania. Projektanci nie mają czasu na wymyślanie hacków na ułomności tylko chcą mieć skuteczne narzędzia CAD do osiągnięcia celu czyli stworzenia dokumentacji. Jeżeli dane narzędzie nie spełnia oczekiwań to je się zmienia. Sam miałem przykre doświadczenie z programem do statyki. Ostatecznie potraktowałem jego zakup jako stratę. Dla ZwSOFT'u to rozwiązanie zapewne było deficytowe i stratedzy uznali, że bieżące i przyszłe przychody nie zrównoważą nakładów na rozwój i dogonienie konkurencji. Nierentowne projekty się zamyka. Ot taka refleksja mię naszła.

Myślę Martin, że tu chodzi o coś innego a mianowicie, żeby drukarka pdf pomimo ustawienia bardzo dużego formatu ostatecznie "wyprodukowała" arkusz dopasowany wymiarami do faktycznie umieszczonych na nim obiektów. Faktycznie plotery mają taką opcję która odcina z rolki arkusz zaraz za ostatnim wydrukowanym elementem nie zważając że format arkusza był ustawiony np na 2,3 czy 10m. Jest to cecha sterownika drukarki. 

Eksport layout jest fajny. Docina polilinie na krawędzi rzutni, koło zamienia na łuk itp ale ma również drobne mankamenty np.nie docina hatchy, text multiline jest w nowym rysunku w całości a nie tylko  w widocznej części, podobnie teksty jednowierszowe. Mam świadomość, że z tekstami to może być decyzja strategiczna ale hatche powinien docinać. Generalnie dobra robota i nie trzeba korzystać z zewnętrznych narzędzi.
Co do eksportu do dgn to wydaje się, zamiast osobnego polecenia exptort coś tam powinien format zapisu rysunku być dostępny bezpośrednio w oknie SaveAs i Open. Nie widzę powodu dla którego mnoży się komendy zamiast zaszyć to w listę dostępnych formatów. Podobnie STL nie można by zrobić typu w oknie SaveAs zamiast komendy STLOUT?
 

Trzeba jeszcze było uodpornić lispa na DIMRND=0 bo wywalał dzielenie przez 0. I jeszcze zamiana kropki na znak  oddzielenia części dziesiętnej wg stylu wymiarowego. Wersja po poprawkach:
(vl-load-com) (defun c:dimagregatemod ( / ent) (while (= nil ent) (progn (prompt "\nWskaz wymiar do zmiany: ") (setq ent (car (entsel))) ) ) (if (= (cdr (assoc 0 (entget ent))) "DIMENSION") (pr:multipledimsection (entget ent)) (princ "\nBlad: Wskazany obiekt nie jest wymiarem liniowym") ) (princ) ) (defun c:dimagregate ( / ) (command "_dimlinear" pause pause pause) (pr:multipledimsection (entget (entlast))) (princ) ) (defun pr:multipledimsection ( entlist / n section newtext rnd) (setq n (getint "\nPodaj liczbe odcinkow: ") section (/ (float (cdr (assoc 42 entlist))) (float n)) rnd (getvar "DIMRND") ) (if (not (= rnd 0)) (setq section (* rnd (atoi (rtos (/ section rnd) 2 0)))) ) (setq newtext (strcat "<>\\X(" (itoa n) "x" (vl-string-translate "." (getvar "DIMDSEP") (rtos section 2 (getvar "DIMDEC"))) ")") entlist (subst (cons 1 newtext) (assoc 42 entlist) entlist) ) (entmod entlist) ) (princ)  

A co mi tam. Napisałem rybę. Mi się też przyda
(defun c:ww1 ( / ent) (while (= nil ent) (progn (prompt "\nWskaz wymiar do zmiany: ") (setq ent (car (entsel))) ) ) (if (= (cdr (assoc 0 (entget ent))) "DIMENSION") (multipledimsection (entget ent)) ) ) (defun c:ww2 ( / ) (command "_dimlinear" pause pause pause) (multipledimsection (entget (entlast))) ) (defun multipledimsection ( entlist / n section newtext) (setq n (getint "\nPodaj liczbe odcinkow: ") section (/ (cdr (assoc 42 entlist)) n) newtext (strcat "<>\\X(" (itoa n) "x" (rtos section 2 2) ")") entlist (subst (cons 1 newtext) (assoc 42 entlist) entlist) ) (entmod entlist) (princ) ) (princ)  

Dzień dobry,
Jest w sieci wiele rozwiązań dla tego problemu, ale to wydaje się najbardziej uniwersalne:
https://cadabyss.wordpress.com/2010/01/04/stripmtext-v5-0/

Jak na razie przygotowałem taką wersję minimalną. 
Działa tak, że klikamy w kolejne obszary w wyniku powstaje sumaryczny obrys.
zlewnia.lsp

Dzień dobry,
Wydaje się, że lisp (załączony) ze strony lee-mac.com odpowiada na Pani potrzeby:
http://lee-mac.com/pslay.html
Polecenie PSLAY - doda zdefiniowany prefix i/lub sufix:

Polecenie RPSLAY - usunie zdefiniowany prefix i/lub sufix:

Plik lisp:
PrefixSuffixLayerV1-1.lsp
 

Witam,
dokładnie coś takiego miałem na myśli. Bez zagłębiania się w szczegóły techniczne, zależałoby mi, żeby ustawić kolejność wyświetlania np. warstw i nie musieć używać DRAWORDER, albo przynajmniej ograniczyć częstotliwość użycia... :)
Pozdrawiam

No nie wiem, zrobiłem grupowo, ale miałem tylko dwa kreskowania w tej grupie.
Może się przyda.

myślę że twórce zapytania po części zadowolił by mechanizm używany przez oprogr rodzyny Bentleya. Tam jest mozliwość "pozycjonowania warstw", co jest bardzo wygodne.
zakres jest od -500 do +500 więc jest 1000 możliwości ustawienia warstw. Działa równiez rodzaj "draworder", tj bring to front, ale nadrzędnym jest ustawienie priorytetu warstw.
Jak coś ma pozycję -100 a reszta 0, to warstwa ta zawsze bedzie się znajdował nizej niz pozostałe.
analog rozwiązanie jest dla kolejności  i pozycjonowania podpinanych xrefów.
Na bloki nie ma typowo "blokowego " rozwiązania, ale tu też działa pozycjonowanie warstw lub ustawienie w bloku odpowiedniej kolejności wyświetlania elementów..
tego (m. inn.) mi zawsze brakowało w rozwiązaniach cadowskich..
edit: ta kolumna obok po prawej z okragłą ikonka to ustawienia przezroczystości warstwy (postulowane w innym temacie) analob można tez dla xrefów oraz rastrów.. tez przeze mnie z uwielbieniem używane. Jedyny mankament że nie da się tej przzroczystosci z wiadomych powodów przenieść do wydruku numerycznego, drukowanie przezroczysttości tylko w opcji druku do rastra..

Jeżeli kolory w XREFie ustawione są "Jak Warstwa", to można używając _layerstate zdefiniować stany warstw np. Oryginalny i Do wydruku (w którym warstwy XREFa będą wyszarzone / przyciemnione).

dziękuję serdecznie, zdecydowanie to "lisp number one" w mojej osobistej liście przebojów ostatniego dziesięciolecia 😁

dziękuję serdecznie, zdecydowanie to "lisp number one" w mojej osobistej liście przebojów ostatniego dziesięciolecia 😁

Dzień dobry,
No to jest, jak Pani chciała: DWidok_Skrecenie_v2.lsp

No to proszę: DWidok_Skrecenie.lsp
Polecenie: DWS

BLOCKEDITMODE ustawione (domyślnie) na 1 - przy edycji bloku wywołuje polecenie BEDIT (edytor bloków), BLOCKEDITMODE ustawione na 0- wywołuje przy edycji dotychczasowe polecenie _REFEDIT (ODNEDYCJA).

Odnośnie polecenia C:ZZ (ze skryptu), przełączającego FILLMODE, polecam szersze rozwiązania: https://kojacek.wordpress.com/2017/12/30/uproszczone-wyswietlanie-obiektow/ 

Kiedyś też nie przechodziłem w stan hibernacji i niestety skończyło się to utratą zdrowia. Proponuję świadomy restart.
 

Również wykorzystuję w trakcie pracy na ZWCAD 2018 monitor o rozdzielczości WQHD (2560x1440) - jako dodatkowy podpięty do laptopa. Przekątna ekranu wynosi 27 cali.
Nie zaobserwowałem takich problemów. Mam natomiast problem z wielkością okien dialogowych i tekstów, które wg mnie są zbyt małe. Pracując po 8-12h dziennie oczy strasznie męczą się od wpatrywania się w małe teksty...
Podejrzewam, że w przypadku monitorów 4K będzie jeszcze gorzej. Przydałaby się funkcja (np.  w ustawieniach programu/opcjach), która pozwala na przeskalowanie okien dialogowych i ich tekstów.
Ma Pan może zmienione skalowanie czcionek w systemie WINDOWS? Funkcja: Zmień wielkość tekstów i innych elementów.
Ja mam ustawioną wartość inną niż standardowa i zauważyłem, że niektóre programy nie radzą sobie z niestandardowymi ustawieniami wyświetlania w Windowsie. Objawia się to właśnie błędnym wyświetlaniem okien poszczególnych programów (np. teksty lub ikony nie mieszczą się w oknie programu i są ukryte lub ucięte). W ZWCADZIE 2018 nie zaobserwowałem tego problemu.

szukajcie a znajdziecie..

Witam
Potrzeba wpisać _units, nacisnąć lewy ALT+SPACJA, następnie ENTER, kliknąć klawisz strzałki kursora na klawiaturze np. -> "w prawo" i poruszać myszą, aby sprowadzić okno na monitor widoczny ;)
Pozdrawiam

PS. Nic na siłę, ale właśnie obiekt OLE spełnia rolę taką jak uwięziony w pliku blok. Mam ten sam problem z logami, jak przesyłamy pliki, np tabelki z logami, między sobą, więc prostym zabiegiem: otwiera jpega, robię wycinek windowsowym narzędziem do wycinania,  (ląduje to w pamięci) a potem ctrv - wklejam jako ole. obiekt Ole może być wstawiany na warstwie, której możemy nadać status np kłódki lub niedrukowania, być skalowalny z zach proporcji i inne. Strata na jakości tak wykonanej operacji jest niewielka, a dla druku logo żadna.. metoda szybka,tania i bezpieczna (jak chwilówka w providencie )).. Pozdrawiam też!