// Delete selected blocks
private void Btn_DeleteSelection_Click(object sender, EventArgs e)
{
// Determine if are any blocks checked
if (blocksCheckList.CheckedItems.Count != 0)
{
statusBox.AppendText(blocksCheckList.CheckedItems.Count + " blocks have been selected for deletion");
statusBox.AppendText(Environment.NewLine);
foreach (var device in MyProject.Devices)
{
statusBox.AppendText("Deleting blocks from " + device.Name);
statusBox.AppendText(Environment.NewLine);
// get plc software
// device represents the rack
// first element of DeviceItems (modules in the rack) is the plc
PlcSoftware software = BlockManagement.GetSoftwareFrom(device.DeviceItems[1]);
if (software != null)
{
// now remove selected blocks
foreach (string blockName in blocksCheckList.CheckedItems)
{
// clean blockName string
string name = blockName.Substring(0, blockName.IndexOf('-') - 1);
statusBox.AppendText("Searching for " + name);
statusBox.AppendText(Environment.NewLine);
// first on root folder
foreach (var block in software.BlockGroup.Blocks)
{
if (name.Equals(block.Name))
{
statusBox.AppendText("Block " + name + " to be deleted found in root folder");
statusBox.AppendText(Environment.NewLine);
block.Delete();
}
}
// check also subfolders
foreach (var group in software.BlockGroup.Groups)
{
BlockManagement.DeleteBlock(name, group, statusBox);
}
}
}
else
{
statusBox.AppendText("No software found for " + device.Name);
statusBox.AppendText(Environment.NewLine);
}
}
}
else
{
statusBox.AppendText("No blocks have been selected for deletion");
statusBox.AppendText(Environment.NewLine);
}
}
// EVENTS
// open project button
private void Btn_OpenProject_Click(object sender, EventArgs e)
{
OpenFileDialog fileSearch = new OpenFileDialog
{
Filter = "*.ap15|*.ap15",
RestoreDirectory = true
};
fileSearch.ShowDialog();
string ProjectPath = fileSearch.FileName.ToString();
MyTiaPortal = BlockManagement.StartTIA(sender, e);
if (string.IsNullOrEmpty(ProjectPath) == false)
{
MyProject = BlockManagement.OpenProject(ProjectPath, MyTiaPortal, statusBox);
}
}
// Compile plc programs
private void BtnCompile_Click(object sender, EventArgs e)
{
// Determine if there are any devices checked.
if (devicesCheckList.CheckedItems.Count != 0)
{
statusBox.AppendText("Systems selected: " + devicesCheckList.CheckedItems.Count);
statusBox.AppendText(Environment.NewLine);
// If so loop through all devices checking if they have been selected
foreach (var device in MyProject.Devices)
{
if (devicesCheckList.CheckedItems.Contains(device.Name))
{
statusBox.AppendText("Compiling system " + device.Name);
statusBox.AppendText(Environment.NewLine);
foreach (var deviceItem in device.DeviceItems)
{
PlcSoftware software = BlockManagement.GetSoftwareFrom(deviceItem);
if (software != null)
{
ICompilable compileService = software.GetService <ICompilable>();
CompilerResult result = compileService.Compile();
statusBox.AppendText(
result.State + ": Compiling finished for system " +
device.Name + ", " +
result.WarningCount + " warnings and " +
result.ErrorCount + " errors"
);
statusBox.AppendText(Environment.NewLine);
}
}
}
}
}
}
// Copy selected blocks from project library
private void Btn_CopySelection_Click(object sender, EventArgs e)
{
// Determine if there are any devices checked.
if (devicesCheckList.CheckedItems.Count != 0)
{
statusBox.AppendText("Systems selected: " + devicesCheckList.CheckedItems.Count);
statusBox.AppendText(Environment.NewLine);
// If so loop through all devices checking if they have been selected
foreach (var device in MyProject.Devices)
{
if (devicesCheckList.CheckedItems.Contains(device.Name))
{
statusBox.AppendText("Applying changes to system " + device.Name);
statusBox.AppendText(Environment.NewLine);
foreach (var deviceItem in device.DeviceItems)
{
PlcSoftware software = BlockManagement.GetSoftwareFrom(deviceItem);
if (software != null)
{
MasterCopyFolder masterFolder = MyProject.ProjectLibrary.MasterCopyFolder;
// get blocks to be copied info
foreach (string item in projectLibraryCheckList.CheckedItems)
{
string destFolder = item.Substring(0, item.IndexOf("/"));
string blockToCopy = item.Substring(item.IndexOf("/") + 1);
statusBox.AppendText("Copying " + blockToCopy + " to " + destFolder);
statusBox.AppendText(Environment.NewLine);
// check if it's a tag table or software block
if (destFolder.Equals("PLC tags"))
{
BlockManagement.CopyTagTableToFolder(blockToCopy, masterFolder, software.TagTableGroup, destFolder, statusBox);
}
else
{
// TO DO - Overload method to take as argument BlockGroup and BlockUserGroup
// Type of BlockGroup is PlcBlockSystemGroup is not compatible with type of
// Group that is PlcBlockUserGroup so the same functions can't be applied
// in both cases, that's the reason for the exception when copying to the root folder
if (destFolder.Equals("PLC"))
{
// delete block if already exists
foreach (var block in software.BlockGroup.Blocks)
{
if (blockToCopy.Equals(block.Name))
{
block.Delete();
}
}
// now copy block
software.BlockGroup.Blocks.CreateFrom(BlockManagement.GetMasterCopy(masterFolder, blockToCopy, statusBox));
}
else
{
foreach (var group in software.BlockGroup.Groups)
{
// Before copying delete block if already exists
BlockManagement.DeleteBlock(blockToCopy, group, statusBox);
// now copy block
BlockManagement.CopyBlockToFolder(blockToCopy, masterFolder, group, destFolder, statusBox);
}
}
}
}
}
}
}
}
}
else
{
statusBox.AppendText("No systems have been selected");
statusBox.AppendText(Environment.NewLine);
}
}
// connect to existing project
// and read project library and devices
private void Btn_ConnectProject_Click(object sender, EventArgs e)
{
// Project connection
IList <TiaPortalProcess> processes = TiaPortal.GetProcesses();
statusBox.AppendText("Attempting to connect..." + processes.Count + " processes found");
statusBox.AppendText(Environment.NewLine);
switch (processes.Count)
{
case 1:
_tiaProcess = processes[0];
MyTiaPortal = _tiaProcess.Attach();
if (MyTiaPortal.Projects.Count <= 0)
{
statusBox.AppendText("No TIA Portal Project was found!");
statusBox.AppendText(Environment.NewLine);
return;
}
statusBox.AppendText("Connected to running instance of TIA Portal");
statusBox.AppendText(Environment.NewLine);
MyProject = MyTiaPortal.Projects[0];
break;
case 0:
statusBox.AppendText("No running instance of TIA Portal was found!");
statusBox.AppendText(Environment.NewLine);
return;
default:
statusBox.AppendText("More than one running instance of TIA Portal was found!");
statusBox.AppendText(Environment.NewLine);
return;
}
// Disable list boxes updating before adding new elements
projectLibraryCheckList.BeginUpdate();
devicesCheckList.BeginUpdate();
blocksCheckList.BeginUpdate();
// Read project Devices and add them to check list
foreach (var device in MyProject.Devices)
{
if (device.TypeIdentifier != "System:Device.PC")
{
devicesCheckList.Items.Add(device.Name);
}
}
// Read project library master copies names and add them to check list
List <String> libMasterCopies = BlockManagement.ReadProjectLibrary(MyProject.ProjectLibrary.MasterCopyFolder, "");
foreach (string entry in libMasterCopies)
{
projectLibraryCheckList.Items.Add(entry);
}
// Read plc blocks and add them to check list
// TO DO - Move this code into a function
// device represents the rack
// first element of DeviceItems (modules in the rack) is the plc
PlcSoftware firstPlcSoftware = BlockManagement.GetSoftwareFrom(MyProject.Devices[0].DeviceItems[1]);
List <String> blocks = new List <string>();
if (firstPlcSoftware != null)
{
// Type of BlockGroup is PlcBlockSystemGroup is not compatible with type of
// Group that is PlcBlockUserGroup so the same functions can't be applied in both cases
// that's the reason for the exception when reading the blocks in root folder
foreach (var block in firstPlcSoftware.BlockGroup.Blocks)
{
string blockType = block.GetType().ToString();
blockType = blockType.Substring(blockType.LastIndexOf('.') + 1);
blocks.Add(block.Name + " - " + blockType + " - " + block.Number);
}
foreach (var group in firstPlcSoftware.BlockGroup.Groups)
{
blocks.AddRange(BlockManagement.ReadBlocks(group));
}
blocksCheckList.Items.AddRange(blocks.ToArray());
}
// Enable list boxex updating after elements added
projectLibraryCheckList.EndUpdate();
devicesCheckList.EndUpdate();
blocksCheckList.EndUpdate();
}