---

Hallo User,

Kann mir jemand helfen??

Ich suche die Mbe-Basic Befehle oder eine Funktion, die die im gleichen Macro erzeugten Elemente zu einer Gruppe zusammenfügt. Es soll die gleiche Gruppenart sein, die erzeugt wird, wenn ich nach Elementselection die Tasten Strg+G drücke.
Hat das schon mal jemand programmiert und ist bereit mir weiterzuhelfen?

Danke

------------------
Reinhard

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Vorschlag:

Erstelle die Elemente auf einer Ebene, die Du sonst nicht brauchst (z.B. hier 60).

Dann folgende Syntax:

mbesendcommand "MDL LOAD SELECTBY DIALOG"
mbesendkeyin "SELECTBY LEVEL NONE" 
mbesendkeyin "SELECTBY LEVEL 60" 
mbesendkeyin "SELECTBY EXECUTE" 
mbesendcommand "GROUP SELECTION "
mbesendcommand "MBE1 CLOSEMODAL OK"
mbesendcommand "MDL UNLOAD SELECTBY"

Ist jetzt ein bischen aus dem Bauch heraus, kann also sein, daß Du da noch dran feilen mußt, z.B. über "SELECTBY TYPE...". Am besten mal in der Hilfe zu SELECTBY ein wenig nachschlagen, schließlich hast Du diesen Befehl ja selbst schon angepriesen, wenn ich nicht irre...

Gruß, Torsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Torsten,

danke für den Tipp, ich werds mal ausprobieren.

------------------
Reinhard

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Mhm, Torsten habe gerade Deine Visitenkarte gelesen. Ist Deine Software noch mit Klebestreifen oder schon mit Magneten ausgerüstet?

------------------
Tschüss

Reinhard

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,

als ich sie gekauft habe, hatte ich sogar noch Heftzwecken. Aber ich bin jetzt auf eine beschichtete Platte und tesa-film-kompatible Ausrüstung umgestiegen.

Gruß, Torsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Den Befehl für die Taste Strg.+G habe ich durch meine unermüdliche Suche schon gefunden. Es ist
MbeSendCommand "GROUP SELECTION "
habe sofort eine Befehlskette gebastelt

'---------------------------------------------------------------
Dim filepos as long
Dim elem as New MbeElement
filepos = MbeDgnInfo.endOfFile

'---------------------------------------------------------------

hier folgen jetzt die einzelnen Schritte um diverse Elemente makromäßig zu zeichnen
und dann das zusammenfügen zu einer Gruppe
'---------------------------------------------------------------
MbeSendCommand "POWERSELECTOR "
MbeSendCommand "POWERSELECTOR SINGLE "
MbeSendCommand "POWERSELECTOR MODE ADD "

filePos = elem.fromFile(filePos)

If(filePos <> -1 And elem.isGraphics <> 0) then
MbeLocateElement filePos
End If
Do While filePos <> -1
filePos = elem.fromFile(filePos+elem.fileSize)
if(filePos <> -1) then
if(elem.isGraphics <> 0) then
MbeLocateElement filePos
End if
Else
Exit Do
End If
Loop
MbeSendCommand "GROUP SELECTION "

MbeSendReset
filepos = MbeDgnInfo.endOfFile

MbeSendCommand "CHOOSE ELEMENT "

' ------------------------------------------------------------------

Es funktioniert zu 80%, immerhin etwas, aber in einigen Makros wird das erzeugte Element unsichtbar. Also muß ich wieder mal davon ausgehen, das da irgendein Verarbeitungsbefehl fehlt!

Hat jemand einen Tip????? Vielleicht der Moderator Michael??

in freudiger Erwartung 
------------------
Tschüss

Reinhard

[Diese Nachricht wurde von rwcaddy am 18. Oktober 2002 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP