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: 6471 
Arkance Systems CZ
FB TW YT LN Blog
PORTÁLY PRODUKTŮ
AutoCAD AutoCAD a LT
Inventor Inventor
Revit Revit
Civil 3D Civil 3D
Fusion 360 Fusion 360
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řenoProblém s vypisováním textu ve smyčce
 Odpovědět Odpovědět archiv
Autor
  Najít Téma Najít Téma  Možnosti tématu Možnosti tématu
tetref Zobrazit panel
Nováček
Nováček

Přihlášen: 11.lis.2004
Lokalita: Czech Republic
Stav: Offline
Bodů: 12
 Přímý odkaz na tuto zprávu Téma: Problém s vypisováním textu ve smyčce
    Zasláno: 22.lis.2004 v 08:09

Řeším problém s vypisováním textu ve smyčce z jednotlivých řádků z listu vz excelu. Přestože se mění bod vložení, autocad vše vykresluje do počátku. Nezpůsobuje to vytvoření vždy stejného objektu, který se opakuje ve smyčce příkazem

set oText = thisdrawing.modelspace.addtext(text_obsah,  text_bodvlozeni, text_vyska)

U vykreslování typu line s tímto problém není.

Děkuji za případné odpovědi.
Zpět nahoru
Jan Liska Zobrazit panel
Diskutér
Diskutér

Přihlášen: 01.říj.2004
Lokalita: Czech Republic
Používám:
Inventor,Producstream
Stav: Offline
Bodů: 65
 Přímý odkaz na tuto zprávu Zasláno: 22.lis.2004 v 09:54

Dobrý den,

jakým způsobem nastavujete bod vložení? Jakou verzi AutoCADu používáte? Zkoušel jsem následujici test (verze AutoCADu 2005) a vše se zdá být v pořádku:

Sub Test()
    Dim height As Double
   
    height = 2.5
    For i = 0 To 10
        Dim pt(0 To 2) As Double
   
        pt(0) = 0#
        pt(1) = (height + 0.5) * i
        pt(2) = 0#
        ThisDrawing.ModelSpace.AddText "A", pt, height
    Next
End Sub

S pozdravem,
Jan Liška
Autodesk Consulting
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ů: 21470
 Přímý odkaz na tuto zprávu Zasláno: 22.lis.2004 v 09:56
Není jednodušší tabulku rovnou vložit příkazem? (Vlož jako Entity AutoCADu)
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - www.arkance-systems.cz
(podpora viz hd.cads.cz)
Zpět nahoru
Honza Zobrazit panel
Diskutér
Diskutér

Přihlášen: 01.říj.2004
Lokalita: ČR (Pha)
Stav: Offline
Bodů: 85
 Přímý odkaz na tuto zprávu Zasláno: 22.lis.2004 v 10:03
Od ACAD 2004 jsem si navykl na tabulky používat MTEXT. Pracuje s tabelátory a tak již text pěkně zarovnává. Dále se jednoduše opravuje, edituje a hlavne se jednoduše vkládá. Čáry v tabulkách jsem vyloučil již dávno.   Takže mi mtext opravdu vyhovuje.
Zpět nahoru
tetref Zobrazit panel
Nováček
Nováček

Přihlášen: 11.lis.2004
Lokalita: Czech Republic
Stav: Offline
Bodů: 12
 Přímý odkaz na tuto zprávu Zasláno: 22.lis.2004 v 10:33

Nejedná se o žádnou tabulku, text se vypisuje jednotlivě v různých částech výkresu na základě výpočtů a některý je třeba dodatečně otočit či změnit zarovnání. Proto používám příkaz set.

Problém se vyřešil při vynechání příkazu set oLine, jenomže pak se nedá s vytvořeným textem hned pracovat.

Napadá mě tedy k entitě přistupovat pomocí SelectionSet s vybráním té poslední a pak s ní pracovat. Je to jediný možný postup?



Upravil tetref
Robin Hála, VRV a.s.
Zpět nahoru
tetref Zobrazit panel
Nováček
Nováček

Přihlášen: 11.lis.2004
Lokalita: Czech Republic
Stav: Offline
Bodů: 12
 Přímý odkaz na tuto zprávu Zasláno: 22.lis.2004 v 10:46
Při připsání příkazu object.update za řádek Set oLine je při provádění makra vidět ve výkrese, že se text vykresluje správně, ale následně se přemístí z mě neznámých důvodů do počátku. Proč?
Robin Hála, VRV a.s.
Zpět nahoru
Jan Liska Zobrazit panel
Diskutér
Diskutér

Přihlášen: 01.říj.2004
Lokalita: Czech Republic
Používám:
Inventor,Producstream
Stav: Offline
Bodů: 65
 Přímý odkaz na tuto zprávu Zasláno: 22.lis.2004 v 10:56

Dobry den,

bohužel nevím, jak vypadá váš program pro vykreslovaní textu - podle toho co popisujete, provádíte další úpravy textu a při nich dojde ke změně umístění. Pokud budete ochoten uvést další podrobnosti (např. výpis kódu pro vykreslení), bude možné zjistit přesnou příčinu popisovaného chování.

S pozdravem,
Jan Liška
Autodesk Consulting
Zpět nahoru
tetref Zobrazit panel
Nováček
Nováček

Přihlášen: 11.lis.2004
Lokalita: Czech Republic
Stav: Offline
Bodů: 12
 Přímý odkaz na tuto zprávu Zasláno: 22.lis.2004 v 12:28

Omlouvám se všem, kterým jsem pomotal hlavu mým problémem, zjistil jsem, že všechno tkví v přiřazení vlastnosti acAlignment a vůbec ne v příkazu set oLine. Nechce mi to vzít jednotlivé druhy zarovnání ať jsou stanoveny pevně nebo formou proměnné.
Robin Hála, VRV a.s.
Zpět nahoru
tetref Zobrazit panel
Nováček
Nováček

Přihlášen: 11.lis.2004
Lokalita: Czech Republic
Stav: Offline
Bodů: 12
 Přímý odkaz na tuto zprávu Zasláno: 22.lis.2004 v 12:35
Nenastavil jsem TextAlignmentPoint a to zřejmě způsobilo, že se všechno zarovnalo do počátku, děkuji za Vaši pomoc. Otevřela mi oči v tom, že jsem se zaměřil na ostatní řádky než bylo definování samotného textu. Ty se mi zdály být v pořádku a proto jsem v nich chybu vůbec nehledal.
Robin Hála, VRV a.s.
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 11551:Jak potlačit výpis výzev AutoCADu během skriptů a LISP funkcí?
Tip 1848:Jak psát v Inventoru 3D text do oblouku?
Tip 5235:Nelze vybrat křivku funkcí Ekvidistanta v náčrtu.
Tip 2578:Jak vytvářet vyplněné polygony s ostrovy?
Tip 6442:VIPCelková upravená délka kabelů v Inventoru (všechny vlivy).
Tip 7254:Rychlé vyhledání chybně uzavřených křivek ve výkresu.


 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,273 sekund.
CF
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
FB TW YT LN Blog
TOPlist
img