|
Autocad VBA : Sendcommand Ausgabe Textfenster unterdrücken
Stelli1 am 28.12.2005 um 11:17 Uhr (0)
Hallo Didi,hab jetzt erst gesehen das du noch ein Problem hast.Ich glaube das es mit der Befehlswiederholung nicht auf normalen Wege geht. Wenn mit Sendcommand ein Befehl an AutoCAD geschickt wird, ist dieser immer der letzte für die Befehlswiederholung.Ich würde den Befehl (avng) am Ende deines Makros einfach nochmal aufrufen und vorher ein Flag setzen das er nicht nochmal durchläuft. Dann steht dein Befehl wieder am Ende der Befehlsfolge.Bau dir doch eine Abfrage rein Code:Option ExplicitPublic Flag As B ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Führungslinienkommentar wird zum Block
Stelli1 am 25.01.2006 um 16:53 Uhr (0)
Hallo Stefan,willkommen bei CAD.deIch glaube du bist im falschen Forum.Hier ist AutoCAD VBA. Beim MDT gehts ein wenig anders. Es gibt hier ein eigenes Forum.Stelli------------------Warum lispeln wenns auch anders geht.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block einfügen / Sichtbarkeit
Stelli1 am 29.01.2006 um 15:46 Uhr (0)
Hallo Dirk,grundsätzlich geht das nicht.Du kannst den Block nur an eine Dummy Position einfügen unddann per SendCommand die Verschiebenfunktion von AutoCAD aufrufenund den Block vorselektieren.Goofy hat so was mit Attributen gemacht.siehe hierStelli------------------Warum lispeln wenns auch anders geht.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Dateiauswahl aus Verzeichnis
Stelli1 am 30.01.2006 um 11:01 Uhr (0)
Halo Ines,in dem Artikel war folgender Code: Zitat:Original erstellt von startrek:.....Code:Sub asdf() Dim f$, p$, i& p = "D:Cad" f = Dir(p & "*.dwg") i = 1 Do While f "" Documents.Open p & f With ActiveDocument MsgBox i & ": " & .WindowTitle If Not .Saved Then .Save .Close End With i = i + 1: f = Dir LoopEnd SubGruss Nancy Das ist keine Endlosschleife.Dir(p & "*.dwg") liest die erste Datei im Pfadf = Dir liest die nächste Datei. Gibst keine mehr wird die Schleife beendet. Wichti ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Dateiauswahl aus Verzeichnis
Stelli1 am 30.01.2006 um 12:55 Uhr (0)
Hallo Ines,bei mir läufst einwandfrei.Hast du vielleicht die Systemvariable SDI auf 1 ?Dann kannst du nur ein Dokumant öffnen und AutoCAD wird eventuell mit dem Schliessen der Zeichnung geschlossen.Stelli------------------Warum lispeln wenns auch anders geht.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Koordinaten von Linien usw. in Blöcken mit VBA auslesen
Stelli1 am 01.02.2006 um 12:49 Uhr (0)
Hallo Sigi,bist du mit VBA vertraut ?Im AutoCAD werden die Zeichnungsdaten im Modelbereich verwaltet.Im folgenden Beispiel werden alle Zeichnungselemente des Modellbereichs duchsucht. Hier sind verschiedene Objekttypen zu finden, die teilweise unterschiedliche Eigenschaften haben.Code:Option ExplicitSub lese_koordinaten() Dim entity As AcadEntity Dim blockref As AcadBlockReference Dim lwpolyline As AcadLWPolyline Dim Text As AcadText Dim Mtext As AcadMText usw. Dim i As Integer Dim Koord As Vari ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Gruppencode und Gruppentyp herausfinden
Stelli1 am 07.02.2006 um 10:24 Uhr (0)
Hallo Florian,wenn gar nichts anderes geht, kann man sich ein Element in eine DXF Datei speichern. Ab dem Abschnitt "Entities" ist dann dein Element aufgelistet.Stelli------------------Warum lispeln wenns auch anders geht.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Masse mit Vb erkenne und verarbeiten
Stelli1 am 20.02.2006 um 11:54 Uhr (0)
Hallo Florian,mit GetEntity kannst du die Linien aus dem AutoCAD abgreifen.Bei den Elemente prüfst du jeweils die Richtung (ist der Anfangspunkt oder der Endpunkt der nächsten Linie gleich dem Endpunkt der vorherigen). Die Koordinatzen sammelst du in einer Punkteliste.Mit der Flächenformel berechnest du die Fläche.Alternativ könnest du mit dem Acad Befehl GPOLY aus deinen Konturen eine Fläche als geschlossenes Polygon bilden lassen. DIe Fläche ist dann schon als Eigenschaft der Polylinie vorhanden.Stelli- ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Grundsätzliche Entscheidung: VBA oder LISP?
Stelli1 am 28.02.2006 um 15:03 Uhr (0)
Hallo Ontario,wieso entweder oder ? Zwischen weiss und schwarz gibt es noch eine Menge dazwischen und drum herum.Die Vorteile von VBA sind meines Erachtens- durchgängige Sprache von Office über AutoCAD bis VB- dadurch leichte Portierbarkeit- leichte Maskengestaltung- leichter Zugriff auf DB mit ADO- Zugriff auf Win ApiNachteile liegen wohl hier- nicht 100% Ein- und Anbindung an AutoCAD (einige Funktion sind schlecht)- schwierigere Einbindung in AutoCAD (in Kombi mit Lisp gut)Ich würde den Schwerpunkt wiede ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : AutoCAD Befehl messen oder teilen
Stelli1 am 03.03.2006 um 15:42 Uhr (0)
Hallo,in VBA gibt es das so nicht. Ich habe eine VB Klasse die mir die Punkte auf Elementen rechnet .(z.B. für Böschungsschraffen und linienbegeleitende Symbole)Hier mal ein GrundgerüstEine andere Möglichkeit wäre eventuell den Acad Befehl mit SendCommand auszuführen. Werden durch Messen oder Teilen Punkte oder Blöcke neu erzeugt, stehen diese als letztes in der Elementauflistung.Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf Dateieigenschaften in VBA
Stelli1 am 22.03.2006 um 09:21 Uhr (0)
Hallo,mit thisdrawing.sendcommand kannst du auch die AutoCAD Funktionenzum Speichern etc. aufrufen.Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf Dateieigenschaften in VBA
Stelli1 am 22.03.2006 um 10:03 Uhr (0)
Hallo,das liegt daran das du ein Formular modal geöffnet hast. Wenn du es mit "form.show" oder "form.show 1" aufrufts ist es modal.In diesem Fall wartet AutoCAD mit der Programmausführung bis dein Formular geschlossen ist und arbeitet dann deine Sendcommands ab.Vermeiden kannst du das wenn du die Form nonmodal lädst (form.show 0) oder die Form vor dem Sendcommand verbergen (form.hide).Dann klappt es auch mit dem Speichern.Stelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf Dateieigenschaften in VBA
Stelli1 am 27.03.2006 um 20:57 Uhr (0)
Hallo,hier noch dein heiss begehrter Wunsch , speichern unter ohne Form. Lade dir mal die DVB. Unter Modul1 ist die Funktion auf das wesentliche reduziert.Code:Sub Speichern_Unter() Dim Dateiname as string Dateiname = GetSaveName("AutoCAD DWG|*.dwg|", "dwg", "C:TEMP", "Mein Speichern", "TEST.DWG") If Not Dateiname = "" Then Speicher mich .... End IfEnd SubDer Rest passiert im anderen Modul. Brauchst du nur immer mit einbinden und fertig.Stelli------------------Warum lispeln wenns auch anders ...
|
| In das Form Autocad VBA wechseln |
