| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY bietet das umfangreichste Ökosystem von B2B als auch B2C-Lösungen für IT-Akteure auf dem Markt, eine Pressemitteilung
|
Autor
|
Thema: Insert Dwg in AutoCAD by clicking a button (729 mal gelesen)
|
singoi Mitglied
Beiträge: 51 Registriert: 27.02.2007
|
erstellt am: 12. Jun. 2008 08:49 <-- editieren / zitieren --> Unities abgeben:
Hallo Friends, I am new here today...searching a code in internet for following problem. I have a drawing in AutoCAD2005. I have written a VisualBasic program finding an Appropriate dwg files in Particular folders coz you people know how our Explorer works..in tree form...clicking clicking and so on till we need our particular folder..so inorder to minimize the time program works using command buttons and lists all the dwgs in Listview. now i choose a dwg file in Listview ( i mean its a small drawing which should be inserted in opened drawing ). and click the Button INSERT. now task is this dwg file which is been selected in Listview shold be inserted in opened autocad drawing. Please can anybody help me how to write this code for this Button Insert.. Private sub insert_click() . . . . . End Sub it would be very helpfull for me my friends.. i think i have expressed my task in detail.. Thanks - Singoi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Carsten1210 Mitglied staatl. geprüfter Holztechniker
Beiträge: 1358 Registriert: 24.07.2002 AutoCAD ACA 2018 Solidworks 2016 Sp5 Enterprise PDM 2016 Sp5 Pascam Woodworks Visual Studio 2017 Pro Windows 10 64Bit Dell T3620 Intel Core i7-7700K 16 GB Arbeitsspeicher 2x Samsung S24C650 Dell M4800
|
erstellt am: 12. Jun. 2008 09:02 <-- editieren / zitieren --> Unities abgeben: Nur für singoi
|
singoi Mitglied
Beiträge: 51 Registriert: 27.02.2007
|
erstellt am: 12. Jun. 2008 09:14 <-- editieren / zitieren --> Unities abgeben:
Hallo, Es tut mir leid..ich habe mein frage auf english gestellt..versuche ich auf deutsch zu erwitern. ich habe eine Dwg zeichnung (Alias.dwg) geöffnet. in diese zeichnung möchte ich ein kleine blöcke( auch ein dwg zeichnung aber irgendwo in eine ordner in Server liegt) einfügen. dafür habe ich selber ein program in VB geschiereben. ich sehe die dwgs die ich brauche in ein LISTVIEW in VB fenster. da kann ich mich wählen welche dwg ich einfügen möchte. jetzt ist die frage für ein knopf ( Insert ). wie kann ich diese dwg in mein ALIAS.dwg einfügen die ich in LISTVIEW ausgewählt haben. ich bitte euch mir zu hilfen diese Code zu schreiben. Gruß . Singoi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Stelli1 Moderator Verm.-Ing.
Beiträge: 1526 Registriert: 17.08.2005 Map 2000-2014, Rasterdesign, MapGuide, Autodesk Topobase, VS6, VS.net 2013
|
erstellt am: 12. Jun. 2008 12:01 <-- editieren / zitieren --> Unities abgeben: Nur für singoi
Hallo Singoi, hier ist mal ein Beispiel um eine DWG als Block einzufügen
Code: '' '' DWG als Block laden '' Dim tmpBlockRef As AcadBlockReference Dim tmpBlockDef as AcadBlock Dim tmpPkt(0 To 2) As Double Dim tmpBlockName As String ' Fügt eine DWG ein (Blockreference) Set tmpBlockRef = ThisDrawing.ModelSpace.InsertBlock(tmpPkt, vlst_DWG, 1, 1, 1, 0) ' Name des Block innerhalb von AutoCAD ermitteln tmpBlockName = tmpBlockRef.Name ' Blockdefinition Set tmpBlockDef = ThisDrawing.Blocks(tmpBlockName)
Wilfried Stelberg------------------ Warum lisp'eln wenn's auch anders geht. www.ib-stelberg.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
insidERR Mitglied 2/3D Konstruktion, VBA/.net/Android/Arduino Programmierung, EDV
Beiträge: 138 Registriert: 27.08.2007
|
erstellt am: 03. Jul. 2008 13:18 <-- editieren / zitieren --> Unities abgeben: Nur für singoi
So wie ich das sehe, willst du in eine Zeichnung die du bearbeitest verschiedene Zeichnungen, die als Blöcke in separaten Zeichnungen hinterlegt sind einfügen? Bei uns wird auch so gearbeitet. Und wir benutzen eine Funktion von AutoCAD. "amLibrary" Dort kann man sich ne eigene Bibliothek zusammenstellen. Z.B. eigene Sonderschrauben die als Blöcke hinterlegt sind. Du öffnest dann die Bibliothek und siehst alle hinterlegten Zeichnungen als Minivorschau und kannst das was du haben willst anklicken und als Block in deine aktuelle Zeichnung einfügen. Feine Sache. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Carsten1210 Mitglied staatl. geprüfter Holztechniker
Beiträge: 1358 Registriert: 24.07.2002 AutoCAD ACA 2018 Solidworks 2016 Sp5 Enterprise PDM 2016 Sp5 Pascam Woodworks Visual Studio 2017 Pro Windows 10 64Bit Dell T3620 Intel Core i7-7700K 16 GB Arbeitsspeicher 2x Samsung S24C650 Dell M4800
|
erstellt am: 03. Jul. 2008 13:59 <-- editieren / zitieren --> Unities abgeben: Nur für singoi
Hi insidERR, Das wird dann eine Mechanical-Funktion sein, die im Standard-Autocad nicht vorhanden ist. Ich denke, der Weg von Stelli wird schon der richtige sein. Aber dyzu müsste man auch eine Rückmeldung vom Fragesteller bekommen. Gruß, Carsten Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
wronzky Ehrenmitglied V.I.P. h.c. CAD-Dienstleistungen für Architekten
Beiträge: 2154 Registriert: 02.05.2005 CAD: AutoCAD 2.6 bis 2014 ADT 2005 - ACA 2013 Arcibem System: Windows NT, 2000, XP Internet-Startseite: http://www.archi.de
|
erstellt am: 03. Jul. 2008 14:42 <-- editieren / zitieren --> Unities abgeben: Nur für singoi
|