ARKANCE - globální Platinum partner Autodesk ARKANCE | KONTAKT - CZ | SK | EN | DE
Děkujeme za účast na konferenci CADfórum 2025 - podívejte se na reportáž
Přes 120.000 registrovaných u nás, celkem 1.104.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků. Vyzkoušejte nový přesný Inženýrský kalkulátor a proměnné prostředí AutoCADu.
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řenostring
 Odpovědět Odpovědět archiv
Autor
  Najít Téma Najít Téma  Možnosti tématu Možnosti tématu
rjanic Zobrazit panel
Nováček
Nováček

Přihlášen: 20.čvc.2006
Lokalita: Slovensko
Stav: Offline
Bodů: 4
 Přímý odkaz na tuto zprávu Téma: string
    Zasláno: 18.lis.2006 v 20:15
Moze niekto pomoct zaciatocnikovi?
Ako ziskam "string" ak ho chcem pouzit do funkcie
napr. (strcase string [which])ak nechcem hodnotu ziskat z prikaz.riadku ale z vytvoreneho textu? Viem ziskat meno
entity ale ako sa dostat k ostatnym vlastnostiam?
Urcite trivialna otazka ale kazdy raz zacinal.
dik
Zpět nahoru
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: 19.lis.2006 v 14:21

Řekněme že chci získat vlastnosti poslední entity ve výkrese:

(setq ent (entlast)) ;;; Jmeno posledni entity
(setq entg (entget ent)) ;;; Seznam s informaceni o entite
 
(setq typ (cdr (assoc 0 entg)) ;;; Co je to za entitu (line, arc, circle, ...)
(setq hl (cdr (assoc 8 entg))) ;;; Hladina
...
 
Každopádně bych si prvně otestoval, zda ta vaše entita je skutečne text
(if (= (cdr (assoc 0 entg)) "TEXT")
 (progn
  (prompt "\nJe to text: ")
  (prompt (cdr (assoc 1 entg))) ;;; Nejsem si úplně jistý tou 1, píši to bez AutoCADu, možná tam má být 2 
 )
)
 
Pavel Štyl
Zpět nahoru
rjanic Zobrazit panel
Nováček
Nováček

Přihlášen: 20.čvc.2006
Lokalita: Slovensko
Stav: Offline
Bodů: 4
 Přímý odkaz na tuto zprávu Zasláno: 19.lis.2006 v 16:57
Dakujem za odpoved usetrili ste mi kopec casu. Este jedna mala otazka. Ktorou funkciou mozem menit vlastnosti entity? Napr.hodnotu text retazca? Skusal som pouzit (subst newitem olditem lst)ale nejako sa mi to nedari.
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 22020
 Přímý odkaz na tuto zprávu Zasláno: 20.lis.2006 v 08:53
Ano, subst je správná cesta, ale musíte poté volat ještě entmod, případně entupd. Doporučuji se podívat na nějaký už fungující LISP prográmek.
Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
Zpět nahoru
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.lis.2006 v 10:40
(setq novy_text "Muj text")
(setq ents (entsel "Vyber text: "))
(setq entg (entget (car ents)))
(if (= (cdr (assoc 0 entg)) "TEXT")
 (progn
  (setq entg (subst (cons 1 novy_text) (assoc 1 entg) entg))
  (entmod entg)
 )
)
(princ)
 
Pavel Štyl
Zpět nahoru
rjanic Zobrazit panel
Nováček
Nováček

Přihlášen: 20.čvc.2006
Lokalita: Slovensko
Stav: Offline
Bodů: 4
 Přímý odkaz na tuto zprávu Zasláno: 20.lis.2006 v 19:04
Dakujem vsetkym za odpovede. Myslim ze by nebolo odveci urobit na tychto strankach maly kurz LISPu pre zaciatocnikov. Urcite by sa naslo vela citatelov. Podla mojho nazoru su tieto stranky co sa CADu tyka najlepsie co sa da v .CZ a .SK najst.
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 22020
 Přímý odkaz na tuto zprávu Zasláno: 20.lis.2006 v 20:53
Děkujeme za pochvalu.
Základy AutoLISPu najdete zde v tématu programování - viz:
Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 13998:VIPSnadné hromadné vyhledání a nahrazení textu ve výkresech Inventoru - iLogic (viz nový tip)
Tip 12246:VIPHromadné vypnutí viditelnosti součástí sestavy dle velikosti (hmotnost, objem) nebo názvu (iLogic)
Tip 7269:VIPDynamické pole z částí hodnot vlastností výkresu (Název, Předmět, Autor, Uživatelské)
Tip 7967:Revit: chyba Climate Server - Input string was not in a correct format
Tip 6849:Virus využívající soubor ACAD.VLX
Tip 13880:Vícenásobný výběr položek v iLogic formuláři Inventoru.


 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,227 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