Diskuzní fórum, poradna

archiv · (moderátor)

   Jeden uživatel mi tvrdí, že v AC2008 se mu po spuštění lispovského kódu, kterým jsem definoval příkaz, otevře textové okno. Mně to nedělá. Čím by to mohlo být způsobeno? Kdy se otevírá textové okno samo? Při chybě?

(kód je tento - ale myslím, že to není podstatné:)
;vyplněnní řádku nadsavby
;**************************
(defun c:radek()

(setq mer (getvar "USERR1"))
(if (= mer 0.0)(progn(setq mer(getreal "Měřítko výkresu: "))(setvar "USERR1" mer)))
(if (= mer 0.0)(exit))
(setq OSN (GETVAR "OSMODE"))
(SETVAR "OSMODE" 32)
(setq P1 P P nil)
(startapp Radek_program)
(while (= P nil)
(setq P(getpoint "L.D.R. řádku: "))
(if (and (= P nil)(/= P1 nil))(progn
     (setq P (list (car P1)(+(cadr P1)(* mer 8))))
))
)

 (command "_INSERT" "*C:\\RADEK.dxf" P mer  '0 )
(SETVAR "OSMODE" OSN)
)

CZ \| SK \| EN \| DE
Přihlášení
či registrace
	právě nás čte: 7214

Autor	Zpráva Najít Téma Možnosti tématu Odpovědět Vytvořit nové téma Verze pro tisk Přeložit Téma
Seiner Profil člena Odeslat soukromou zprávu Najít příspěvky člena Přidat do seznamu známých CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662	Téma: Samovolně se otevírající textové okno Zasláno: 11.čer.2007 v 13:36
	Jeden uživatel mi tvrdí, že v AC2008 se mu po spuštění lispovského kódu, kterým jsem definoval příkaz, otevře textové okno. Mně to nedělá. Čím by to mohlo být způsobeno? Kdy se otevírá textové okno samo? Při chybě? (kód je tento - ale myslím, že to není podstatné:) ;vyplněnní řádku nadsavby ;************************** (defun c:radek() (setq mer (getvar "USERR1")) (if (= mer 0.0)(progn(setq mer(getreal "Měřítko výkresu: "))(setvar "USERR1" mer))) (if (= mer 0.0)(exit)) (setq OSN (GETVAR "OSMODE")) (SETVAR "OSMODE" 32) (setq P1 P P nil) (startapp Radek_program) (while (= P nil) (setq P(getpoint "L.D.R. řádku: ")) (if (and (= P nil)(/= P1 nil))(progn (setq P (list (car P1)(+(cadr P1)(* mer 8)))) )) ) (command "_INSERT" "*C:\\RADEK.dxf" P mer '0 ) (SETVAR "OSMODE" OSN) )
	Vítězslav Seiner Chrudim

Vladimír Michl Profil člena Odeslat soukromou zprávu Najít příspěvky člena Navštívit stránky člena Přidat do seznamu známých Moderátor Arkance Systems Přihlášen: 09.zář.2004 Lokalita: ČR (JČ) Používám: Dodáváme produkty Autodesk Stav: Offline Bodů: 21490	Zasláno: 11.čer.2007 v 16:12
	ano, nejspíš při chybě - když se ten DXF soubor nenajde...
	Vladimír Michl (moderátor) Arkance Systems s.r.o. - www.arkance-systems.cz (podpora viz hd.cads.cz)

Seiner Profil člena Odeslat soukromou zprávu Najít příspěvky člena Přidat do seznamu známých CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662	Zasláno: 11.čer.2007 v 17:51
	Pravda - při úplně prvním použití tam není. To by mohlo být ono. Díky.
	Vítězslav Seiner Chrudim

Příbuzné CAD tipy:
Tip 2165:		Co dělat když zmizí textový kurzor v okně MTextu (či Wordu)?
Tip 1428:		Výpisy v textovém okně "odjedou" (odscrollují) a nemohu se na ně dostat.
Tip 10949:		Klávesa F2 mi neotevře textové okno AutoCADu.
Tip 2764:		Textové okno AutoCADu je neaktivní.
Tip 1611:		Odstavcový text se nezalomí správně.
Tip 1876:		Jak dostat výpis příkazu LIST do souboru?

	CAD Fórum - tipy, triky, podpora, pomoc a rady pro AutoCAD, LT, Inventor, Revit, Map, Civil 3D, 3ds Max, Fusion 360 a další Autodesk aplikace (support firmy Arkance Systems)	ARKANCE (CAD Studio) - Autodesk Platinum Partner & Training Center & Services Partner	KONTAKT: webmaster.cz@arkance-systems.com tel. +420 910 970 111
	Copyright ©2024 \| Web reklama na tomto serveru \| Ochrana soukromí, podmínky

Diskuzní fórum, poradna

CAD diskuze, rady, výměna zkušeností

Samovolně se otevírající textové okno