|
Autocad VBA : Block einfügen mit geänderten Attributen?
harryk am 19.08.2003 um 16:28 Uhr (0)
jepp, jetzt kapier ich was Du meinst. Wie oben beschrieben gehts, aber ist der Block denn nicht etwas verloren an irgendeiner Koordinate?? Vielleicht wäre da noch eine Benutzeraktion in AutoCad angebracht. Las mal hören wie du Dir das vorgestellt hast, ist interessant. Harry Ps:irgendwas mit Kälte und oder Druckverlust? [Diese Nachricht wurde von harryk am 19. August 2003 editiert.]
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block einfügen mit geänderten Attributen?
harryk am 20.08.2003 um 08:32 Uhr (0)
Obwohl Access ne Datenbankkrükke sein soll, gegenüber Excel ist das eine Rakete. Hab unsere Zeichnungs Projektverwaltung auf mdb umgestellt und spreche die mit ADO an, geht wie Schmitz s Katze. Jetzt folgt der mySql Server um noch mehr Dampf zu kriegen. Allerdings lassen sich Excel Dateien auch als Datenbank ansprechen, in Verbindung mit dem Flexgrid Steuerelement kannst Du den grössten Teil direkt von AutoCad aus steuern und benutzt Excel nur noch zum Rechnen und für die Berichte. Gruss, Harry [Diese Nac ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Block einfügen??mal anders??
harryk am 19.08.2003 um 18:06 Uhr (0)
Hi,geht auch anders, einfach nen bissl Lisp dafür beschäftigen (nicht lachen...)Das hier in einer .lsp Datei speichern und laden:(defun blockIn(Path) (setvar "cmdecho" 0) (princ) (Command "_-Insert" path pause "1.0" "1.0"pause) (setvar "cmdecho" 1) (princ) )Pause repräsentiert eine Benutzereingabe, kann durch Variabeln ersetzt werden. Von einem VBA Form ruft Ihr das Dingen folgendermassen auf:Private Sub CommandButton1_Click()Dim path As Stringpath = """G:/CADLIB/RrWaende/cwa280D.dwg"""Me.HideThisDrawing.S ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Änderung einer dxf-Datei
harryk am 17.10.2003 um 19:03 Uhr (0)
sehe ich das richtig, Du liest eine Dxf Datei in Excel ein, suchst das Vorkommen eines bestimmtem Strings und löscht die Zeile davor und die 14 nachfolgenden? Das sieht so aus als ob Du komplette Zeichnungselemente löscht, geht mit Autocad VBA besser da Du geziehlt nach diesen Typ mit den gewünschten Eigenschaften suchen und dann löschen, verschieben oder sonst noch was kannst. Wenn die Dxf Datei als Ascii vorliegt kannst Du das ganze auch direkt in der Datei machen, Open Zeichnung.dxf For Output As #1. ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : _beginSave
harryk am 02.01.2004 um 10:07 Uhr (0)
hi auch, zu 1: Selection Set löschen nach Benutzung ist Ok, nur aufpassen wenns Programm abbricht, in dem Fall besser vor dem Erstellen des Selection Sets nochmal prüfen ob der Name nicht schon existiert. zu 2: warum hast Du Deinen Code in der Zeichnung gespeichert? Genau wie in Excel kannst Du den Code in unabhängige Projektdateien speichern. Bei Autocad heissen die ProjektBlaBlaBla.DVB. Kannst Du dann bei Bedarf oder mit Autocad laden. Damit hat sich das Code löschen jedenfalls erledigt, 3. dann auch. Di ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Datei neu
harryk am 19.01.2004 um 08:11 Uhr (0)
warum öffnest Du die Zeichnung dann nicht mit Schreibschutz wenn der Opendialog Dir den Pfad zurück gibt? Gruss, Harry
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechenformeln werden nicht akzeptiert
harryk am 19.01.2004 um 09:58 Uhr (0)
also beim meinem Office 2k und Autocad 2k2 heissen die Funktionen round() und sqr(), beide gleich. Excel VBA kann allerdings auch Tabellenfunktionen auswerten, nicht verwechseln! Gruss, Harry
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Datenbankverknüpfung mit MAP verwenden
harryk am 17.01.2004 um 03:56 Uhr (0)
Hi, ok, kannst Du mal ne Beispiel dwg schicken und nen paar Datensätze? Hast Du schon mit ADO gearbeitet? Unter ..SampleActiveXFacility findest Du nen kompletten Beispielcode der es u.a ermöglicht Autocad Elemente zu einem Datensatz anzeigen zu lassen, leider benötigst Du dazu VB. Die Verknüpfung dort geschieht allerdings über das Autocad Objekt Handle. Gruss, Harry [Diese Nachricht wurde von harryk am 17. Jan. 2004 editiert.]
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Standard-Fehlermeldung im AutoCAD Textfenster
harryk am 22.01.2004 um 10:51 Uhr (0)
Genius, ha! hat eigentlich nichts zu bedeuten. Nehmen wir mal an Du hast in Deiner Zeichnung den Block GENAXEH der vielleicht für Bemassungen verwendet wird oder so, jedenfalls für GENIUS so wichtig das er in allen Zeichnungen verwendet wird. Wenn Du jetzt andere Blöcke einfügst die mit GENIUS erzeugt wurden oder auf Basis einer GENIUS Datei erstellt wurden wird Dir einfach nur mitgeteilt das die Block Definition schon vorhanden ist und diese jetzt verwendet wird. Wenn Du von einer leeren Datei ausgehst ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Standard-Fehlermeldung im AutoCAD Textfenster
harryk am 22.01.2004 um 16:40 Uhr (0)
wenn s nen Namen hat kann man s auch löschen, ggf. über den Filter gehen. Genius nutzte Blöcke gerne um Daten in Form von Xdaten zu verstecken, die Linie z.B. ermöglicht Dir es den Block überhaupt packen zu können (bevor es in Acad den Objekt Filter gab). Ich benutze diese Technik um Datenblöcke die eigentlich nur aus Attributen bestehen sichtbar zu halten, ein kleiner Stern auf dem Layer Defpoints macht s finden einfacher, nur so als Tip. Harry
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Autocad Standard Icons
harryk am 03.02.2004 um 13:02 Uhr (0)
es gibt zwar Programme die Icons aus dll s kopieren können. Für ne Hand voll könntest Du Dir eine Toolbar anlegen, die gewünschten Icons draufziehen und unter bearbeiten dann weg speichern. Gruss, Harry
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Autocad Standard Icons
harryk am 10.02.2004 um 06:03 Uhr (0)
...rechten Mausklick auf Toolbar Icon, Anpassen, nochmal Rechtsklick, Eigenschaften, Symbolbild bearbeiten, speichern unter. Wenn der Werkzeug anpassen Dialog einmal auf ist brauchst Du nur noch die gewünschten Icons anklicken, Bearbeiten, speichern unter. Warum so kompliziert? ;-) Harry
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : rund ums plotten
harryk am 12.02.2004 um 14:12 Uhr (0)
klar geht das, ungefähr so: ... dim Layout As AcadLayout Layout.CanonicalMediaName = UserDefinedMetric (610.00 x 850.00MM) Layout.PaperUnits = acMillimeters Layout.PlotRotation = ac270degrees Layout.SetWindowToPlot PltPoint1, PltPoint2 Koordinaten Layout.PlotType = acWindow festlegen für Ausschnitt Layout.PlotWithLineweights = True Layout.PlotViewportsFirst = True PlotOk = ThisDrawing.Plot.PlotToFile(FileName) in Datei plotten If PlotOk = True Then .... Du könntest noch einen temporären Text einfügen, ...
|
| In das Form Autocad VBA wechseln |
