gruzin

Rzeczywiście, po narysowaniu kilku elementów i probie zapisu wyskakuje błąd zapisu. Kiedyś miałem taki sam problem, ale nie pamiętam co go naprawiło. Otworzyłem też ten plik autocadem 2010 i po przetestowaniu znalazłem tam 99 błędów: Zwcad nie znalazł żadnych błędów.

U mnie plik otwiera się i zapisuje bez błędu.

Jest taki stary lisp, który opisuje punkty na ZUDy: ;;; ---------------------------------------------------------------------------------- ;;; ;;;Program zpisuje do pliku współrzedne wskazanych punktów do pliku ;;;Moliwosc wstawienia znacznika punktu ;;;*** Dariusz Ptaszkiewicz [http] *** ;;;*** e-mail:dp@cad.pl *** (defun c:nxyz(/ NR NP ZN PD B old_cmdecho) (setq old_cmdecho (getvar "cmdecho")) (setvar "cmdecho" 0) (initget (+ 1 2 4)) (setq NR (getint "\nPodaj numer pierwszego punktu:")) (setq B (getreal "\Podaj wysokosc textu:")) (setq NP (getfiled "Wpisz nazwe pliku" "" "txt;csv;xls" 1)) (setq ZN (getstring "\Czy wstawiac znacznik punktu [T/N]:")) (SETQ PD (open NP "W")) (WRITE-line (strcat "Nr" "Y" ";" "X" ) PD) (while (setq WSKAZ_PUNKT (getpoint "\nWskaz punkt")) (setq WSPÓŁRZEDNA_Y (RTOS (cadr WSKAZ_PUNKT) 2 4)) (setq WSPÓŁRZEDNA_X (RTOS (car WSKAZ_PUNKT) 2 4)) (setq LINIA (strcat (rtos NR) WSPÓŁRZEDNA_Y ";" WSPÓŁRZEDNA_X );strcat ) (WRITE-line LINIA PD) (if (or (= ZN "t")(= ZN "t")) (progn (DRAW_PUNKT) (DRAW_TEXT) ) (DRAW_TEXT) ) (setq NR (1+ NR)) );WHILE (close PD) (setvar "cmdecho" old_cmdecho) (princ "\nKoniec") (princ) );defun ;;; ---------------------------------------------------------------------------------- ;;; (defun DRAW_TEXT (/) (command "_layer" "_m" "nxyz-nr" "_c" "7" "" "") (command "_text" WSKAZ_PUNKT B "0" NR) );defun ;;; ---------------------------------------------------------------------------------- ;;; (defun DRAW_PUNKT (/ d kat_90 kat_270 p1 p2 p3 p4) (command "_layer" "_m" "nxyz-pk" "_c" "7" "" "") (setq d (/ B 2)) (setq kat_90 (/ pi 2)) (setq kat_270 (* 3 kat_90)) (setq p1 (polar WSKAZ_PUNKT kat_90 d)) (setq p2 (polar WSKAZ_PUNKT kat_270 d)) (setq p3 (polar WSKAZ_PUNKT 0 d)) (setq p4 (polar WSKAZ_PUNKT pi d)) (command "_osmode" "0" "") (command "_line" p1 p2 "") (command "_line" p3 p4 "") );defun ;;; ---------------------------------------------------------------------------------- ;;; (princ (strcat "NXYZ.Lsp (C) Dariusz Ptaszkiewicz" " [e-mail:dp@cad.pl]" "\nPolecenie: nxyz " ) ) ;;; ---------------------------------------------------------------------------------- ;;; ;;; ---------------------------------------------------------------------------------- ;;; ;;; ---------------------------------------------------------------------------------- ;;;

Wyszła wersja PROFILKA 2011.04.13 Zmiany w stosunku do ostatniej wersji: - Przeprojektowałem polecenia do rysowania kształtek rurowych (zmniejszyłem ilość ikonek jednocześnie zwiększając możliwości całego paska) - Zrobiłem okienka dialogowe do wszystkich poleceń z paska RURY - Dodałem polecenie do rysowania rur i kolanek po klikanej trasie. - Dodałem kilka drobnych poleceń w nowym pasku - Usprawniłem kilka poleceń tak aby praca z nimi była bardziej intuicyjna Paski nakładki wyglądają teraz tak: Nakładka do ściągnięcia na stronie: http://instalacjesanitarne.com/download.htm Na stronie zaktualizowałem również opis wszystkich poleceń nakładki.

Wyszła wersja PROFILKA 2011.03.21 Zmiany w stosunku do ostatniej wersji: - Na zewnątrz raczej kosmetyczne, - Dodałem narzędzie do tworzenia warstw do rysowania schematów hydraulicznych, - Wprowadziłem we wszystkich poleceniach z paska "kanalizacja wewnętrzna" domyślne wartości wprowadzane za pomocą prawego kliknięcia myszą (lub Enter), - Usunąłem kilka znalezionych błędów, - Wprowadziłem możliwość wpisywania wielkości liczbowych w oknach dialogowych z kropką lub przecinkiem (oba sposoby wprowadzania danych są poprawne), - Ustawiłem warstwę "reklamy" przy metryce rozwinięcia kanalizacyjnego i profili podłużnych na niedrukowalną (można teraz zostawić ją na rysunku bez obawy pojawienia się na wydruku). Paski nakładki wyglądają teraz tak: Nowe okienka: Nakładka do ściągnięcia na stronie: http://instalacjesanitarne.com/download.htm Na stronie zaktualizowałem również opis wszystkich poleceń nakładki.

Nie zauważyłem żadnych problemów u siebie. Sterowniki do mojego sprzętu są. Trzeba pamiętać że system 64bitowy może uruchamiać wszystkie aplikacje 32bitowe, więc nakładki działają.

Miałem ten dylemat ponad rok temu. Wybrałem 64bity i nie żałuje, powiem więcej: gdybym wtedy wybrał 32 bity teraz bym żałował. Zwcad co prawda pracuje tak samo poprawnie na obu wersjach windowsa, ale są programy które na 64 bitach są szybsze. Ja polecam Ci 64bity.

W wersji Zwcada 2011 z dnia 2011 02 28 długie FIELDY już "nauczyły" się zawijac w tekście wielowierszowym. Niestety w dalszym ciągu nie działają FIELDY w blokach wstawionych do pliku poleceniem INSERT (w lispie).

W wersji ZwCad 2011 z dnia 2011 02 28 błąd został naprawiony.

Wyszła wersja PROFILKA 2011.03.08 Zmiany w stosunku do ostatniej wersji: - Usunąłem pasek z tabelkami i zamiast niego zrobiłem okno dialogowe przez które można wstawić do 25 przygotowanych tabelek rysunkowych. - Dodałem nowe okno dialogowe przed poleceniem opisywania profili podłużnych. - Dodałem okno dialogowe do polecenia rysowania studni na profilach podłużnych. - Dodałem nowe polecenia do rysowania rozwinięć kanalizacyjnych: rewizje, trójniki, wywiewki, zawory napowietrzające i redukcje. - Dodałem kilka nowych poleceń do schematów. - Zmiany w kodzie wewnętrznym programu, przeważnie niewidoczne. Paski nakładki wyglądają teraz tak: Nowe okienka: Nakładka do ściągnięcia na stronie: http://instalacjesanitarne.com/download.htm Na stronie zaktualizowałem również opis wszystkich poleceń nakładki.

Ja w nakładce PROFILEK (w pliku mnu jest tak: ***MENUGROUP=PROFILEK) zrobiłem do wczytania i usunięcia pasków takie polecenie: (defun c:profilek () (if (menugroup "profilek") (command "_menuunload" "profilek") (command "_menuload" "profilek.mnu") );if (princ) );defun profilek

mam plik dcl oraz do tego plik sld i lsp (wszytko w katalogu głównym Zwcada) Nie wiem czemu w oknie dialogowym nie wyświetla mi sie obrazek. Co robię nie tak? /////////////////////////////////// // okno główne komendy STUDNIA // /////////////////////////////////// studnia : dialog { label = "Studnia w przekroju"; : boxed_column { label = "Dane:"; : edit_box { edit_limit = 10; edit_width = 10; key = "DCL_srednica_studni"; label = "Średnica studni [cm]: "; } : edit_box { edit_limit = 10; edit_width = 10; key = "DCL_osadnik"; label = "Głębokość osadnika [cm]: "; } spacer; } : image { height = 20 ; width = 20 ; key = "profilek_studnia" ; value = "profilek_studnia.sld" ; color = 0 ; } ok_cancel; }

(vl-position "b" list) jest OK. Robi dokładnie to o co mi chodziło. Dzięki.

trochę przysypiam ale chyba powinno być tak: (chyba atoi i atof będą dobrze działać): :-) (action_tile "POPUP" "(setq POS (nth (atoi $value) LISTA))") a czy jest jakaś funkcja do odczytania na której pozycji w liście jest znany element?

Masz rację. Twój wzór okienka wygląda lepiej od mojego. Nie pozostaje mi zatem nic innego tylko opanować ":popup_list". Mam też pytanie: co to jest :POP_UP_10 i czy różni się czymś od :popup_list?

Zapamiętanie ustawień okna DCL w liście bardzo mi się spodobało. Co prawda nie jest to w tym przypadku funkcjonalność niezbędna, ale przeanalizowałem i zaadoptowałem twoją część kodu. Zrobiłem w Profilku kolejne okienko, tym razem do starego polecenia "pks" i tu zapamiętanie ustawień jest bardzo przydatne.

Stronę afralisp.net znam (wiem że istnieje). Zastanawiam się, czy moja ślubna też zacznie węszyć po necie jak jej coś obiecam w nagrodę... Trzeźwo myśląc, chyba jednak czeka mnie wycieczka do czytelni na politechnice. Tak będzie szybciej...

Wyszła wersja PROFILKA 2011.02.13 Przebudowałem paski nakładki aby kolejne polecenia znajdowały sie w bardziej intuicyjnych miejscach. Dodałem kilka nowych poleceń do schematów. Dodałem pasek GAZ z nowym poleceniem do wstawienia gazomierzy oraz wprowadziłem kilka niwidocznych dla użytkownika poprawek i usprawnień. Paski nakładki wyglądają teraz tak: Okienko do wstawiania gazomierzy tak: Nakładka do ściągnięcia na stronie: http://instalacjesanitarne.com/download.htm Na stronie zaktualizowałem również opis wszystkich poleceń nakładki.

ten skan mi wszystko wyjaśnił. dzięki podejrzewam, że to z tej książki: http://helion.magazyn.pl/AutoCAD-LSP-i-DCL-Programowanie-okien-dialogowych-w-przykladach/LSPDCL/ksiazka.html wie ktoś może czy można gdzieś zdobyć ta książkę (drukowaną, pdf lub jpg).

Zaczynam się uczyć DCLa i jak to na początku nauki nowych rzeczy mam problem z podstawami. Jak mam odczytać które wartości w oknie są pozaznaczane? Próbowałem to zrobić samemu ale poddałem się. ideałem byłoby zapisanie w lispie zaznaczonego LABEL gazomierza do jednej zmiennej a LABEL widoku do drugiej. dcl: metrixgaz : dialog { label = "Gazomierze METRIX"; :boxed_radio_column { label = "Gazomierz" ; : radio_button { key = "gm1" ; label = "Gazomierz - UG (G1,6 G2,5 G4)" ; } :radio_button { key = "gm2" ; label = "Gazomierz - 6G4, 6G6" ; value = "1" ; } :radio_button { key = "gm3" ; label = "Gazomierz - 6G4-250" ; } :radio_button { key = "gm4" ; label = "Gazomierz - G10" ; } :radio_button { key = "gm5" ; label = "Gazomierz - G16, G25" ; } :radio_button { key = "gm6" ; label = "Gazomierz - G40, G65" ; } } :boxed_radio_column { label = "Widok" ; : radio_button { key = "ww1" ; label = "Widok z przodu" ; value = "1" ; } :radio_button { key = "ww2" ; label = "Widok z boku" ; } } :button { label = "Wstaw"; key = "Wstaw"; is_cancel = true; width = 20; fixed_width = true; } } lisp: (defun c:metrix_gaz() (setq dcl_id(load_dialog "profilek.dcl")) (new_dialog "metrixgaz" dcl_id) (start_dialog) (unload_dialog dcl_id) )

wpisujesz z klawiatury "_elevation" i podajesz nową rzędną "Z"

Jeszcze ciekawostka (w załączniku przykład). Błędny blok był wstawiony do rysunku dwg za pomocą polecenia insert (lispem). Skopiowałem go w prawa stronę, rozbiłem i stworzyłem nowy blok z rozbitych elementów. Nowy blok wyświetla poprawnie FIELD'y. Poza tym pierwszy blok wyświetla jakoś grubiej tekst. Nie rozumiem takiego zachowania. tabelka-field2.zip

Jeszcze jeden problem z FIELDS. Jeżeli mamy wstawione Field'y w bloku, to nie ma możliwości ich zmiany. Jeżeli zmienimy w ustawieniach wartości Field'a to w bloku się nie uaktualnia (regen nie wpływa na uaktualnienie bloku). Zostaje wartość taka jak była w momencie wstawienia bloku. Takie zachowanie się field'ów czyni z nich bezużyteczne narzędzie do tworzenia tabelek rysunkowych. W załączniku tabelka w bloku z fieldami. Ich edycja nie wpływa na tabelkę. Jedynym rozwiązaniem jest rozbicie tabelki. Proszę zgłosić ten problem producentowi Zwcada. tabelka-field.zip

podczas poznawania FIELDS i ich obsługi w Zwcadzie zauważyłem pewną niedogodność (błąd). odtworzenie problemu -Mamy wstawiony w FIELD'zie długi tekst ze spacjami, np Nazwę inwestycji, którą chcemy wstawić sobie w tabeli na rysunku. - Wstawiamy tekst wielowierszowy a w nim naszego FIELD'a. Jeżeli szerokość tekstu wielowierszowego jest mniejsza niż zajmuje tekst z FIELD'a to FIELD powinien załamać się do następnej linijki.... ale w ZWCADZIE tego nie robi. Sprawdzałem na konkurencji i tam jest OK. W załączniku przykład. field.zip

zwcad najnowsza wersja 2011PRO angielska Command: (setq SI (vla-get-SummaryInfo (vla-get-ActiveDocument (vlax-get-acad-object)))) # Command: (vlax-invoke-method SI 'GetCustomByIndex 0 'K 'V) error: *Error* (VLAX-INVOKE-METHOD SI (QUOTE GETCUSTOMBYINDEX) 0 (QUOTE K) (QUOTE V)) Command: (princ K) nilnil Command: vernum _VERNUM = "2010.11.25(16241)" (read only)