kruszynski

Moderatorzy
  • Postów

    1474
  • Dołączył

  • Ostatnia wizyta

  • Wygrane w rankingu

    93

Treść opublikowana przez kruszynski

  1. proszę o więcej informacji jak taka funkcja powinna działać, co użytkownik sam określa, a co powinno być wynikiem działania funkcji, jeśli będzie to możliwe opracujemy taką funkcję
  2. W ZWCAD nie ma analogicznego polecenia.
  3. OK. polecenie ZWCADa, Extrim takie do wpisania w linii poleceń jest. funkcji możliwej do wykorzystania w programie lispowym, rzeczywiście brak. Skonsultujemy z ZWSOFT czy jest możliwość zaimportowania poleceń ExpresTools jakoś inaczej. Jako rozwiązanie tymczasowe może Pan spróbować zmienić : (etrim w linii ;(etrim % (cdr (assoc 10 (entget %)))) na (command "Extrim" .
  4. W ZWCAD również jest dostępna funkcja Extrim. jednak w załączonym kodzie jest ETRIM bez X. Więc albo autor łaskaw był napisać własną funkcję która się nazywa ETRIM i zapisał ją w pliku extrim albo przy kopiowaniu kodu komuś się X nie skopiował, ale żeby 2 razy?
  5. W programie użyta jest funkcja etrim. (if (not etrim)(load "extrim" 1)) powinno spowodować, że funkcja ta zostanie wczytana a pliku "extrim". Proszę się upewnić czy ma Pan plik extrim.lsp w katalgu widocznym przez ZWCADa, czyli w katalogu samego programu, lub w którymś z katalogów ustawionych w opcjach ZWCADa.
  6. Aktualnie tworzymy harmonogram seminariów na grudzień. Jeśli mają Państwo sugestie jakie tematy powinniśmy poruszać w czasie seminariów, proszę o ich przedstawienie.
  7. Wiam Chciałbym poinformować a zarazem zaprosić do udziału w organizowanych przez nas seminariach online. Tematy seminariów dotyczą programu ZWCAD i nakładek branżowych, harmonogram seminariów mogą Państwo poznać odwiedzając stronę: www.szansa.net.pl/...seminaria
  8. Proszę zrestartować komputer. Jeśli to nie pomoże być może nastąpił jakiś problem z instalacją. W takim przypadku należy przeinstalować program. Jeśli ma Pan program zabezpieczony kluczem sprzętowym, proszę pamiętać o jego wyjęciu na czas instalacji
  9. Jeśli to możliwe proszę o zrzut ekranu z okienka właściwości wydruku. Być może jest zaznaczona jakaś opcja, która to powoduje
  10. A może aktualizacja sterowników drukarki mogłaby pomóc.
  11. Ja tego nie pisałem więc nie mogę z całą pewnością stwierdzić w czym to powstało, ale widzę, że wykorzystane jest tu MFC, a do tego potrzebna jest wersja Professional. Moim zdaniem jeśli zamierza Pan pisać jakieś nakładki, to polecam ZRX zamiast SDS.
  12. Niestety w ZWCAD niektóre funkcje VisualLisp nie są jeszcze dostępne, vla-get-supportpath należy do tej grupy.
  13. W wersji 2012 ta funkcja zostanie wprowadzona. Sprawdzałem na wersji beta i ta funkcja jest dostępna
  14. Informacje w sprawie wysokości są takie, że w chwili obecnej nie jest możliwe ustawianie wysokości mniejszej niż 1. W przyszłości taka możliwość zostanie dodane. Numer ID tego zgłoszenia to: 16136
  15. Wysokość nie jest podawana w pikselach. Raczej jest to wysokość jednego znaku - litery. Możliwe jest podawanie wartości ułamkowych, ale nie mniejszych niż 1. Wysłałem pytanie do ZWSOFT w sprawie możliwości wprowadzenia wartości mniejszej od 1.
  16. hm. Ciekawy przypadek. Nie spotkaliśmy się wcześniej z takim objawem. Jeśli to możliwe proszę o przesłanie przykładowego pliku, w którym występuje takie zachowanie na adres pomoc@dobrycad.pl. Postaramy się ustalić przyczyny i jakoś to rozwiązać: dodatkową funkcją do weryfikacji powierzchni kreskowania, lub innym sposobem obliczania powierzchni do opisów
  17. W obecnej wersji nie ma takiej możliwości
  18. W LISP za przykład może posłużyć : (setq defnition(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 "*Z")(cons 1 "")))) (setq LiniaDef(entmake (list '(0 . "LINE") '(100 . "AcDbEntity") '(100 . "AcDbLine")(cons 10 (list 0 0 0))(cons 11 (list 100 120 0))))) (setq BezNazwa(entmake '((0 . "ENDBLK")))) (setq Insertion(entmake(setq naglowek (list '(0 . "INSERT") '(100 . "AcDbEntity")'(100 . "AcDbBlockReference") (cons 2 BezNazwa) (cons 10 (getpoint)) (cons 50 0) '(66 . 1) ) ))) (entmake (quote((0 ."SEQEND"))))
  19. Trzeba tą listę nowych współrzędnych zapisać jako variant elementów typu double: (vl-load-com) (defun L2v(lista typ / NObj SelObjArray i iList SelObjArrayVar) (setq NObj (length lista)) (setq SelObjArray (vlax-make-safearray typ (cons 0 (- NObj 1) ))) (setq i 0) (repeat NObj (vlax-safearray-put-element SelObjArray i (nth i lista)) (setq i (1+ i)) ) (vlax-safearray-fill SelObjArray lista) (setq SelObjArrayVar (vlax-make-variant SelObjArray)) ) (setq entOb (vlax-ename->vla-object (car(entsel)))) (setq Coord (vlax-safearray->list (vlax-variant-value (vlax-get entOb 'Coordinates)))) ; - ZwCAD (setq Coord(L2V(LIST 1500.20 111.000 1312.12 123.210) vlax-vbDouble)) (vlax-put-property entOb 'Coordinates Coord) (vla-update entOb)
  20. Zgłoszenie zapotrzebowania otrzymało numer ID: T4225
  21. Zgłoszenie błędu otrzymało numer ID: T4224
  22. Sprawdzaliśmy to na różnych systemach. Na XP działa bez problemu tak, jak u Pana. A na Viście jakoś nie chce.
  23. Teraz się zgadza. jak się dorysuje kilka elementów, i zrobi drugi ssget. to _select zawiesza. Zgłoszę ten błąd
  24. Sprawdziłem to u siebie i nie zawiesiło mi się. Proszę może sprawdzić na jakimś innym pliku, albo podesłać mi plik na którym to się dzieje
  25. tak, cudzysłów jest w pliku scr. Przy kopiowaniu mi się pominął