Newsgroup: it.comp.lang.visual-basic
Titolo: Come aprire un file DWG

Devo poter aprire da VB un file dwg e trovare il centro di tutti i cerchi 
presenti in un determinato layer.
Come posso fare senza dover comprare OCX di terze parti?
Grazie
Ciao, Marco R.

Marco R. ha scritto:

AutoCad può essere referenziato, quindi rende disponibile il modello
ad Oggetti:
    Dim AcadAppl As New AutoCAD.AcadApplication
    Dim AcadDwg As AutoCAD.AcadDocument
    Set AcadDwg = AcadAppl.Documents.Open("c:\prova.dwg")
    AcadAppl.Visible = True
Per semplicità ho usato EarlyBinding, ma è più conveniente il
LateBinding non inserendo i riferimenti e lasciando a VB l'associazione
tardiva...!
    Dim AcadAppl As Object
    Dim AcadDwg As Object
    AcadAppl = CreateObject("AutoCad.Application")
    Set AcadDwg = AcadAppl.Documents.Open("c:\prova.dwg")
    'AcadAppl.Visible = True
Ti consiglio inizialmente di inserire i riferimenti per poter accedere
all'Help del VBA(Autocad).... poi li togli...!
Per la cronaca l'insieme Blocks di un oggetto
AcadDocument contiene, nidificati, tutti gli oggetti del disegno
(righe, 
curve, attributi, ecc.). 
 
@Alex

Grazie per l'utile risposta,
sai se c'è un modo simile che posso usare senza installare autocad sul mio 
PC?
Grazie
Marco R.

Marco R. ha scritto:

ALT...!
La prima domanda era:
"Come posso fare senza dover comprare OCX di terze parti? "
Adesso lo vuoi senza Autocad...... magari poi ti serve anche senza il
PC.. che vada con la sola imposizione delle mani...???
Ma di cosa parliamo di qualche cosa di professionale o di cosa...????
Dai su fai uno sforzo, almeno per capire cosa vuoi...!
@Alex

 Marco R.
ALT...!
La prima domanda era:
"Come posso fare senza dover comprare OCX di terze parti? "
Adesso lo vuoi senza Autocad...... magari poi ti serve anche senza il
PC.. che vada con la sola imposizione delle mani...???
hai imparato dal mago Oronzo?  :<))
@Alex
Ciao, Alex
Daniele
ps. ti farai risentire prima o poi vero? :)

 ps. ti farai risentire prima o poi vero? :)
Ciao Giovane....!
Ad essere sincero la settimana scorsa fino a ieri ero in ferie e alla
mattina ogni tanto facevo accesso a MSNGER, ma tu non c'eri mai....!!!
Bischero.
Spero di rimettermi in passo, come vedi però nonostante le ferie ho
frequentato poco il NG, ero intento a finire quel Demo, ed ovviamente a
godermi le ferie....
Ciao Daniele
@Alex

PC?
  Simile non credo proprio. Puoi studiarti il formato DWG e scrivere
un parser che lo apra e ne riconosca i componenti ma non so quanto sia
complesso.
-- 
  Ciao :-)
  Massimo
Nell'indirizzo, sostituire "micio" con "mc"

Il programma lo devo fare per un mio amico (cliente) che ha autocad sul SUO 
PC, sul mio non c'è e non voglio installare niente di non legale (craccato).
Ho trovato sul sito comune un esempietto per aprire i file dxf, pensavo di 
fare lo stesso con i dwg (anche se credo siano molto più complessi) perché 
non posso far convertire tutti i dwg in dxf (sono migliaia).
Trovo solo "oggetti" a pagamento e siccome ho già fatto questa strada, non 
voglio comprare ancora OCX che poi si rivelano fragili o inutilizzabili.
Ciao
Marco 

Marco R. ha scritto:

Anche se posso capirti, solitamente quando si sviluppa si devono avere
le stesse
condizioni del Cliente, anche se è un amico.....!
Se non vuoi un OCX(che condivido a pieno) rimane solo Autocad.... e se
non vuoi istallarlo sul tuo PC sviluppa con il PC del tuo Amico
@Alex