kruszynski

Instrukcja obsługi nakładki Tools2 zawierająca też opis instalacji dostępna jest pod adresem: Instrukcja Tools2

Dzień dobry opracowaliśmy nakładkę, do ZWCADa, która umożliwia zapis współrzędnych punktów do pliku tekstowego. Wersja testowa nakładki jest dostępna tutaj: Tools 2 dla ZWCAD 2011 Opis nakładki TOOLS2

Producenci ZWCADa rozpoczęli pracę nad dostosowaniem ZWCADa do innych systemów operacyjnych niż Windows. W pierwszej kolejności planują opracować wersję na Mac lub iPad. W związku z tym, że opracowanie pełnej funkcjonalności będzie raczej czasochłonne, pierwsza wersja będzie okrojona pod względem funkcjonalnym. Lista funkcji, które zostaną opracowane nie jest jeszcze zamknięta. Właśnie w celu uściślenia jakie są najpotrzebniejsze funkcje prosiłbym o wypełnienie ankiety z załącznika. Jest tam lista wielu funkcji, proszę zaznaczać te, które są przez Państwa najczęściej używane, i odesłać na adres pomoc@zwcad.pl. W załączniku dostępny jest jeszcze skrypt, który rejestruje uruchamiane polecenia. Jest to przydatne narzędzie właśnie do prowadzenia statystyk uruchamianych poleceń. Jeśli chcieliby Państwo pomóc w udoskonaleniu ZWCADa proszę o wypełnienie aniety, lub zainstalowanie skryptu i przesłanie nam wyników. Proszę o przesłanie danych przed 12 kwietnia. command recorderv4.0.zip CAD Frequent Used Commands Survey.pdf

Dziękuję za zgłoszenie, przekażemy problem Producentom programu. Jako rozwiązanie obejściowe mogę zasugerować wpisywanie wartości atrybutów w oknie właściwości, tam można wpisywać wszystkie polskie znaki.

Otrzymałem odpowiedź w sprawie ładowania ikonek z pliku XML. Niestety na chwilę obecną nie jest możliwe ładowanie menu i ikonek z pliku XML z poziomu VBA i LISP

Nie znam sposobu wczytania pliku xml zawierającego definicję ikonek, Zapytam producentów ZWCADa czy to jest możliwe a jeśli tak, to w jaki sposób. Co mogę Panu poradzić, to stworzenie ikonek w oddzielnych plikach. Każda ikonka powinna być zapisana w oddzielnym pliku bmp o rozmiarze 16x16 pikseli. Wszystkie one powinny być zapisane w katalogu widocznym przez ZWCADa, czyli w katalogu ZWCADa, lub innym, który ustawiony jest w ścieżkach w opcjach.

Testowałem to na najnowszej wersji i problem nie zaistniał. Nowa wersja Patrz tutaj

Jest taka możliwość. w pliku .mnu powinien mieć Pan ***MENUGROUP=Nazwa Gdzie Nazwa to nazwa menu, najczęściej nazwa nakładki. Jeśli taki element jest zdefiniowany, to żeby w łatwy sposób przeładować menu, wystarczy w ZWCAD uruchomić polecenie menuload, w nowym okienku w liście powinny być dwie pozycje ZWCAD i Nazwa. teraz wystarczy zaznaczyć odpowiednią pozycję i kliknąć przycisk [usuń konf] jak na poniższym obrazku. Następnie należy poniżej wskazać ścieżkę, gdzie jest zdeeiniowane nasze menu i kliknąć [Wczytaj]. Proszę pamiętać, żeby nie zaznaczać opcji Zastąp wszystko. Można też to samo zrobić z poziomu programisty. Przykład w LISP wyglądałby następująco: (command "menuunload" "Nazwa") (command "menuload" "C:\\Sciezka\\NazwaPliku.mnu"))

Wniosek przyjęty :) Już jakiś czas temu, po zgłoszeniach Klientów przekazaliśmy takie zapotrzebowanie producentom ZWCADa. Opcja taka zostanie wprowadzona.

Wysłałem do Pana wiadomość prywatną, proszę sprawdzić.

Kiedyś dawno była w ZWCAD taka zmienna systemowa: (setvar "_ZW_UUIDOFUSERMODULE" 1 ) Dokładnie jej sensu nie pamiętam, ale pamiętam że miała jakiś związek z reaktorami, proszę sprawdzić, czy jej ustawienie na 1 nie spowoduje jakiejś poprawy. Zapytam również ZWSOFT o wyjaśnienie co może powodować Pana problemy.

Próbowałem uruchomić ten reaktor i u mnie działa bez problemów w LISP. Może dopisał Pan tam coś więcej niż było w przykładzie i stąd problem. W zasadzie wystarczy: (vl-load-com) (vlr-command-reactor nil '((:vlr-commandWillStart . commandWillStart))) (defun commandWillStart(reactor_object lista) (alert (vl-princ-to-string lista)) ) po uruchomieniu dowolnego polecenia, jego nazwa wyświetli się w dodatkowym okienku na ekranie. W vba jest to jeszcze łatwiejsze, wystarczy w oknie kodu ThisDocument, wybrać "BeginCommand" jak na załączonym obrazku,

Potwierdzam jest jakiś problem z funkcją getCustomByIndex. Zgłoszę to doZWSOFT.

Istnieje możliwość zakupu aktualizacji. Jej cena do końca miesiąca obniżona jest o 50% czyli cena wynosi: 215 zł netto za wersję standard i 265 zł netto za wersję professional. Nie ma znaczenia z której poprzedniej wersji chce Pani aktualizować Jakie inne informacje Panią interesują?

Używając vla-InsertBlock jest jeszcze łatwiejsze. Wystarczy zdefiniowany blok wstawić, atrybuty wstawią się automatycznie zgodnie z wartościami domyślnymi. Atrybuty można potem pobrać bloku i edytować zgodnie z własnymi potrzebami. Np tak: ;(setq *DescBlockName* MojaNazwaBLoku) ;(setq InsPoint (list 12 15 0)) (setq DescBlock(vla-InsertBlock *Modelspace* (vlax-3d-point InsPoint ) *DescBlockName* 1 1 1 0)) Pobranie atrybutów z tego cuda: (if (vlax-get-property DescBlock 'HasAttributes)(progn (setq ExAttrbs(vlax-safearray->list(vlax-variant-value(vla-getattributes DescBlock)))) )) Wycinałem to z większego fragmentu kodu, więc po prostym skopiowaniu może się nie uruchamiać, ale po podstawieniu własnych wartości pod zmienne powinno być bez problemów.

Taki mój przykładzik na wstawianie bloków z atrybutami przez entmake (defun d2r (degs /) (/(* pi degs)180.0)) (defun DrawLine (SP EP / OutLine LiniaDef) (setq LiniaDef(entmake (list '(0 . "LINE") '(100 . "AcDbEntity") '(100 . "AcDbLine") (cons 10 (list (car SP) (cadr SP) (caddr SP))) (cons 11 (list (car EP) (cadr EP) (caddr EP)))))) (if LiniaDef (setq OutLine (entlast))) OutLine ) (defun DrawCoordCross ( / OutBlock Name qwe LinePion LinePoziom) (setq Name "Geo_Krzyz") (setq qwe (tblobjname "block" Name )) (if (null qwe) (progn (entmake (list (cons 0 "BLOCK") (cons 100 "AcDbEntity")(cons 100 "AcDbBlockBegin") (cons 67 0)(cons 8 "0")(cons 70 0)(cons 10 (list 0.0 0.0 0.0))(cons 2 Name)(cons 1 ""))) (setq LinePion (DrawLine (list -4 0 0)(list 4 0 0))) (setq LinePoziom (DrawLine (list 0 -4 0)(list 0 4 0))) ;(setq XAtrib(entmake (list '(0 . "ATTDEF")(cons 100 "AcDbEntity")'(8 . "0")'(10 0.0 0.0 0.0)'(1 . "X")'(2 . "X") '(3 . "")'(40 . 1.0)'(41 . 1.0)'(50 . 0.0)'(70 . 0)'(71 . 0)'(72 . 0)'(73 . 2)))) ;(setq YAtrib(entmake (list '(0 . "ATTDEF")(cons 100 "AcDbEntity")'(8 . "0")'(10 0.0 0.0 0.0)'(1 . "Y")'(2 . "Y") '(3 . "")'(40 . 1.0)'(41 . 1.0)(cons 50 (d2r -90))'(70 . 0)'(71 . 0)'(72 . 0)'(73 . 2)))) (entmake '((0 . "ENDBLK"))) )) OutBlock ) (defun C:Cross ( / ) (DrawCoordCross) (setq InsPoint (list 123.0 12 0)) (if InsPoint(progn (setq BlockRef(InsertBlock "Geo_Krzyz" InsPoint 1 1 1 0)) (setq Insertion(entmake(list '(0 . "INSERT") '(100 . "AcDbEntity")'(100 . "AcDbBlockReference") '(2 . "Geo_Krzyz") (cons 8 "0") (cons 10 InsPoint) (cons 41 1) (cons 42 1) (cons 43 1) (cons 50 0) '(66 . 1) ) )) (entmake (list (cons 0 "ATTRIB") (cons 11 InsPoint) (cons 40 1) (cons 1 (rtos (car InsPoint) 2 0)) (cons 2 "X") (cons 7 (getvar "TEXTSTYLE")) (cons 70 0) (cons 72 0) (cons 74 1) ) ) (entmake (list (cons 0 "ATTRIB") (cons 11 InsPoint) (cons 40 1) (cons 1 (rtos (cadr InsPoint) 2 0)) (cons 2 "Y") (cons 7 (getvar "TEXTSTYLE")) (cons 70 0) (cons 50 (d2r -90)) (cons 72 0) (cons 74 1) ) ) (entmake (quote((0 ."SEQEND")))) (setq CrossEnt (entlast)) )) )

w katalogi, gdzie zainstalowany jest ZWCAD, jest katalog ZRXSDK, tam jest kilka przykładów prostych aplikacji tłumaczących zasady używania moedelu obiektowego ZWCADa w VS. Przykłady są w C++ nie bez .NET , ale jest też kilka plików dokumentacji. co do dokumentów, to jest dostępnych kilka pozycji w internecie poświęconych ARX, np: arxdummies Po polsku podstawy ARX, ale daje ogólny pogląd na ZRX: badziewiak

Aplitop ma i może podać :) Zazwyczaj rejestracje obsługiwane są bez konieczności czekania.

Tak łatwo to się nie da. Nie ma zmiennej systemowej, która to kontroluje. Nie znam żadnego sensownego sposobu na wyłączenie.

Serdecznie zapraszamy za seminarium poświęcone programowi ZWCAD, które odbędzie się w Gdańsku 10 lutego 2011 roku Uczestnicy będą mieli możliwość zapoznania się z najnowszą wersją oprogramowania ZWCAD 2011, ale także – z systemem ZW3D, również będącym w ofercie firmy. Seminarium będzie niewątpliwą okazją do nawiązania kontaktów z innymi użytkownikami ZWCADa. Tradycyjnie, po seminarium będzie można zakupić program w atrakcyjnej cenie, a każdy z uczestników będzie mógł wziąć udział w konkursie, w którym nagrodami będzie oprogramowanie komputerowe. Program seminarium: 9:30-10:00 Rejestracja uczestników 10:00-11:30 Prezentacja nowości w ZWCAD 2011 11:30-12:30 Prezentacja programu ZW3D 12:30-13:00 Przerwa kawowa, konkurs z nagrodami 13:00-14:00 Prezentacja aplikacji dodatkowych do ZWCAD 14:00-15:00 Warsztaty Data i miejsce: czwartek 10.02.2011 r., hotel Novotel Gdańsk Centrum, ul. Pszenna 1 Więcej informacji: 33 488 89 39 Aby zgłosić swoje uczestnictwo w seminarium wystarczy wypełnić formularz zgłoszeniowy i wysłać na adres: zwcad@zwcad.pl lub fax-em: 33 470 65 18

Proszę sprawdzić, czy w czasie instalacji zainstalował się u Pana plik: "c:\mdt5\dotnet\reg.bat" (lub "c:\mdt5\dotnet\reg64.bat" jeśli używa Pan systemu 64 bitowego) Problem, jaki Pan opisał najprawdopodobniej sposodowany jest jakimiś ustawieniami polityki bezpieczeństwa, lub antywirusem, który blokuje pewne kroki w instalacji.

Nie używałem nigdy progressBar więc nic pewnego powiedzieć nie mogę, ale: Mogę się podzielić przykładowym plikiem, gdzie jest użyty prosty przykład współpracy sds i LISP (patrz Załącznik). Można w nim zobaczyć jak powinien wyglądać plik w C++ używający funkcji SDS. Nie wczytywałem tego w VBA, ale myślę, że taka przykładowa składnia powinna być użyteczna: Private Declare Function NazwaFunkcji Lib "plik.dll" (ByVal hKey As Long) As Long W ten sposób można zrobić inerface VBA do używania funkcji SDS. invoke dialog from DLL.rar

Zgłosiłem to producentowi nakładki. kiedy otrzymam odpowiedź prześlę ją. Proszę o informację jakiego systemu operacyjnego Pan używa? I czy w czasie instalacji jest Pan zalogowany na koncie z prawami administratora?

OK, rzeczywiście nie powinno tak być. Zgłoszę to do supportu

Proszę spróbować wstawić initget w tym kodzie w liniach 155 i 175, w taki sposób: (setq PunktT0 PunktT1 ) (initget 0) (setq PunktT1 (getpoint PunktT0 "\nKliknij kolejny punkt na rzucie.") U mnie zadziałało na 2011