Hallo Miteinander,
ich habe ein paar Tools programmiert.
Da nun Weihnachten vor der Türe steht mach ich euch ein kleines Geschenk und stelle sie der Allgemeinheit zu Verfügung.
BlockNumm Ver. 02-12-17
-----------------------
Inhalt von BlockNumm021217.zip:
-------------------------------
ReadMe.txt --> diese Datei
BlockNumm.mnu --> Menü BlockNumm
BlockNumm.dvb --> VBA-Datei
RoSiNiNo.cmd --> Befehlszuweisung (mit Texteditor editierbar)
acaddoc.lsp --> wird bei jeder Zeichnung geladen (lädt RoSiNiNo.cmd)
diese Datei ist nicht notwendig wenn man RoSiNiNo.cmd in Startgruppe von "appload" geladen wird
Blöcke:
HK-O.dwg
HK-U.dwg
PT-B-OL.dwg
PT-B-OR.dwg
PT-B-UL.dwg
PT-B-UR.dwg
PT-C-OL.dwg
PT-C-OR.dwg
PT-C-UL.dwg
PT-C-UR.dwg
Icons:
Abwicklung.bmp
BlockNRefr.bmp
BlockNumm.bmp
BlockRefr.bmp
BlockScale.bmp
DivideEx.bmp
InsertEx.bmp
LaengeEx.bmp
MeasureEx.bmp
MstSet.bmp
Installation:
-------------
Um alle Funktionen nutzten zu können benötigt man "AcadX.arx".
Download unter http://members.bellatlantic.net/~vze2vjds/acadx/acadx15.htm
Das Zip-File in einen beliebigen Ordner entpacken. Der Pfad muß nicht in Acad gesetzt sein.
Danach AcadX.arx in die Startgruppe von "appload" geben.
BlockNumm021217.zip in eigenen Pfad der in Acad gesetzt werden muß, entpacken.
Sollte bereits eine acaddoc.lsp vorhanden sein, in dieser RoSiNiNo.cmd laden oder RoSiNiNo.cmd in die Startgruppe von "appload" geben.
Menü BlockNumm laden, Acad neu starten.
Funktionen:
-----------
Maßstab setzten --> MSTS - wird für "Numerierte Blöcke einsetzten" benötigt
Numerierte Blöcke einsetzten --> BLOCKNUMM - setzt Blöcke ein und nummeriert gewähltes Attribut fortlaufend
BlockScale --> BLKSCALE - Skaliert Blöcke um deren Einsetzpunkt
Block Refresh --> BLREFR - Setzt gewählte Blöcke neu ein und übernimmt Inhalt von gleichen Attributen
Block New Refresh --> BLNREFR - Wechselt Blöcke mit neuem Block aus und übernimmt Inhalt von gleichen Attributen
Messen mit Anfangspunkt --> MEX
Dieser Befehl ist ein erweiterter Messen-Befehl.
1. Objekt wählen (Linie, Polylinie, Kreisbogen, Ellipse,...)
2. Anfanspunkt und Richtung wählen
3. Segmentlänge angeben oder Blockname, Blockname aus Liste, Block zeigen
3.1 Block ausrichten?
4. Anzahl eingeben
Teilen mit Anfangspunkt und Endpunkt --> TEX
Dieser Befehl ist ein erweiterter Teilen-Befehl
1. Objekt wählen
2. Anfangs- und Endpunkt wählen
3. Anzahl der Segmente oder Blockname, Block aus Liste, Block zeigen, maximaler Abstand, minimaler Abstand
3.1 Block ausrichten?
Länge --> LEX
Es wird der Abstand von einem Punkt zu einem zweiten Punkt auf einem Objekt angegeben
1. Objekt wählen
2. Zweiten Punkt angeben oder ersten Punkt angeben (es wird beim ersten Aufruf der Anfangspunkt des Objekts angenommen)
An Objekt ausgerichtet einsetzen --> EEX
Es werden Blöcke auf einem Objekt ausgerichtet
1. Objekt wählen
2. Blockname oder Block durch zeigen
3. Punkt zeigen oder neues Objekt wählen
Abwicklung --> ABWICKLUNG
Es werden Punkte an einem Objekt abgewickelt und auf einer Linie aufgetragen
1. Objekt wählen
2. Punkte wählen
3. Einsetzpunkt und Winkel der Abwicklung angeben
Allgemeines:
------------
Die gezeigten Punkte müssen nicht auf dem Objekt liegen, es wird immer der näheste Punkt auf dem Objekt verwendet.
------------------
Roland
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP