EPLAN

SwapMacroFromMacroBox

Mit diesem Script könnt ihr Makros direkt tauschen. Voraussetzung ist dass der Makrokasten im Projekt platziert ist.

Vielen Dank an grc1cr für die Umsetzung!

SwapMacroFromMacroBox (2364 Downloads )

 

using Eplan.EplApi.Gui;
using Eplan.EplApi.Scripting;

public class EnableMacroChange
{
    [DeclareMenu]
    public void CreateMenu()
    {
        ContextMenuLocation oCtxLoc = new ContextMenuLocation();
        oCtxLoc.DialogName = "Editor";
        oCtxLoc.ContextMenuName = "Ged";
        Eplan.EplApi.Gui.ContextMenu oCTXMnu = new Eplan.EplApi.Gui.ContextMenu();
        oCTXMnu.AddMenuItem(oCtxLoc, "Makro tauschen...", "XMSwapMacroFromMacroBoxAction", true, false);
    }
}
Von |2017-11-09T12:23:46+01:002012-10-15|EPLAN, EPLAN-Scripts|

UpdateQueryTable Multiuserconflict

Es gibt einen Bug in EPLAN der das aktualiseren des Suchindexes verhindert.

EPLAN zeigt diese Fehlermeldung an, obwohl sonst keine Person an der Datenbank arbeitet:

 

Es gibt eine nicht dokumentierte Action in EPLAN um diese Meldung bzw. den Status zurückzusetzen:

XPameUpdateQueryTable /ClearMultiUserLock:1

 

Ich habe eine Toolbar mit genau einem Button erstellt:

UpdateQueryTable Toolbar (2296 Downloads )

 

Vielen Dank an hual aus dem CAD.de-Forum für die Bereitstellung der Lösung.

Von |2017-11-09T12:23:46+01:002012-10-09|EPLAN, EPLAN-Scripts|

RemoveSelection

Mit dieser versteckten Action kann das Verhalten des Markierens im grafischen Editor geändert werden.

Das Script ausführen, das Verhalten wird geändert. Wollt ihr wieder das alte Verhalten, müsst Ihr das Script erneut ausführen.

Vielen Dank an FrankS für die Umsetzung.

  RemoveSelection (2251 Downloads )

' RemoveSelection, Version 1.0.0, vom 29.02.2012
'
' Steuert, ob Objekte nach einer Interaktion deselektiert werden sollen.
' Default = 1
'
' Copyright by Frank Schöneck, 2012
'
' für Eplan Electric P8, ab V2.1.6
'
'
Public Class WriteSettings
     _
    Public Sub MyFunction()

        Dim bolSetting As Boolean
        Dim oSettings As New Eplan.EplApi.Base.Settings()

        'Einstellung auslesen
		bolSetting = oSettings.getBoolSetting("USER.GedViewer.RemoveSelection", 0)

        'wenn nicht gesetzt, setzen
        If bolSetting = False Then
			oSettings.setBoolSetting("USER.GedViewer.RemoveSelection", True, 0)
			MessageBox.Show("Die Einstellung wurde 'aktiviert'.", "RemoveSelection", MessageBoxButtons.OK, MessageBoxIcon.Information)
            'wenn gesetzt, zurücksetzen
        ElseIf bolSetting = True Then
			oSettings.setBoolSetting("USER.GedViewer.RemoveSelection", False, 0)
			MessageBox.Show("Die Einstellung wurde 'deaktiviert'.", "RemoveSelection", MessageBoxButtons.OK, MessageBoxIcon.Information)
        End If

    End Sub 'MyFunction

End Class
Von |2017-11-09T12:23:46+01:002012-09-25|EPLAN, EPLAN-Scripts|
Nach oben