Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk - od firmy Arkance Systems [www.cadforum.cz]
CZ | SK | EN | DE
Přihlášení
či registrace
   právě nás čte: 8739 
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

 

NápovědaCAD diskuze, rady, výměna zkušeností

 
CAD Fórum - Homepage Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion 360, 3ds Max a s dalšími CAD aplikacemi. Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.
Fórum nenahrazuje technický support firmy Arkance Systems (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.cadstudio.cz
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Téma uzavřenopotlacenie dialogoveho okna v lispe

 Odpovědět Odpovědět archiv
Autor
Augur Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 24.led.2005
Stav: Offline
Bodů: 103
Přímý odkaz na tuto zprávu Téma: potlacenie dialogoveho okna v lispe
    Zasláno: 14.srp.2007 v 07:43
Dobry den. Chcem v scripte pouzit lisp, ktory vyexportuje vsetky texty z vykresu. Pred samotnym ulozenim textoveho dokumentu sa mi objavi dialogove okno, ktore neviem potvrdit priamo zo scriptu.. Ako sa da upravit lisp (vykonavajuci export textu) aby som obysiel dialog.. Uvazoval som, ci by nebolo riesenim pouzit aplikaciu Timer.arx, ale pod CAD2007 sa neda nacitat.

Upravil Augur - 14.srp.2007 v 08:33
Designer/Projektant/Ucitel
Autocad 2007
Zpět nahoru
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1675
Přímý odkaz na tuto zprávu Zasláno: 14.srp.2007 v 08:41
Nerozumim jaky dialog mate na mysli.
Pokud dialog na ulozeni souboru, tak promenna FILEDIA.
Pokud se jedná o dialog nejake funkce AutoCadu, tak zalezi na tom, zda podporuje i rezim bez dialogu - casto ten prikaz zacina "-" (napr. "plot" a "-plot").

Zpět nahoru
Mrázek Zobrazit panel
TOP uživatel
TOP uživatel
Avatar

Přihlášen: 05.říj.2004
Lokalita: ČR (LB)
Používám:
Inventor 2018, AutoCAD 2018, Vault Pro 2018
Stav: Offline
Bodů: 1199
Přímý odkaz na tuto zprávu Zasláno: 14.srp.2007 v 08:42
Dialogové panely se vypínají systémovou proměnnou FILEDIA (načtení a uložení souborů), popř. CMDDIA (ostatní příkazy). Takže na začátku rutiny si tyto proměnné nastavte na 0 a na jejím konci zpět na 1.
Ing. Zdeněk Mrázek
Preciosa Ornela a.s.
AIP 2018, ACADM 2018, Vault Pro 2018
Zpět nahoru
Augur Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 24.led.2005
Stav: Offline
Bodů: 103
Přímý odkaz na tuto zprávu Zasláno: 14.srp.2007 v 11:06
Ano o premennych "filedia" a cmddia" viem a pouzivam ich, ale na toto nemaju vlyv. Kedze tento export sa robi pomocou lispu, zaujimalo ma, ci sa da nejakou upravou samotneho lispu potlacit dialog.
Samotny lisp vyzera asi takto.

(defun c:txtexprt ()
(setq sset (ssget '((0 . "TEXT"))))
(if sset
    (progn
      (setq itm 0)
      (setq num (sslength sset))
      (setq fn (getfiled "Text Export File" "" "txt" 1))
      (if (/= fn nil)
        (progn
          (setq fh (open fn "w"))
          (while (< itm num)
            (setq hnd (ssname sset itm))
            (setq ent (entget hnd))
            (setq stv (cdr (assoc 1 ent)))
            (princ (strcat stv "\n") fh)
            (setq itm (1+ itm))
          )
          (close fh)
        )
      )
    )
)
(setq sset nil)
(princ)
)
Designer/Projektant/Ucitel
Autocad 2007
Zpět nahoru
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1675
Přímý odkaz na tuto zprávu Zasláno: 14.srp.2007 v 14:25
vzdyt Vy si ten dialog sam otevirate.
radku
(setq fn (getfiled "Text Export File" "" "txt" 1))

nahradte
(setq fn (getstring "Zadej jmeno souboru: "))

nebo rovnou natvrdo napsat hodnotu stringu

pokud chcete aby to zaviselo na promene FILEDIA tak bych to resil podminkou
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 5215:VIPZrychlení zobrazení okna Vlastnosti (velké výkresy).
Tip 8769:VIPUložení nastavení okna VBA Editoru.
Tip 6454:VIPAutomatický výkaz směru otevírání oken v AutoCADu Architecture
Tip 4215:VIPJak vrátit/změnit polohu/ukotvit okno příkazového řádku AutoCADu?
Tip 4050:VIPVypnutí funkce Nové vlastnosti (systémově/síťově).
Tip 2265:VIPChyba 800a0046 při spouštění okna Dnes (Today).


 Odpovědět Odpovědět

Přejít na fórum Oprávnění fóra Zobrazit panel



Stránka byla vygenerována za 0,734 sekund.