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: 5461 
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řenoText na znaky

 Odpovědět Odpovědět archiv
Autor
Konzal Zobrazit panel
Nováček
Nováček

Přihlášen: 02.říj.2006
Lokalita: ČR (HK)
Používám:
AutoCAD2009
Stav: Offline
Bodů: 16
Přímý odkaz na tuto zprávu Téma: Text na znaky
    Zasláno: 05.kvě.2008 v 10:01
Potřeboval bych pomoc s funkci na rozložení textu na jednotlivé znaky. Přečtu z razítka výkresu text (kód) a potřebuju zpracovat seznam jeho jednotlivých písmenek. S Lispem začínám a nevím si moc rady. Přečtený text mám, ale nevím jak na ty písmenka.
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:
Dodáváme produkty Autodesk
Stav: Offline
Bodů: 21491
Přímý odkaz na tuto zprávu Zasláno: 05.kvě.2008 v 10:05
To jde řešit buď nějakou smyčkou a podřetezci (substr) nebo elegantněji přes mapcar - zkuste si třeba:
(mapcar 'chr (vl-string->list "Můj řetězec"))
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - www.arkance-systems.cz
(podpora viz hd.cads.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: 05.kvě.2008 v 10:14
Což o to, elegantní to je. Otázka je, co s tím pak dál :-)
Jinak - co p. Konzal zamýšlí.
Funkce SUBSTR je opravdu použitelná. S její pomocí jsem dělal kdysi funkci najdi-nahraď pro nadstavbu rohového razítka. Dělal jsem si pomocnou fci, která mi řešila výskyt hledaného a určovala text před a za hledaným.
 
(defun find(co vcem / i)
(setq pred "" po "" lco (strlen co) lvcem (strlen vcem) i 1 jetam nil)
(while (<= i  lvcem)
  (if (= co (substr vcem i lco))(progn
   (setq pred (substr vcem 1 (- i 1)))
   (setq po (substr vcem (+ i lco) ))
   (setq i lvcem jetam T)  )
   (setq i (1+ i))
  )
)
)
Vítězslav Seiner

Chrudim
Zpět nahoru
Konzal Zobrazit panel
Nováček
Nováček

Přihlášen: 02.říj.2006
Lokalita: ČR (HK)
Používám:
AutoCAD2009
Stav: Offline
Bodů: 16
Přímý odkaz na tuto zprávu Zasláno: 05.kvě.2008 v 10:44
Díky, ta mapcar funkce dělá to co potřebuju. Podle písmenek z kódu pak vkládám do výkresu předem nadefinované bloky.
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 7778:VIPRůzné způsoby zadávání speciálních znaků v textech Inventoru.
Tip 3073:VIPNěkteré znaky textu se ve výkresovém pohledu zobrazí jako černé obdélníčky.
Tip 10687:Jak dostat do textu výkresu Inventoru symbol menší nebo rovno, větší nebo rovno (≤ ≥)?
Tip 8431:Jak přidat/přepsat znaky {} v textu nebo stylu kót?
Tip 4197:Mezera, mezerovatější než mezera.
Tip 445:Jak mohu nahradit text ve výkresu jiným textem?


 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,756 sekund.