|
Autocad VBA : Rechteck schraffieren
Proxy am 19.10.2004 um 22:10 Uhr (0)
Und wieder eine geniale Mapcar- Meisterwerk -Erkärung der Zahlentheorie und Einsichten in seine Relation zur Umwelt ! Nur es ich echt heftig so ein Text auf ein armes Viereck und dann auch noch auf VBA-Basis loszulasen. P.S. Leg dir beim Scanne einen 100% Samtstoff unter den Deckel oder Mattschwarzpapier, das behebt die Durchlichtigkeit des einzuscannenden Originals. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-de ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Punkt & Komma [Zehnerblock]
Proxy am 12.12.2003 um 10:35 Uhr (0)
So aus Langeweile und Spass an den Unities Code: Option Explicit . . . Private Punkt_Komma_Status As Boolean . . . Sub Punkt_Komma () If Punkt_Komma_Status = False Then Shell ( LAUFWERKPFAD Punkt.exe ) Punkt_Komma_Status = True Else MsgBox ( Das Programm ist bereits aktiv und kann nicht nochmal gestartet werden ! ), vbInformation Punkt_Komma_Status = True End If End Sub in der MNU hinzufügen: ID_Punkt_Komma [_Button( Punkt statt Komma im Zehnerblock. , punkt_komma.bmp ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Punkt & Komma [Zehnerblock]
Proxy am 12.12.2003 um 11:41 Uhr (0)
Zitat: Original erstellt von lakeja: Hallo Proxy, Genau das hab ich heute gesucht! DANKE!!! Da ich aber ein Neulingbin weiß ich leider nicht wie man die Punkte vergeben kann ???? wenn du ALT+F11 drückst und den Code in den Abschitt Modul1 einfügst und dann als dvb-Projekt entsprechend abspeicherst kannst du die Funktion am Zehnerblock immer benutzen. Bei Fragen PM ------------------ (entmake (entget (entlast))) | Die Pro-Version auf Anfrage erhältlich. Lisp?!?! Why the H ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Einige grundsätzliche Fragen
Proxy am 16.12.2003 um 13:59 Uhr (0)
Code: Sub Example_Thickness() This example creates a circle in model space and changes the thickness of the circle. Dim circleObj As AcadCircle Dim centerPoint(0 To 2) As Double Dim radius As Double Define the circle centerPoint(0) = 0#: centerPoint(1) = 0#: centerPoint(2) = 0# radius = 5# Create the Circle object in model space Set circleObj = ThisDrawing.ModelSpace.AddCircle(centerPoint, radius) ZoomAll Find the current thi ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Object.Centroid ?
Proxy am 27.12.2003 um 14:53 Uhr (0)
Hallo, und im Vorraus ein schönes 2004. Nun kommen wir mal zur dem Problem: wenn ich mit dem alten gutten _masspop von einer 3D-Region abfrage bekomme ich ein 3 er Punktepaar beim Schwerpunkt, jedoch mit VBA habe ich noch keine Lösung gefunden da schon im Objekt-Modell das Centroid -Property der Region z.B. auf ein 2 er Array von Doubles als Variant definiert ist. Ist das eigentlich ein Fehler oder Feature von AutoDesk ? Ist es dann überhaupt möglich mit VBA auch 3D-Körper abzufragen und entsprechende ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : VBA verdeckte Linien / shade / Drahtmodel
Proxy am 04.01.2004 um 11:16 Uhr (0)
meinst du shademode mit Verdeckt / 2d / 3D vielleicht ? ------------------ (entmake (entget (entlast))) | Die Pro-Version auf Anfrage erhältlich. Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Object.Centroid ?
Proxy am 04.01.2004 um 11:47 Uhr (0)
danke euch beiden, war mein Denkfehler , dann kommt sowas raus Code: Sub Centroid_2_Point() Dim Object As Object Dim ssget As AcadSelectionSet Dim Centroid As Variant Dim location(0 To 2) As Double Dim ZielLayer As String Dim AcadPoint As AcadPoint ZielLayer = Mein Layername hier On Error Resume Next ThisDrawing.Utility.GetEntity Object, PickedPoint, Bitte Objekt wählen: If TypeName(Object) = Region Then Set Object = Object End If Centroid = Object.Centroid location(0) = Centroid(0): location ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : VBA verdeckte Linien / shade / Drahtmodel
Proxy am 04.01.2004 um 12:27 Uhr (0)
sub blabla() [...] thisdrawing.sendcommand _shademode 3d oder hidden usw usw hier deine Wunschoption halt einstellen [...] end sub ------------------ (entmake (entget (entlast))) | Die Pro-Version auf Anfrage erhältlich. Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Object.Centroid ?
Proxy am 04.01.2004 um 18:11 Uhr (0)
scheint zu funktionieren. kA warum bei dir nicht. ------------------ (entmake (entget (entlast))) | Die Pro-Version auf Anfrage erhältlich. Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : OSnap im VBA-Code
Proxy am 08.01.2004 um 17:45 Uhr (0)
Die osnap -Variable vor der eigentlichen Punktwahl verändern, mit thisdrawing.sendcommand _osmode ... oder auch anders ... aber die erste Variante dürfte auch gehen. ------------------ (entmake (entget (entlast))) | Die Pro-Version auf Anfrage erhältlich. Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Variablen
Proxy am 09.01.2004 um 09:55 Uhr (0)
Funktion um einen String auf das Aufkommen einer Zahl zu prüfen. Die einzelenen Stingstellen mit einer Schleife in eine Funktion übergeben und dann prüfen: Dim x As Char For Each x In sString Next ... ---------------------- ... If x And IsNumeric(s) Then ... ------------------ (entmake (entget (entlast))) | Die Pro-Version auf Anfrage erhältlich. Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the w ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : MachDIA Befehl
Proxy am 20.01.2004 um 18:14 Uhr (0)
...sendcommand mslide ? ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Lektüre VBA hauptsächlich mit Dateien?!
Proxy am 30.01.2004 um 15:58 Uhr (0)
Zitat: Original erstellt von Feyza: Hallo, ich habe mir das Mit AutoCAD programmieren mit VBA gekauft [...] Danke im voraus Feyza ISBN 3-8273-2105-0 ? Solltest vielleicht die ersten Kapitel nochmal lesen und sich ein Scriptähnliches Konstrukt bauen und die Aufgabenstellung etwas genauer beschreiben. z.B. In ein Textfeld was eingeben, er sucht sich in einem bestimmten Verzeichnis das aus, listet es in einem Bos Block ? aus, man kann dies anwählen und öffnen...... war äusserst ungenau. Act ...
|
| In das Form Autocad VBA wechseln |
