|
VBasic : Autocad VBA-Plotdialog
Harry K am 19.12.2001 um 14:48 Uhr (0)
Hallo allerseits, wer kennt ich gut mit VBA/Autocad2000 und den integrierten Plotmöglichkeiten aus? Ich schreibe einen eigenen Plot-Dialog und habe folgende Probleme: 1) wenn innerhalb von vba die Plotausrichtung geändert wird, dann verschiebt sich die Zeichnung auf dem Papier, obwohl die centerplot-Eigenschaft auf true steht! Beispiel: Sub test() Dim plot As AcadPlot Dim aktlayout As Variant Dim layoutlist(0) As String Dim layout As ACADLayout Set layout = ThisDrawing.ActiveLayout Set plot = ThisDrawing ...
|
| In das Form VBasic wechseln |
|
VBasic : Autocad VBA-Plotdialog
Harry K am 04.01.2002 um 10:27 Uhr (0)
Danke Armin, folgendes habe ich noch festgestellt: Auf einem Rechner mit Autocad2000i und Netzlizenz trat das Problem von Punkt 2 wie beschrieben auf, auf einem Rechner mit Autocad 2000 aber hat sich eine Änderung des Plotstilpfades per vba sofort auf den tatsächl. Stilpfad ausgewirkt. Werde der Sache noch mal nachgehen. Gruß Harry
|
| In das Form VBasic wechseln |
|
VBasic : VBA-Laien Frage...
Harry K am 21.01.2002 um 17:59 Uhr (0)
Hallo Marc, ohne auf dein spezielles Programm einzugehen mal ein paar Tips zu Formularen: - Aufrufen innerhalb eines Makros mit name.show - Bei eine Autocad-Interaktion Formular ausblenden mit name.hide - ‚unload name‘ löscht das Formular aus dem Speicher - Ein Formular besteht normalerweise aus Steuerelementen, z.B. ein Commandbutton oder eine Listbox, aber auch dem Formular selbst - Diese Steuerelemente können/sollen mit Ereignissen belegt werden, am einfachsten gelangst Du durch einen Doppelklick auf ei ...
|
| In das Form VBasic wechseln |
|
VBasic : Autocad2000-vba Schraffur
Harry K am 21.01.2002 um 18:05 Uhr (0)
Hallo, Benutze Autocad 2000i. Weiß jemand einen Weg, um über VBA die Fläche einer Schraffur abzufragen? Weiß jemand überhaupt einen Weg um irgendwie die Fläche einer Schraffur abzufragen? Bin für jede Hilfe dankbar Harry K
|
| In das Form VBasic wechseln |
|
VBasic : Position vom Mauspointer ermitteln
Harry K am 30.01.2002 um 13:21 Uhr (0)
Hallo Dirk, dazu kannst Du ein Ereignis-Steuerprogramm schreiben. Autocad2000-VBA stellt z.B. für den Fall "Doppelklick" und "Rechtsklick" ein Ereignis zur Verfügung. Füg z.B. folgenden Code in dein vba-Projekt in dem Modul Autocad Objekte - Thisdrawing ein: Private Sub AcadDocument_BeginDoubleClick(ByVal PickPoint As Variant) MsgBox "Und jetzt dein Programm aktivieren" End Sub Allerdings sollte man bei der Benutzung von Ereignissen einige Dinge beachten, Du solltest Dir die Autocad-Online-Hilfe dazu ansch ...
|
| In das Form VBasic wechseln |
|
VBasic : Das ein oder andere Problem
Harry K am 27.02.2002 um 15:05 Uhr (0)
Hallo, falls ich mich richtig erinnere, braucht man für VB6-Exe Programme die Datei "Msvbvm60.dll", wenn man Win NT 4 benutzt. Unter Win98 war sie schon vorhanden. Gruß Harry
|
| In das Form VBasic wechseln |
|
VBasic : synchrone verarbeitung
Harry K am 16.04.2002 um 13:30 Uhr (0)
Hallo bs, egal ab synchron oder asynchron, vergiss es, irgendwelche Benutzerabfragen mit der Sendcommand-Methode zu versuchen. Autocad arbeitet erst das vba-Modul ab und führt dann Befehle der Befehlszeile aus. Der SendCommand-Befehl eignet sich daher gut für das Ende deines Makros, wenn alle vba-Befehle durch sind. Gruß Harry
|
| In das Form VBasic wechseln |
|
VBasic : AutoCAD Dockable ActiveX Control Container
Harry K am 07.08.2002 um 09:33 Uhr (0)
Hallo Erwin, habe mich ebenfalls mit accont.arx beschäftigt. Leider weiß ich nicht, wie ich das ocx-modul über vb/vba in Autocad einbinde. Ich schaffe es nur über die Eingabeaufforderung mit DOCKABLE_CONTAINER und dann z.B. docktest.ocx. Gruß Harry
|
| In das Form VBasic wechseln |
|
VBasic : Laden/Erstellen von Zeichnungen über VBA
Harry K am 30.09.2002 um 13:19 Uhr (0)
Hallo Dirk nimm einfach folgendes Beispiel aus der Online-Hilfe: Sub Example_New() This example creates a new drawing based on the template ansi-a.dwt. Note: The path to the template file is included with its name. Adjust this path for your installation location before running this example. Dim templateFileName As String templateFileName = "c:AutoCAD emplateansi-a.dwt" ThisDrawing.New templateFileName End Sub Gruß Harry
|
| In das Form VBasic wechseln |
