Istnieje również możliwość zawarcia akcji automatycznych w prostym skrypcie. Za pomocą tych akcji EPLAN można wykonać różne funkcje programu (np. zabezpieczanie danych, drukowanie itp.) w sposób automatyczny.
Po zdefiniowaniu klasy, atrybutu [Start] oraz funkcji należy najpierw zdefiniować zestaw parametrów akcji, poczym wykonać akcję poleceniem CommandLineInterpreter().Execute().
Zatem ogólny schemat struktury odpowiedniego skryptu w C# wygląda następująco:
public class <ScriptName> { [Start] public void <FunctionName> { ActionCallingContext <ActionName>Context = new ActionCallingContext (); <ActionName>Context .AddParameter("<ActionParameter1>","<Value>"); <ActionName>Context .AddParameter("<ActionParameter2>","<Value>"); ... new CommandLineInterpreter().Execute("<ActionName>",<ActionName>Context); return; } }
Poniższy przykład prezentuje skrypt w języku C# wykonujący akcję EPLAN print:
public class PrintScript { [Start] public void PrintFunction() { ActionCallingContext printContext = new ActionCallingContext (); printContext .AddParameter("NUMBER","1"); printContext .AddParameter("PRINTCHANGEDPAGES","0"); printContext .AddParameter("PRINTREVERSE","0"); printContext .AddParameter("PRINTCOLLATE","0"); printContext .AddParameter("PRINTERNAME",@"\\FUEMON\Kyocera FS-1700+ TechDok KX"); printContext .AddParameter("PROJECTNAME",@"C:\Program Files\EPLAN\Electric P8\Projects\EPLAN\ESS_Sample_Project.elk); printContext .AddParameter("TYPE","PAGES"); printContext .AddParameter("PAGENAME","=GB1+A1&EFS1/1"); new CommandLineInterpreter().Execute("print",printContext); return; } }
Poleceniem ActionCallingContext ustalany jest zestaw parametrów dla przykładowej funkcjiPrintFunction. Poczym następuje zestawienie parametrów i odpowiadających im wartości dla akcji print. W ten sposób ustala się np. liczbę wydruków za pomocą parametru NUMBER. W przykładzie podano w tym miejscu wartość "1". Polecenie Execute wykonuje w końcu akcję print.
Ten sam przykład w języku Visual Basic.Net wygląda następująco:
Public Class PrintScript { <Start> _ Public Sub PrintFunction() Dim printContext As New ActionCallingContext () printContext .AddParameter("NUMBER","1") printContext .AddParameter("PRINTCHANGEDPAGES","0") printContext .AddParameter("PRINTREVERSE","0") printContext .AddParameter("PRINTCOLLATE","0") printContext .AddParameter("PRINTERNAME", "\\FUEMON\Kyocera FS-1700+ TechDok KX") printContext .AddParameter("PROJECTNAME", "C:\Program Files\EPLAN\Electric P8\Projects\EPLAN\ESS_Sample_Project.elk) printContext .AddParameter("TYPE","PAGES") printContext .AddParameter("PAGENAME",""=GB1+A1&EFS1/1") Dim commandLineInterpreter As New CommandLineInterpreter() CommandLineInterpreter.Execute("print",printContext) Return End Sub 'PrintFunction End Class 'PrintScript
Porada:
W funkcji Edytuj automatycznie (w menu Programy narzędziowe) w celu automatycznego wykonywania akcji są wykorzystywane skrypty. Możesz tych skryptów użyć do tworzenia własnych skryptów. Aby móc wykonać te skrypty za pomocą punktów menu Programy narzędziowe > Skrypty > Wykonaj , należy w funkcji AutoTreat usunąć parametr String ProjectName oraz wiersz, w którym parametr ten jest używany.
Zobacz również