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;
}
}
Przykład: 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ż