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řenoPolyLine ve VB
 Odpovědět Odpovědět archiv
Autor
  Najít Téma Najít Téma  Možnosti tématu Možnosti tématu
orlik Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 25.lis.2004
Lokalita: ČR (MS)
Používám:
Autocad Mechanical 20104
Stav: Offline
Bodů: 111
 Přímý odkaz na tuto zprávu Téma: PolyLine ve VB
    Zasláno: 08.čvc.2005 v 14:32
Mohl by mne nekdo nakopnout (poradit)?
Jak rychle poznat ve vypisu polyline ve VB Autocadu po E.Explode (kde E.ObjectName = "AcDbPolyline") smer kruhovych oblouku, kdyz vsechny maji shodny smer otaceni ? Pritom krivka obsahuje oblouky jak proti tak i po smeru hod. rucicek. Potom pocatecni bod neni shodny s koncovym bodem predchazejiciho elementu.
Ve vypisu prikazu ... (edata ...) je smer rozlisen napr. (42 . -0.414214) tj. radius po smeru.

Diky
Zpět nahoru
Chlebník Zobrazit panel
Nováček
Nováček

Přihlášen: 30.čer.2005
Lokalita: Czech Republic
Stav: Offline
Bodů: 27
 Přímý odkaz na tuto zprávu Zasláno: 11.čvc.2005 v 08:06

Nedávno jsem se setkal s něčím podobným ale v LISPu a řekl bych že v tomto je to naprosto shodné

důležité jsou tři údaje,

bod-1 = bod počátku oblouku (10 . x y z)

bod-2 = bod konce oblouku (10 . x y z)

a mezi nimy hodnota zaoblení (42 . +/-xxxxxxxxxx)

pak když spojím body bod-1 a bod-2 přímkou tak oblouk je od této přímky vlevo pokud hodnota zaoblení je < 0, a v pravo od přímky pak musí být hodnota > 0.

samotný poloměr se pak spočítá :

dist = (distance bod-1 bod-2)

x = 0.5 * dist

f = x * zaoblení

r = (x*x + f*f)/(2*f) i poloměr vychází kladný nebo záporný dle toho kam směřáje viz výše.
Ing. Martin Chlebovský
Projektant a vývojář
Veletrhy Brno a.s.
Zpět nahoru
orlik Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 25.lis.2004
Lokalita: ČR (MS)
Používám:
Autocad Mechanical 20104
Stav: Offline
Bodů: 111
 Přímý odkaz na tuto zprávu Zasláno: 12.čvc.2005 v 06:54
Diky, jelikoz ve vypisu VB nejsou rozliseny polomery kladnou a zapornou hodnotou, nelze zpusob z lispu pouzit. Nakonec se to snazim resit tak, ze najdu pokud tam je, nejaky primkovy element(ty maji smer spravny), nactu jeho koncovy bod, ktery musi souhlasit s pocatecni bodem nasledujiciho elementu. Pokud je tim elementem radius a navic opacneho smeru, prehodim jen krajni body. Cele to se musi odehravat v novem souboru, protoze na promennou nactenou z vykresu, ktera je 'read only', to nelze aplikovat. To aplikuju postupne na vsechny elementy. Ma to vsak jeden zadrhel, nemam to domysleno, pokud v polylajne neni ani jeden primkovy element.
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 6490:VIPVBA aplikace v 64bitové verzi AutoCADu (kompatibilita, migrace)
Tip 8633:VIPPříkaz pro kreslení kružnice ve formě polyline.
Tip 477:Jsou k dispozici nějaké hotové OCX moduly pro VB v AutoCADu?
Tip 378:Jak přenést data z AutoCADu do AlphaCAM?
Tip 7035:VIPPohodlné psaní textu podél libovolné křivky.
Tip 5694:VIPNevyplněné křivky - možné příčiny.


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