|
Autor
|
Thema: Macro Bearbeitungszeichen (5801 mal gelesen)
|
Manuel M
Mitglied
   Beiträge: 83
Registriert: 04.02.2002
|
erstellt am: 03. Sep. 2002 10:37    Unities abgeben:          
Hallo Zusammen,nachdem ich viel aus dem Forum gezogen habe, möchte ich auch einen kleinen Beitrag leisten. Habe ein kleines Macro erstellt welches Bearbeitungszeichen auf einer Zeichnungsableitung ablegt. Das Makro ist zwar noch verbesserungswürdig, aber für den anfang nicht schlecht. Zeichen werden als Blöcke unten links auf der zeichnung eingefügt.
Hoffe jemand kann es gebrauchen. Ciao
Manuel Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
StefanBerlitz
Guter-Geist-Moderator
IT Admin (CAx)
( Bin dabei: 2.-5.12 )
Beiträge: 5611
Registriert: 02.03.2000 I have not failed.
I've just found
10,000 ways
that won't work.
--Thomas Edison
|
erstellt am: 03. Sep. 2002 13:24 Unities abgeben:
Hallo Manuel,klasse, sieht gut aus. Ich hab es noch etwas angepaßt, damit man die Pfade nicht editieren muss, sollte so direkt laufen, wenn man es irgendwo hin extrahiert. Kann ich das mit in die Makrotauschbörse aufnehmen? Ciao,
Stefan ------------------
Inoffizielle deutsche SolidWorks Hilfeseite
http://solidworks.cad.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Manuel M
Mitglied
Beiträge: 83
Registriert: 04.02.2002
|
erstellt am: 03. Sep. 2002 13:54 Unities abgeben:
Hi,das Makro kannst du auf jeden Fall aufnehmen, ist ja schließlich für alle da. Ciao
Manuel Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bernhard
Mitglied
Konstrukteur
Beiträge: 71
Registriert: 17.11.2000
|
erstellt am: 03. Sep. 2002 14:19 Unities abgeben:
Hallo Manuel,besten Dank für das Makro, welches mir schon mal super weiterhilft. Ich hab allerdings noch ein weiteres Problem, vielleicht gibt es ja hierzu auch eine passende Lösung. Ich möchte beim Einfügen einer Oberflächenbeschaffenheit nicht jedesmal die kompletten Angaben neu eingeben. d.h. jedesmal wenn
ich auf einer Zeichnung ein Oberflächenzeichen eingebe gilt es ersteinmal die Werte bei Symbol, Besondere Angaben, Rillenrichtung,
Rauheit usw. auszuwählen bzw. einzugeben.
Kann man hier nicht ein paar vordefinierte Einstellungen abspeichern? Für Lösungen sag ich schon mal Danke im voraus ------------------
MfG Bernhard Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
SRegele
Mitglied
Dipl.-Ing.
Beiträge: 17
Registriert: 13.08.2002
|
erstellt am: 03. Sep. 2002 14:36 Unities abgeben:
Hallo Manuel und Stefan,das ist eine gute Idee, kleine anwenderfreundliche und anpassbare Funktionen in Menü-Fensterchen zu packen. Leider habe ich keine Ahnung, wie man sowas selber machen kann (möchte meinen Mist auch irgendwann mal unter die Leute bringen...). ¿Kann mir da jemand von Euch weiterhelfen? hastalavista
Stephan
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Manuel M
Mitglied
Beiträge: 83
Registriert: 04.02.2002 Win XP-Pro SP2
2,66 GHz, 2GB RAM
nVidia Quadro FX1500
OSD 2006 - 14.01
|
erstellt am: 03. Sep. 2002 15:29 Unities abgeben:
Hallo Zusammen,es ist auf jedenfall möglich das Macro noch anzupasen. Das Standardwerte vorbelegt sind ist schon einmal das kleinste übel, aber was soll denn noch alles ins Makro ???? Kenne mich so im Detail nicht mit den ganzen Zeichen aus, brauche halt nur die Zeichen die ich zur Zeit eingebracht habe. Aber wenn Vorschläge kommen, könnte es realisiert werden. ciao
Manuel Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Andreas Müller
Mitglied
Masch. Ing. HTL / Betriebsing. STV
Beiträge: 1144
Registriert: 11.04.2001 SWX2006 SP4.1; XP, Quadro FX1500, IntelE6600, 2GB
|
erstellt am: 03. Sep. 2002 17:26 Unities abgeben:
Hi Manuel.1A!!! Thanks! ------------------
 Gruss
Andreas A+E Müller AG Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
VanaPeer
Mitglied
Beiträge: 1
Registriert: 13.10.2002
|
erstellt am: 13. Okt. 2002 13:35 Unities abgeben:
Really good program Manuel!
I would suggest you something IMHO helpful for program.
The surface marks and brackets are not compound.
User can not move them round easily.
So my idea is to add an empty view and
lock the surface marks and brackets to it.
Afterwards it will be easy to move them to another
place on drawing keep up the good work Vana Peer
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
JoachimSeitz
Mitglied
techn. Redakteur
Beiträge: 189
Registriert: 08.05.2001 WIN XP
SWX 2007, SP 4.0
|
erstellt am: 14. Okt. 2002 08:54 Unities abgeben:
Hallo Manuel und Stefan,hab mir das Makro runtergeladen und finde es einfach Klasse! Für unseren Bedarf muß es zwar noch angepaßt werden, aber ich denke das kriegen wir auch noch hin. Vielen Dank! Gruß, Joachim Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Hony
Mitglied
Konstrukteur
Beiträge: 26
Registriert: 16.09.2002
|
erstellt am: 14. Okt. 2002 10:13 Unities abgeben:
Hallo Manuel,vielen Dank für das Makro. Wenn ich das Makro ausführe, gehen die Zeichen immer unten links in die Ecke.
Wie kann ich alles auf einmal verschieben, oder wie beim einfügen eines Blocks die Position vorher festlegen? Bis dann
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Mike
Mitglied
Konstrukteur
Beiträge: 530
Registriert: 23.06.2000 SolidWorks Office 2009 SP2.1;
P4 2,4MHz;
NVidia Quadro FX 1500;
2GBRAM; WINXP-Pro
|
erstellt am: 14. Okt. 2002 10:30 Unities abgeben:
Zitat:
Original erstellt von Hony:
HalloWie kann ich alles auf einmal verschieben, oder wie beim einfügen eines Blocks die Position vorher festlegen?
Hallo Zusammen, Wirklich ein tolles Makro - vielen Dank an die Erschaffer ! @Hony: alles Makieren (mit LMB Rahmen über alles ziehen), dann mit LMB an die gewünschte Position schieben! Aufpassen, daß du keinen unteren Punkt von den Oberflächenzeichen anklickst, sonst verschiebst du nur das eine Zeichen! Gruß
------------------
Mike Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
gismo
Mitglied
SWX Support
Beiträge: 1020
Registriert: 05.03.2001 Dell M6300;
Quadro FX1600m;
Vista x64;
SWX2008Premium;
SWX2009 Premium;
Mehr läuft nicht auf Vista64
|
erstellt am: 14. Okt. 2002 10:43 Unities abgeben:
Moin,
@ Hony
Die Position kannst Du auch im Makro festlegen:
Code:
Part.InsertSurfaceFinishSymbol2 1, 0, EinfuegCS(0) + 0.037, EinfuegCS(1), 0, 0, 1, "", "", "", rh2, "", "", ""
in diesem Fall werden die Variablen EinfuegCS(0) und (1) vorher anhand des Blattformates festgelegt. Die Zahl, die addiert wird ist nur ein Korrekturwert.
So kann ich die Symbole je nach Blattgröße immer an dei gleiche Stelle Positionieren.
Ich hoffe, das Hilft Dir ein wenig  ------------------
Viele Grüße aus dem Schwarzwald
gismo  Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Hony
Mitglied
Konstrukteur
Beiträge: 26
Registriert: 16.09.2002
|
erstellt am: 14. Okt. 2002 11:21 Unities abgeben:
Hallo Mike Hallo Gismo,Vielen dank euch Beiden.
Werde erst das verschieben verwenden. An Gismo, ist das erste Makro was ich geöffnet habe, werde deshalb die Beabeitung in eine "Streß Freie Zeit" verlegen.
Vorab:
Wenn ich dich richtig verstanden habe muß der Code für jede Nr geändert werden? Danke
Hony
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
gismo
Mitglied
SWX Support
Beiträge: 1020
Registriert: 05.03.2001 Dell M6300;
Quadro FX1600m;
Vista x64;
SWX2008Premium;
SWX2009 Premium;
Mehr läuft nicht auf Vista64
|
erstellt am: 14. Okt. 2002 11:37 Unities abgeben:
Zitat:
Original erstellt von Hony:
Wenn ich dich richtig verstanden habe muß der Code für jede Nr geändert werden?
Hi Hony,
Wenn ich Dich richtig verstanden habe, meinst Du mit "jede Nr" jedes Bearbeitungszeichen!?! Ja. Die Variablen sind für jedes Zeichen gleich, nur der Korrekturwert bestimmt mir die Verschiebung jedes Zeichens in 'X' Richtung. (sonst sitzen die Dinger aufeinander)
Nachtrag: Wenn Dir Die Werte etwas niedrig vorkommen: Maße werden in SWX Macros immer in Meter angegeben!!!
Ist vielleicht etwas umständlich, aber ich erhebe auch nicht den Anspruch ein "Superprogrammierer" zu sein.
Aber es macht viel Spass (wie Du evtl. auch noch merken wirst )
------------------
Viele Grüße aus dem Schwarzwald
gismo
[Diese Nachricht wurde von gismo am 14. Oktober 2002 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
SRegele
Mitglied
Dipl.-Ing.
Beiträge: 17
Registriert: 13.08.2002
|
erstellt am: 16. Okt. 2002 09:29 Unities abgeben:
Hallo Manuel,
klasse gemacht, sehr nützlich, benutze das Makro regelmäßig, danke!!Hallo Gismo,
ich habe vergeblich einen Befehl gesucht, mit dem man per Mausklick diese Zeichen an einen beliebigen Ort auf der Zeichnung setzen kann. Hast Du Gismo eine Idee, wie dieser heisst? Saludo
Stephan Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
gismo
Mitglied
SWX Support
Beiträge: 1020
Registriert: 05.03.2001 Dell M6300;
Quadro FX1600m;
Vista x64;
SWX2008Premium;
SWX2009 Premium;
Mehr läuft nicht auf Vista64
|
erstellt am: 16. Okt. 2002 09:52 Unities abgeben:
Hallo Stephan,
Ich bin mir nicht sicher, was Du meinst. Willst Du auf einen Punkt in der Zeichnung klicken und dann die Zeichen an dieser Stelle einfügen?
Ich habs selbst noch nicht probiert, aber evtl. kann man den vorher angeklickten Punkt im Makro auslesen und dann die Zeichen an diese Koordinaten setzen??
Wenn ich Zeit habe, teste ich das mal!------------------
Viele Grüße aus dem Schwarzwald
gismo Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
SRegele
Mitglied
Dipl.-Ing.
Beiträge: 17
Registriert: 13.08.2002
|
erstellt am: 16. Okt. 2002 10:04 Unities abgeben:
Hallo Gismo,es ist kein bestimmter Punkt z.B. auf einem Körper oder einer Linie. Bevor die Zeichen gesetzt werden, möchte ich mit der Maus den Ort auf der Zeichnung bestimmen, wohin die Zeichen geschrieben werden sollen.
Leider komme ich mit der VB- und API-Hilfe nicht zum Ziel, aber ich gebe noch nicht auf...! Gruß und danke für die schnelle Antwort
Stephan Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Manuel M
Mitglied
Beiträge: 83
Registriert: 04.02.2002 Win XP-Pro SP2
2,66 GHz, 2GB RAM
nVidia Quadro FX1500
OSD 2006 - 14.01
|
erstellt am: 16. Okt. 2002 14:35 Unities abgeben:
Hallo Stephan,das du vorher bestimmen möchtest wo die Zeichen hingesetzt werden sollen, ist schon zu machen.
Es müssen halt nur die abstände der Blöcke hinzugerechnet werden.
Den "Mauspunkt" in eine Variable packen und Abstände hinzuaddieren und durch die gesetzten werte ersetzen. Bin zur Zeit ziemlich beschäftigt, hätte das programm sonst umgeschrieben,aber... Dennoch viel Spass Ciao
Manuel 
------------------
ciao
Manuel Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
SRegele
Mitglied
Dipl.-Ing.
Beiträge: 17
Registriert: 13.08.2002
|
erstellt am: 16. Okt. 2002 14:39 Unities abgeben:
Lieber Manuel,wenn Du mir sagst, wie der Befehl heißt, mit dem man die Koordinaten des Mouseklickes auslesen kann, dann versuche ich mich mit dem Umschreiben des Programmes! Grüße
Stephan
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
StefanBerlitz
Guter-Geist-Moderator
IT Admin (CAx)
( Bin dabei: 2.-5.12 )
Beiträge: 5611
Registriert: 02.03.2000 I have not failed.
I've just found
10,000 ways
that won't work.
--Thomas Edison
|
erstellt am: 16. Okt. 2002 15:22 Unities abgeben:
Hallo zusammen,gute Idee, vielleicht kann ich schon mal mit den Befehlen auf die Sprünge helfen: ...
Dim vSelPt As Variant Set SelectionMgr = DrawingDoc.SelectionManager
vSelPt = SelectionMgr.GetSelectionPoint(1) dann stehen die Koordinaten über vSelPt(0), vSelPt(1), vSelPt(2) zur Verfügung. Etwas mehr Erklärungen dazu siehe auch http://solidworks.cad.de/mm_11.htm Ciao,
Stefan ------------------
Inoffizielle deutsche SolidWorks Hilfeseite
http://solidworks.cad.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
BxBender
Mitglied
techn. Zeichner
Beiträge: 45
Registriert: 28.04.2004 Intel E6700; PNY Quadro FX1500; 2GB Ram
|
erstellt am: 28. Apr. 2004 13:55 Unities abgeben:
Hallo.Das Makro ist schon ganz gut gelungen.
Doch kann man das Ganze nicht so hinbekommen, dass man auch RZ-Werte eingeben kann? "Poliert" und "geschliffen" wäre auch ganz nett.
Dann wäre ich schon fast zufrieden. ;-) Gruß Alex Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Teddibaer
Ehrenmitglied V.I.P. h.c.
Entwicklungsingenieur/ Projektleiter
Beiträge: 2090
Registriert: 09.02.2004 **CSWP 06/2004**
--
geschäftlich:
SWX 2004 SP4.2/
SWX 2006 SP5.1/
SWX 2009 SP4.0
Pro.File V8
XP PRO, Core 2 Duo 6600
4GB RAM, Quadro4 FX3500,
DirextX9, Nvidia 84.26
--
privat:
MacBook Pro 2,66GHz 15"
|
erstellt am: 28. Apr. 2004 14:58 Unities abgeben:
Die Funtkion der Bearbeitungszeichen finde ich schon recht komfortabel. A bissele muss ich ja auch so noch schreiben.Reicht die Dir nicht aus? Was für Vorteile hätte das Makro dann noch grossartig? Mach mich bitte schlau ;-) ------------------
Gruß, der Teddibaer ---------
Es gibt Tage an denen verliert man, und es gibt Tage, an denen kann man nicht gewinnen ... Das Leben ist eben kein Schlotzer. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
McT
Mitglied
Beiträge: 68
Registriert: 02.09.2003
|
erstellt am: 28. Apr. 2004 15:43 Unities abgeben:
@Alex: Probiers mal mit Makro Nr. 10 der Makromania-Tauschböre auf Stefans solidworks.cad.de !Gruß,
Uwe Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
--ToTo--1
Mitglied
Träumer
Beiträge: 33
Registriert: 01.12.2006 SW 2008 / DELL Precision 490
|
erstellt am: 22. Jan. 2007 10:48 Unities abgeben:
Hallo,habe das Makro runtergeladen auf unsere bedürnisse angepasst aber leider funkt es nicht mit den Klammerzeichen habe nun auch schon mal das ganze als orginal ausprobiert und immer wieder das selbe, es werden einfach keine klammersymbole eingefügt!! Jemand ne idee? Gruß Torsten Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
konst06
Mitglied
Dipl.-Ing.
Beiträge: 40
Registriert: 22.07.2005 WinXP Prof. SP2
SWX 2008 SP4.0
MaxxDB Version 2.88 SP1.0
NVIDIA QUADRO FX 3700
HP xw4600 Workstation
Intel(R) Core(TM)2 Extreme
CPU X9650 @3.00GHz
1.98 GHz, 3,48 GB RAM
|
erstellt am: 01. Aug. 2007 12:33 Unities abgeben:
Hallo!
Seit wir auf SWX2007 upgedated haben sind die Klammern auch nicht mehr da.Funktioniert das Makro bei jemandem in SWX2007 bzw. weiss jemand an was es liegen könnte? Grüßle
Daniel Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
|  |
Christian_W
Mitglied
Konstrukteur (Dipl-Ing)
Beiträge: 463
Registriert: 04.04.2001 solidworks 2008sp5.0
(solidEdge19sp4 academic)
squid 2.5 gebremst .... :(
|
erstellt am: 27. Feb. 2008 18:12 Unities abgeben:
Zitat:
Original erstellt von StefanBerlitz:
Set SelectionMgr = DrawingDoc.SelectionManager
Hallokannst du mir kurz auf die Sprünge helfen?
Gibt es einen Unterschied zwischen DrawingDoc.SelectionManager und ModelDoc.SelectionManager? (wenn ja, welchen?) ich hab mit ModeDoc... herumprobiert und dann selected object auf typ 19 (swsheet) überprüft. da funktioniert das mit den Punktkoordinaten.
wenn ich etwas anderes selektiere, tauchen Fehler auf und der Block bekommt eine Bezugslinie spendiert ....
Ansonsten geht es mit der Vorauswahl der Position. (mit SWX 2006 - ist da bei den neueren was anders? ) Gruß, Christian Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
UBBFriend: Senden Sie diese Seite per eMail an einen Freund!
