ARKANCE - globální Platinum partner Autodesk ARKANCE | KONTAKT - CZ | SK | EN | DE
Již 10.000+ CAD tipů. Přes 118.500 registrovaných u nás, celkem 1.094.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků. Vyzkoušejte nový přesný Inženýrský kalkulátor. Kompletní příkazy AutoCADu a proměnné AutoCADu 2026.
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řenoStyl písma
 Odpovědět Odpovědět archiv
Autor
  Najít Téma Najít Téma  Možnosti tématu Možnosti tématu
PepaR Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 29.lis.2004
Lokalita: ČR (ZL)
Používám:
ruky a hlavu (občas ;)
Stav: Offline
Bodů: 6206
 Přímý odkaz na tuto zprávu Téma: Styl písma
    Zasláno: 25.kvě.2005 v 02:47
Dobrý den, při tvorbě lispu který mi vkládá jako bloky výškové kóty s atributy do kterých se načítají hodnoty y-nových souřadnic. Funkce funguje bez problémů až na písmo, v lispu zvolím aby se jednalo o romans.shx, který standardně používá pro oddělení desetinných míst čárku avšak při vložení bloku mám jako oddělovač tečku. A jetě jěden dotaz na závěr, nevědel by někdo jak nadefinovat funkci, která mi aktualizuje atribut výšky při posunu vkládaného bodu bloku? Soubory příkládám...
 

Připojené souborydwg2005-05-25_024729_VK1.dwg
 
S pozdravem a předem díky za pomoc
Pepa R.


Upravil PepaR
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
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
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 07:11

Nezlobte se, ale ve Vasem dotazu se trosku spatne orientuje. Neskodilo by venovat pozornost subjektu a pak si dotaz po sobe precist.

IMHO problem nesouvisi se stylem pisma. Funkce RTOS proste vraci znakovou reprezentaci cisla, ktera v AutoCADu neni lokalizovana (souradnice preci taky zadavate s teckou). Pokud tam chcete mit carku, upravte text pred vlozenim. Treba nejakou takovouhle funkci:

(defun cz(string / ii,l,str)
 (if (/= string "")(progn
   (setq l (strlen string) ii 1 str string string "")
 (while (<= ii l)
    (if (= (substr str ii 1) ".")
        (setq string (strcat string ","))
        (setq string (strcat string (substr str ii 1)))
     )
    (setq ii (1+ ii))
)))
(setq string string)
)

(Druhou cast dotazu nevim - to bude vyssi divci :-) (reaktor? http://www.aac-solutions.cz/apps/areautil/areautilcz.htm)
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
Arkance Systems

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21907
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 08:01

proč tak složitě? nestačilo by:
(vl-string-subst "," "." puvodnicislo) ?

myslíte dynamický popis aktuální hodnoty Z? to umí např. náš LiveLabel (viz třetí animovaná ukázka) nebo ve vyšších verzích text.pole vložené do atributu
Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
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
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 08:14

Protoze jsem se naucil AutoLISP ve verzi 10 a tam jsem ustrnul :-) "Ale tu pevnou fázi jsem snad popsal dobre, pake Koudelko?" :-)
Zpět nahoru
PepaR Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 29.lis.2004
Lokalita: ČR (ZL)
Používám:
ruky a hlavu (občas ;)
Stav: Offline
Bodů: 6206
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 09:27
Je pravda, že nejsem romanopisec, jen technik, ale snažil jsme se to vyjádřit nejlépe jak jsme uměl. Každopádně díky za odpověď.
 
S tím polem mě to nenapadlo, ale nevím jakou proměnou , popř v jakým zápisem bych získal a vypsal požadovanou souřadnici?
Zpět nahoru
PepaR Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 29.lis.2004
Lokalita: ČR (ZL)
Používám:
ruky a hlavu (občas ;)
Stav: Offline
Bodů: 6206
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 13:25
ad) A jetě jěden dotaz na závěr, nevědel by někdo jak nadefinovat funkci, která mi aktualizuje atribut výšky při posunu vkládaného bodu bloku? Soubory příkládám...
 
Tím byla myšlena funkce, ktery by po aktivaci přepočítala hodnoty souřadnic vkládaných výšek podle zvolenné nulové hladiny a aktualizovala atributy. Nemám na mysli aktualizaci v reálnem čase jako je tomu u LiveLabel.
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
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
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 13:40

Asi bych postupoval:

- vytvořit výběrovou množinu všech instancí daného bloku,

- v cyklu načítat souřadnice bloku, mazat je a vkládat s novými atributy.

pro inspiraci ukázka něčeho podobného:

;OTOC program pro otoceni cisel a znacek uzlu a cisel prvku do smeru pohledu
;*********************************************************** *****************
(setvar "CMDECHO" 0)
(setq mer(getreal "\nUdej měřitko pro písmo: "))
(setq skup (ssget "X" '((0 . "INSERT") (2 . "AUTODEF"))))
(setq sk1 (ssget "X" '((0 . "TEXT") (8 . "CISLAP"))))
(setq pocet (sslength skup)
      poc1  (sslength sk1))

;otaceni bloku AUTODEF - znacek uzlu
(setq i 0)
(command "_UCS" "_V")
(setvar "ATTDIA" 0)
(While (< i pocet)
(setq m (ssname skup i))
(setq m1 (entnext m)) ;cislo - atribut
(setq dz (entget m))
(setq dz1 (entget m1))
(setq cislo (cdr(assoc 1 dz1))
      bod  (trans (cdr(assoc 10 dz))m 1)
      xmer (cdr (assoc 41 dz))
      ymer (cdr(assoc 42 dz)))
(command "_ERASE" m "")
(command "_INSERT" "AUTODEF" bod (* mer xmer) (* mer ymer) "0" cislo)
(setq i (+ 1 i))
)
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
Arkance Systems

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21907
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 13:54
Nevím jakou používáte verzi AutoCADu, ale od verze 2005 na to lze použít dynamické textové pole, od verze 2006 i s výpočty (např. korekci na srovnávací rovinu).
Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
Zpět nahoru
PepaR Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 29.lis.2004
Lokalita: ČR (ZL)
Používám:
ruky a hlavu (občas ;)
Stav: Offline
Bodů: 6206
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 14:57
 
Docela rád bych využil dynamického textového pole, ale nevím jak to přesně nadefinovat... V CAD Tipech uvadíte následující syntaxi %<\AcObjProp Object(%<\_ObjId 2130022304>%).Coordinates \f "%pt2">% nicméně nevím jak to přesně zakomponovat do bloku výškové kóty tak, aby mi to vypsalo souřadnici referenčního bodu bloku. Jak fungují a princip vkládání textový polí znám avšak toto mi není jasné.
 
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
Arkance Systems

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21907
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 15:27
Toho tipu si nevšímejte, ten řeší jen divoké speciality - normálně vložte pole standardní funkcí AutoCADu a vyberte vlastnost objektu (vloženého bloku) - vkládací bod, Z (nebo Y) souřadnice.
Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
Zpět nahoru
PepaR Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 29.lis.2004
Lokalita: ČR (ZL)
Používám:
ruky a hlavu (občas ;)
Stav: Offline
Bodů: 6206
 Přímý odkaz na tuto zprávu Zasláno: 25.kvě.2005 v 16:27
Nu dobrá, ale pokud použiji příkaz TPOLE, řeším následující problémy:
 
1) Při vložení odpovidájicího bloku se mi načte správná hodnota Y-nové souřadnice referenčního bodu bloku, nicméně při změne výškové úrovně bloku a následné aplikaci příkazu AKTUALIZUJTPOLE, se mi hodnota výšky neopraví.
 
2) Formát desetinných míst nevyhovuje a v dialogu pro editaci pole nelze nikde nastavit jiné než aktuální jednotky. A obvzláště u případu +-0,000 je každá rada drahá.
 
 


Upravil PepaR
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 3710:Styl písma mi nenabízí volbu Kurzíva nebo Tučné.
Tip 3737:Změna měřítka kóty mi nezmění výšku kótovacího textu.
Tip 5789:Nastavení písma (fontu) pro značky, např. značky drsnosti.
Tip 2723:Proč jsou některé texty v DWF souboru zobrazeny odlišně od originálu?
Tip 1181:Funkce eTransmit (ePřenos) nepřenese některé naše fonty použité ve výkresu.
Tip 1952:Doplňkový font SHX není zobrazen v seznamu MTextu.


 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 1,219 sekund.
CADfórum
CADfórum
Tipy, triky, podpora, pomoc a rady pro AutoCAD, LT, Inventor, Revit, Map, Civil 3D, 3ds Max, Fusion, Forma, Vault, PowerMill a další Autodesk aplikace (support firmy ARKANCE). Viz O portálu.
Copyright © 2025 | Web reklama na tomto serveru | Ochrana soukromí, podmínky
ARKANCE (CAD Studio) - Autodesk Platinum Partner & Training Center & Services Partner
KONTAKT:
webmaster.cz@arkance.world | tel. +420 910 970 111
FB LN TW YT TW Blog RSS
.
TOPlist
img