Vytisknout stránku | Zavřít okno

Chyba v příkazu _ddedit

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: CAD programování
Popis fóra: Otázky programování - nadstavby a utility pro CAD a GIS aplikace Autodesk (VBA, AutoLISP, ARX/C++, .Net, JavaScript, Python, MEL...)
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=3769
Datum vytištění: 13.kvě.2026 v 08:53


Téma: Chyba v příkazu _ddedit
Odeslal: iand
Předmět: Chyba v příkazu _ddedit
Datum odeslání: 18.led.2007 v 09:10
Potřebuji použít v ACADu 2004 příkaz _ddedit v lispu. Příkaz by měl umět zpracovat
text, mtext, dimension a attribute.
Při spuštění příkazu _ddedit z příkazového řádku vše funguje. Při spuštění z lispu funguje jen text,
u ostatních entit vznikne chyba "irfcld".
Ví někdo, v čem je chyba?

Příklad použití:

;;; tt.lsp
;;; editace textu, mtextu, koty z výběrové množiny

(defun c:tt ( / ss sslen cnt ent)
(setq ss (ssget
      '((-4 . "<OR")
        (0 . "TEXT")
        (0 . "MTEXT")
        (0 . "DIMENSION")
        (-4 . "OR>")
       )
    )
)
(setq sslen (sslength ss))
(setq cnt 0)
(while (< cnt sslen)
    (setq ent (ssname ss cnt))
    (command "_ddedit" ent "")
    (setq cnt (1+ cnt))
    (princ)
)
)


A. spuštění z lispu: funguje jen text, mtext ani dimension nefungují (attribute jsem nezkoušel):

Příkaz: tt
Vyberte objekty: nalezeno: 1                                               ;vybrán text
Vyberte objekty: nalezeno: 1, celkem 2                                    ;vybrán mtext
Vyberte objekty:
_ddedit
Vyberte objekt poznámky nebo [Zpět]:                                       ;text zpracuje správně
Příkaz: _ddedit
Vyberte objekt poznámky nebo [Zpět]:   CHYBA aplikace: irfcld              ;mtext popř. i dimension havaruje
Příkaz: ; chyba: Nastala chyba uvnitř funkce *error*příliš mnoho argumentů ;co je to za chybu?

B. spuštění z klávesnice: funguje všechno

Příkaz: (setq ent (entsel))
Vyberte objekt: (<Jméno entity: 7ef605d0> (11.7618 19.7676 0.0))           ;vybrán mtext piknutím
Příkaz: _ddedit                                                            ;mtext zpracuje správně
Vyberte objekt poznámky nebo [Zpět]: "AAAAAAAAAAA\\PLLLLLLLLLLL"

Vyberte objekt poznámky nebo [Zpět]: !ent                                  ;vybrán mtext pomocí !ent
(<Jméno entity: 7ef605d0> (11.7618 19.7676 0.0))
"AAAAAAAAAAA\\PLLLLLLLLLLL"                                                ;opět mtext zpracuje správně
Vyberte objekt poznámky nebo [Zpět]:



-------------
Ivan Anděl
ACAD2004CZ


Odpovědi:
Odeslal: iand
Datum odeslání: 30.led.2007 v 18:19
Vážení,
najde se někdo, kdo na to přijde?
Otestujte to prosím někdo na ACADu2006, třeba zlobí ten editor :lisped, byly s ním potíže odjakživa.
Dost bych potřeboval, aby to fungovalo.
Díky Ivan Anděl

-------------
Ivan Anděl
ACAD2004CZ

Odeslal: PepaR
Datum odeslání: 31.led.2007 v 17:34
Zkuste se mrknout do zdrojáku této funkce, ta zpracová taktéž TEXT, MTEXT i kóty.
 
http://www.cadforum.cz/forum/uploads/20070131_173403_ddntext.zip - uploads/20070131_173403_ddntext.zip


-------------
PepaR
https://www.jremes.cz" rel="nofollow - jremes.cz | https://www.stavlab.cz" rel="nofollow - stavlab.cz

Odeslal: iand
Datum odeslání: 31.led.2007 v 18:24
Díky,
samostatně to funguje výborně, při vyvolání z mého lispu zatím ne, snad se mi to podaří nějak správně propojit.
Ivan Anděl

-------------
Ivan Anděl
ACAD2004CZ


Vytisknout stránku | Zavřít okno