ARKANCE - globální Platinum partner Autodesk ARKANCE | KONTAKT - CZ | SK | EN | DE
Registrujte se na 22. ročník konference CADfórum 2025 - 30.9. Zámek Valeč.
Přes 119.000 registrovaných u nás, celkem 1.097.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků. Vyzkoušejte nový přesný Inženýrský kalkulátor a aktualizovaný Generátor čarových kódů.
Registrujte se na konferenci CADfórum 2025 - automatizace navrhování
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

?
CAD 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, 3ds Max, Vault a s dalšími CAD/BIM/PDM 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 (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.arkance-systems.cz
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Téma uzavřenoNahradenie textu v kóte

 Odpovědět Odpovědět Stránka  <12 archiv
Autor
pavelstyl Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 06.říj.2004
Lokalita: Czech Republic
Používám:
AutoCAD Mech 2025, SolidEdgeE 2025
Stav: Offline
Bodů: 229
Přímý odkaz na tuto zprávu Zasláno: 20.čer.2008 v 12:01
Pokud si vzpominam, na počet desetinných míst má vliv proměnná LUPREC.
Zkusil bych před ten řádek s funkcí rtos přidat (setvar "LUPREC" 1) a za tím rtos zase vrátit na původní hodnotu.
 
Jinak k programu jedna připomínka.
Je tam použita funkce ssget, která umožní vybrat jednu i více entit. Program ale zpracuje pouze první vybranou. Buď bych místo ssget použil entsel nebo bych program upravil tak, aby opravil všechny entity ve výběru. Takhle je to trošku matoucí.
 
Pavel Štyl
 
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1906
Přímý odkaz na tuto zprávu Zasláno: 20.čer.2008 v 12:08
Nastavit jednotky na 1 desetinné místo - příkazem _units, myslím že to řídí proměnná luprec.
-FerTh-
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1906
Přímý odkaz na tuto zprávu Zasláno: 20.čer.2008 v 12:26
Na čáru přerušení je příkaz breakline v Expresech.
Osobně ze zásady nikdy nepoužívám "nereálné" anebo upravované kóty.
To Říha: Vy to sice budete vědět, ale jakmile takový výkres dwg předáte dál (myslím externě) jako podklad k dalšímu zpracování, dotyčný tam bude sice vidět "různobarevné" kóty, ovšem asi ho bude zlobit, když si odměří vzdálenosti na výkresu a ty nebudou v korespondenci s kótama...Pak nastává (zbytečně) zdlooouhavý proces prověřování všech kót výkresu hezky jednu po druhé - poněvadž on už ten dotyčný nástroj nemá/nezná...Anebo (což je velmi pravděpodobný) má pouze LTčko a všechny "bleskurychlé" pomocníci z rodiny Lispů jsou mu k ničemu.


Upravil Ferdinand - 20.čer.2008 v 12:28
-FerTh-
Zpět nahoru
michaelflyer Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 05.úno.2007
Lokalita: Slovensko
Používám:
AutoCAD
Stav: Offline
Bodů: 105
Přímý odkaz na tuto zprávu Zasláno: 20.čer.2008 v 14:26
Ďakujem za radu.
Čo sa týka toho ssget, tak sa mi na ňom páči to, že my vybraný objekt zvýrazní. Tak viem, že som ho vybral. Ale u entsel neviem, či som objekt trafil a zároveň vybral, alebo nie.
Michal MUCHA
Zpět nahoru
Sedláček Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 15.dub.2005
Lokalita: Czech Republic
Používám:
AutoCad 2024 LT
Stav: Offline
Bodů: 384
Přímý odkaz na tuto zprávu Zasláno: 20.čer.2008 v 14:41
Počet desetinných míst je jedním z parametrů funkce RTOS, takže asi (nezkoušel jsem)
(setq text1 (rtos (cdr (assoc 42 zoznam_ent1))2 1))
Zpět nahoru
michaelflyer Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 05.úno.2007
Lokalita: Slovensko
Používám:
AutoCAD
Stav: Offline
Bodů: 105
Přímý odkaz na tuto zprávu Zasláno: 20.čer.2008 v 15:02
Mne sa to zdalo, že to nejaká ta funkcia má, len som si nebol istý a bál som sa, že budem písať blbosti!

Upravil michaelflyer - 20.čer.2008 v 15:03
Michal MUCHA
Zpět nahoru
Sedláček Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 15.dub.2005
Lokalita: Czech Republic
Používám:
AutoCad 2024 LT
Stav: Offline
Bodů: 384
Přímý odkaz na tuto zprávu Zasláno: 20.čer.2008 v 15:17
Ještě jste psal o zaokrouhlování, na to je jednoduchá finta, před použitím funkce RTOS přípočtěte k číslu 0,05 (pokud zaokrouhlujete na jedno desetinné číslo) a druhé desetinné číslo "odříznete"
Zpět nahoru
michaelflyer Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 05.úno.2007
Lokalita: Slovensko
Používám:
AutoCAD
Stav: Offline
Bodů: 105
Přímý odkaz na tuto zprávu Zasláno: 22.čer.2008 v 08:47
Ak som to pochopil správne tak táto funkcia sa stará aj o to zaokrúhľovanie:
(setvar "LUPREC" 1)
Hádam som to pochopil správne od kolegov (tu na fóre).
Michal MUCHA
Zpět nahoru
michaelflyer Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 05.úno.2007
Lokalita: Slovensko
Používám:
AutoCAD
Stav: Offline
Bodů: 105
Přímý odkaz na tuto zprávu Zasláno: 22.čer.2008 v 10:32
Tu som to upravil tak, aby užívateľ mohol vybrať viac kót na zmenu podľa prvého výberu. Len neviem, či by nebolo lepšie to naprogramovať tak, aby užívateľ vybral prvú kótu ako smerodajnú a ostatné k tomu. Všetko by bolo obsiahnuté iba v jednom výbere ssget (ent1).

(defun c:VY (/)
(prompt "\nVyber kotu:")
(setq ent1 (ssget))
(prompt "\nVyber koty NA ZMENU:")
(setq ent2 (ssget))

(setq entita1 (ssname ent1 0))
(setq entita2 (ssname ent2 0))
(setq cislo_posled_entity2 (sslength ent2))
(setq meno_posled_entity2 (ssname ent2 (1- cislo_posled_entity2)))

(setq zoznam_ent1 (entget entita1))
(setq n 0)

(while (<= n (1- cislo_posled_entity2))

    (setq entita2 (ssname ent2 n))
    (setq zoznam_ent2 (entget entita2))

    (setq text1 (setvar "LUPREC" 1)
          text1 (rtos (cdr (assoc 42 zoznam_ent1))))
    (setq zoznam_ent2 (subst (cons 1 text1) (assoc 1 zoznam_ent2) zoznam_ent2))
    (entmod zoznam_ent2)

    (setq n (1+ n))
    (princ n)
)
(princ)
)
Michal MUCHA
Zpět nahoru
michaelflyer Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 05.úno.2007
Lokalita: Slovensko
Používám:
AutoCAD
Stav: Offline
Bodů: 105
Přímý odkaz na tuto zprávu Zasláno: 01.čvc.2008 v 13:13
Chcel by som vylepšiť to prepisovanie kót takto:
Vyberiem smerodajnú (prvú) kótu a zvýrazni mi ju, zmení sa kurzor myši a vyberám ostane kóty (kóty na zmenu). Chcem to spraviť na spôsob ako je príkaz: '_matchprop
Dá sa to???? Alebo vedel by mi niekto pomôcť???
Michal MUCHA
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 5416:Po aktualizaci Windows XP se nezobrazuje text ve výkresech Inventoru!
Tip 11421:VIPPosunuté nebo širší texty v DWG při úpravě vlastností ve Vaultu.
Tip 13998:VIPSnadné hromadné vyhledání a nahrazení textu ve výkresech Inventoru - iLogic (viz nový tip)
Tip 10898:VIPRozmazané texty nebo nesprávné zobrazení UI ve vysokém rozlišení.
Tip 3730:VIPPřidání masky pozadí pro vybrané texty výkresu najednou.
Tip 8207:VIPUzamčené, needitovatelné texty ve výkresu Civilu 2012.


 Odpovědět Odpovědět Stránka  <12 archiv

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



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