|
Autocad VBA : Block aus Ordner einfügen
Dirk.B am 27.03.2007 um 17:41 Uhr (0)
Hi Carsten!Das Programm spielt sich innerhalb einer UserForm ab und wird aus einem Modul her ausgeführt.Code:Sub User_Dialog() Dialog aufrufen UserForm1.ShowEnd SubListView füllen:Code:Private Sub CommandButton4_Click()Dim Anzahl As IntegerDim PicList As ListItemAnzahl = 0Dim cFile As StringDim i As Integer ListView1.View = lvwReport ListView1.ColumnHeaders.Clear ListView1.ColumnHeaders.Add , , "Bildname"bmpPath = TextBox1.Value & "" "c:Temp" & "*.bmp") ListView1.ListI ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Breite von MTEXT
sarotti am 02.04.2007 um 13:12 Uhr (0)
Hallo,Als Ergänzung zu dem oben genannten, füge ich den Code für die Funktion "Textbreite" ein.Ich hatte das Problem, das ein einzeilger Text passend unterstrichen werden sollte.Möge es demjenigen weiterhelfen der danach sucht.GrußSarottiFunction Textbreite(Text As String, Optional Texthoehe As Double, Optional Textstil As String) Ermittelt die Textbreite eines einzeligen Textfeldes Dim EinfügePkt(2) As Double Dim TextObj As AcadText EinfügePkt(0) = 0# EinfügePkt(1) = 0# EinfügePkt(2) = 0# If Text ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Eigenes UCS mit VBA
Carsten1210 am 04.04.2007 um 15:57 Uhr (0)
Hi Benny,Dazu benötigst du die Funktion "object.TranslateCoordinates", da Autocad hier immer im WKS arbeitet und rechnet.Dazu solltest du hier im Forum einiges finden.Gruß, Carsten
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Schnittpunkt zweier Linien berechen
tunnelbauer am 09.04.2007 um 00:29 Uhr (0)
Hi und herzlich willkommen auf cad.de !Schau mal in deiner AutoCAD Developer Documentation unter IntersectWith nach... da gibts dann auch passend einen Beispiel-Code dazu (hoffe es hilft dir weiter...)------------------GrüsseThomas
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Wie kann ich *.dwg lesen!!
Youssef am 17.04.2007 um 11:57 Uhr (0)
hi leute,ich bin neu und beschäftige mich seite kurz mit Autocad.ich möchte eine zeichnung zeichnen und dann als Informationen lesen.Die Zeichnung soll mit *.dwg.Gibt es editor oder Compiler die das liest!GrüßYoussef
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Zugriffsregelungen von Ordnern abfragen
wwwilli am 19.04.2007 um 15:34 Uhr (0)
Hallo.Kann man mit VBA abfragen, welche Berechtigungen für einen bestimmten, vorhandenen (Datei-)Ordner gesetzt sind? In DOS würde ich das mit CACLS abfragen (und gegebenenfalls ändern).MfG,wwwilli
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Zugriffsregelungen von Ordnern abfragen
Carsten1210 am 20.04.2007 um 08:45 Uhr (0)
Hi wwwilli,Schau mal in die angehängte Datei (einfach in ein Projekt importieren) nach der Funktion "UpdatePermissionsOfFolder". Da sollte eigentlich alles zu Usern und deren Rechten drin sein. Hab ich mal auf ner Seite von M$ gefunden.Sonst kannst du auch noch nach XCACLS und folder permissions suchen. Da kommt einiges zusammen.Gruß, Carsten
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Zugriffsregelungen von Ordnern abfragen
wwwilli am 20.04.2007 um 12:16 Uhr (0)
Mann, ist das kompliziert.Ich will eigentlich nur vergleichen, ob zwei Ordner im Netz die gleichen Zugriffsrechte haben. In DOS wäre das grob so:Ich gebe CACLS für den einen Ordner in eine Datei aus;ich gebe CACLS für den anderen Ordner in eine andere Datei aus;ich standardisiere die beiden Ausgaben (Leerzeichen, Sortierung, Großkleinschrift);ich vergleiche, ob in beiden das selbe drinsteht.- Wenn nicht, dann Meldung oder so.Soll ich das jetzt "Slow and dirty" mit Shell nachfummeln oder gibts vielleicht do ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : CSV - Dateien einlesen
Maximilianus am 23.04.2007 um 09:10 Uhr (0)
Hallo,weil das hier gut dazupasst, hänge ich es mal gleich an:Ich habe ebenfalls eine CSV-Datei, die wie folgt aussieht:Suchwert1; Zielwert1Suchwert2; Zielwert2Suchwert3; Zielwert3Suchwert4; Zielwert4...Das Skript liefert einen Suchwert, zu dem aus der CSV der passende Zielwert gesucht und an eine Variable übergeben werden soll.Hat dazu jemand eine Idee? Ich komme mit der Suche im Array nicht zurecht, wie dass aussehen muss. Ich formuliere es mal so:While not EOF Wenn Suchwert = SucherwertX Dann Zielwert ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Fenster abfangen
Heiko76 am 24.04.2007 um 08:47 Uhr (0)
Hallo zusammen,wie kann ich denn abfangen wie der User in einem Fenster geantwortet hat. Wenn man in AutoCAD eine Zeichnung geöffnet hat und dort etwas geändert hat, dann oben rechts auf das x für Schließen der Zeichnung klick, dann kommt ja ein Fenster hoch welches Fragt ob man die Zeichnung speichern möchte. Wie kann ich da raus Finden ob der User Ja gesagt oder Nein gesagt hat?------------------ cuHeikoSchau mal rein www.diemertens.de
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Linie ohne Add Methode erstellen
Pitsch52 am 29.04.2007 um 14:06 Uhr (0)
Hallo LeuteIch habe gehört, dass es möglich sei, in AutoCAD-VBA eine Linie im ModelSpace auch ohne die Add-Methode zu erstellen. Nur weiss ich nicht wie das möglich sein soll. Ich brauche die Linie ja nur um mit der Length-Eigenschaft, die direkte Distanz von einem Bogen-Endpunkt zum Bogen-Startpunkt zu ermitteln. Die Linie wird dann sofort wieder gelöscht.Wenn ohne die Add-Methode eine Linie gar nicht in der Zeichnung eingetragen würde, könnte mann sich das löschen sparen.Kann mir Jemand sagen wie das ge ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Linie ohne Add Methode erstellen
Carsten1210 am 29.04.2007 um 16:44 Uhr (0)
Hi,Ich gehe mal davon aus, das du nur den Abstand zwischen den beiden Punkten benötigst, ähnlich der Abstand-Funktion im AutoCAD.Hier ist ein Testcode mit der Funktion:Code:Public Sub test123()Dim Object As ObjectDim promt As StringDim PickedPunkt As VariantOn Local Error Resume Nextpromt = "Objekt wählen:"Utility.GetEntity Object, PickedPunkt, promtIf TypeName(Object) = "IAcadArc" ThenDim Abstand As DoubleAbstand = Distanz(Object.StartPoint, Object.EndPoint)MsgBox AbstandEnd IfEnd SubFunction Distanz(Punk ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Absturz nach Deklarierung einer Byte Variablen ?
Ralf33 am 29.04.2007 um 19:18 Uhr (0)
Hallo,ich habe gerade ein sehr eigenartiges Problem.Ein VBA Programm stürzte beim Start immer ohne Vorwarnung ab, inchlusive Autocad 2000 auf W2000. Also mit einem Schlag alles weg.Das ganze unter XP probiert, genau das Gleiche. Dann das Ganze mit ACAD2007 in der Firma laufen lassen, da läuft es ohne Probleme.Dann habe ich das Programm immer weiter geschrumpft und festgestellt, das der Fehler nicht mehr auftritt, wenn ich die Deklaration einer Byte Variablen im Allgemeinteil lösche. Dabei brauch die Variab ...
|
| In das Form Autocad VBA wechseln |
