|
CoCreate Programmierung : [ME10] Macro
barbarossa am 14.08.2009 um 13:54 Uhr (0)
Hallo Wolfgang,die Frage, das Problem und der Lösungsansatz stammen offensichtlichvon einem noch unerfahrenen Anfänger in der Macro-Programmierung. Um ihn nicht gänzlich in seinen Lernschritten abzuhängen, habe ichseinen Entwurf nur "fehlerbereinigt". Deine Anregungen sind prinzipiell korrekt, sinnvoll und gut. Mal sehen, wie Rob Deine Ideen aufnimmt. Codierte GrüßeBarbarossa-----------------------------------------------------------------Eventuelle Doppelbuchstaben, welche einen Recht-schreibfehler da ...
| | In das Form CoCreate Programmierung wechseln |
|
CoCreate Programmierung : [ME10] Macro
barbarossa am 20.08.2009 um 14:46 Uhr (0)
Hallo Rob,hier ist mein "Verbesserungsvorschlag" zu Deinem Pfeile-Macro. Du kannst es - zur Analyse - zur Weiterentwicklung und zum Funktionsausbau benutzen, z.B. - beliebige Pfeillänge- beliebiger Pfeilrichtungswinkel Viel Spass damitDEFINE Linie_neu LOCAL P1 LOCAL P2 LOCAL meine_linien_farbe LOCAL mein_linien_typ INQ_ENV 3 let meine_linien_farbe (INQ 201) { speichert aktuelle Geometriefarbe} let mein_linien_typ (INQ 301) { speichert aktuellen Linientyp} COLOR YELLOW LINETYPE SOLID END READ PNT Ei ...
| | In das Form CoCreate Programmierung wechseln |
|
CoCreate Programmierung : [ME10] Macro
barbarossa am 13.08.2009 um 14:20 Uhr (0)
Hallo Matthias -----------------------------------------------------------------Eventuelle Doppelbuchstaben, welche einen Recht-schreibfehler darstellen, sind unbeabsichtigteTastaturpreller.
| | In das Form CoCreate Programmierung wechseln |
|
CoCreate Programmierung : [ME10] Macro
barbarossa am 13.08.2009 um 11:51 Uhr (0)
Hallo RobRaven,hier ist meine Version (läuft unter 7.0 )DEFINE M 0END_DEFINEDEFINE EINST_03_201 0END_DEFINEDEFINE Einst_laden { setzt Einstellungen } IF (M=1) COLOR EINST_03_201 { setze aktuelle Geometriefarbe } END_IFEND_DEFINEDEFINE Einst_speichern { speichert Einstellungen } INQ_ENV 3 LET EINST_03_201 (INQ 201) { aktuelle Geometriefarbe }END_DEFINEDEFINE Linie LOCAL P1 LOCAL P2 Einst_speichern READ PNT EinfÏgepunkt anklicken P1 CS_REF_PT RELATIVE P ...
| | In das Form CoCreate Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
