|
Rund um AutoCAD : Linientypen erstellen
Stelli1 am 19.03.2009 um 17:18 Uhr (0)
Hallo,mit dem Designcenter kannst du den Linientyp ganz einfach in deine Zeichnung ziehen.1. Designscenter aufrufen (_adcenter)2. Im Verzeichnis deine alte Datei aussuchen3. Thema Linientypen wählen4. Deinen gewünschten Linientyp in die Zeichnung ziehenWilfried Stelberg------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Rund um AutoCAD wechseln |
|
AutoCAD VBA : Zeichnen in Formularen
Stelli1 am 02.08.2008 um 14:58 Uhr (0)
Hallo Sebastian,VBA ist ja auch nicht c++.VBA ist ja auch mehr oder weniger nur eine Scriptsprache, mit der man allerdings einiges machen kann. Und was hier nicht geht kannst du aus anderen Sprachen holen.Ein OCX ist ein Steuerelement, dass über die ActiveX Schnittstelle mit dem Hostprogramm kommuniziert. Grundsätzlich verhält sich das OCX wie ein normales Control welches du in dein Formular ziehst.Das kannst du dir selber machen (z.B. mit VB oder C oder ..), oder du suchst nach entsprechenden Angeboten im ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : selectionset sortieren?
Stelli1 am 30.09.2007 um 13:02 Uhr (0)
Hallo Peter,ein Selectionset ist eine Collection von Referenzen zu Objekten die durch eine Auswahl aus der Zeichnung gefüllt wird. Das heisst, jede Referenz hat eine Position(ID) innerhalb des Selectionsets.Code:for ID=0 to sset.count -1 set RefObj = sset(ID)next IDDu kannst aber auch das Handle der Objekte speichern.Code:handle=RefObj.HandleDann bauchst du nicht mehr auf dein Selectionset zurückgreifen und kannt mitCode:set RefObj=Thisdrawing.HandleToObject(Handle)das Objekt wieder ansprechen.Wilfried ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : InsertBlock funktioniert immer nur einmal pro Zeichnung
Stelli1 am 12.03.2008 um 19:40 Uhr (0)
Hallo,mit deiner Funktion fügst du ja auch eine Datei ein. Die wird dann in der zweiten Zeichnung noch geöffnet sein.Wenn du es sauber lösen willst, fügst du die Datei einmal ein (z.B. über CopyObjects) und fügsts dann den Block aus der Zeichnung ein.Wilfried StelbergPS: [EDIT]Wer bist du denn jetzt der oder der------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form AutoCAD VBA wechseln |
|
Rund um AutoCAD : Querformatige Zeichnung erstellen
Stelli1 am 19.03.2009 um 16:41 Uhr (0)
Hallo,und später soll das aus der gedrehten Zeichnung so in die Wirklichkeit oder ins GIS übertragen und alle wundern sich das es nicht passt. Und das hoffentlich vor der Ausführung. Wie es sich anhört ist auch schon vorher in der Zeichnung "gewurstel" worden.Wenn du einen Koordinatenbereich für deinen Spielplatz hast kannst du den doch mal mit den untern links angezwigten Koordinaten vergleichen.Ansonsten braucht man ja nicht unbedingt alles Elemente verschieben/drehen sondern nur die Anzeige. Am einfachs ...
|
| In das Form Rund um AutoCAD wechseln |
|
Autocad VBA : allen Blocken in einer Zeichnung Linieweight zuweisen
Stelli1 am 15.03.2007 um 14:24 Uhr (0)
Wie machst du es denn mit dem Batchbetrieb ?Im Sucher gibt es da eine Menge:-Zeichnung öffnen-Selectionset anlegen-Selectionset füllen mit SelectAll und Filter für Blöcke-Alle Elemente im Selectionset durchlaufen und Linienstärke ändern-SpeichernStelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Einen Block aus einer Zeichnung in eine andere kopieren
Stelli1 am 28.04.2006 um 11:37 Uhr (0)
Hallo Lary,folgender Code kopiert die Blockdefinition von einer Zeichnung in eine andere und fügt in zur Kontrolle ein.Code:Option ExplicitSub CopyBlock() Dim SourceDoc As AcadDocument Dim Targetdoc As AcadDocument Dim BlockDef As AcadBlock Dim CopyBlockDef(0) As Object Dim Result As Variant Zeichnung zuweisen (beide sind geöffnet) Set SourceDoc = Application.Documents(0) Debug.Print SourceDoc.Name Set Targetdoc = Application.Documents(1) Debug.Print Targetdoc.Name Der zu kopierende Bloc ...
|
| In das Form Autocad VBA wechseln |
|
VBasic : Aktualisieren einer Zeichnung
Stelli1 am 05.04.2006 um 10:21 Uhr (0)
Hallo,über die Win-API kannt du sleep verwenden.Code:Private Declare Sub Sleep Lib "kernel32.dll" ( _ ByVal dwMilliseconds As Long) sleep 10 (10ms warten)Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form VBasic wechseln |
|
Autocad VBA : Variable aus Modul mit Zeichnung speichern
Stelli1 am 09.01.2007 um 10:45 Uhr (0)
Hallo Burchii,die von Thomas vorgeschlagene Methode scheint mit auch die bessere. Sonst löscht nacher einer die Linie oder den Block weg. Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Schrittweise Auswertung der Zeichnung mit SelectAtPoint
Stelli1 am 16.03.2007 um 11:19 Uhr (0)
Übringens noch ein kleiner Tipp.Versuch doch mal dein Posting ein wenig aufzuräumen.Da kann man sonst schwer Code vom Text unterscheiden. Und ein wenig Einrückungen im Quelltext würde die Übersichtlichkeit sehr fördern.Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Rund um AutoCAD : Hilfe ich kann nur noch eine Zeichnung öffnen
Stelli1 am 09.06.2009 um 19:28 Uhr (0)
Hallo,vielleicht die Variable SDI auf 1 ?Wenn ja auf 0 stellen.Wilfried Stelberg------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Rund um AutoCAD wechseln |
|
Autocad VBA : allen Blocken in einer Zeichnung Linieweight zuweisen
Stelli1 am 15.03.2007 um 14:37 Uhr (0)
Mir fällt nur noch ein das nur Elemente gefunden werden die im aktuellen Bildschirmausschnitt liegen.Vielleicht vorher mal Zoom GrenzenStelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Schrittweise Auswertung der Zeichnung mit SelectAtPoint
Stelli1 am 15.03.2007 um 13:48 Uhr (0)
Hallo,es gibt da wohl noch ein paar Punkte ...Ein selectionset (mit und ohne s) mit gleichen Namen kann nur einmal pro Zeichnung existieren. Du musst prüfen ob eines da ist und wenn nicht eins anlegen.Code:on error resume nextset sset = thisdrawing.selectionsets("Mysel")if err.number then set sset = thisdrawing.selectionsets.add("Mysel")end ifon error goto 0Wenn du per Sendcommand ein Element erzeugts kannst du dir dieses in der passenden Ereignisroutine in AutoCAD abfangen.Code: Thisdrawing CodePrivate S ...
|
| In das Form Autocad VBA wechseln |
