author | Andrey Skvortsov <andrej.skvortzov@gmail.com> |
Mon, 14 Aug 2017 21:20:32 +0300 | |
changeset 1732 | 94ffe74e6895 |
parent 1730 | 64d8f52bc8c8 |
child 1736 | 7e61baa047f0 |
permissions | -rw-r--r-- |
814 | 1 |
#!/usr/bin/env python |
2 |
# -*- coding: utf-8 -*- |
|
3 |
||
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
4 |
# This file is part of Beremiz, a Integrated Development Environment for |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
5 |
# programming IEC 61131-3 automates supporting plcopen standard and CanFestival. |
814 | 6 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
7 |
# Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD |
1696
8043f32de7b8
make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
8 |
# Copyright (C) 2017: Andrey Skvortsov <andrej.skvortzov@gmail.com> |
814 | 9 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
10 |
# See COPYING file for copyrights details. |
814 | 11 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
12 |
# This program is free software; you can redistribute it and/or |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
13 |
# modify it under the terms of the GNU General Public License |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
14 |
# as published by the Free Software Foundation; either version 2 |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
15 |
# of the License, or (at your option) any later version. |
814 | 16 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
17 |
# This program is distributed in the hope that it will be useful, |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
18 |
# but WITHOUT ANY WARRANTY; without even the implied warranty of |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
19 |
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
20 |
# GNU General Public License for more details. |
814 | 21 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
22 |
# You should have received a copy of the GNU General Public License |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
23 |
# along with this program; if not, write to the Free Software |
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1493
diff
changeset
|
24 |
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. |
814 | 25 |
|
26 |
import wx |
|
27 |
||
1246 | 28 |
from graphics.GraphicCommons import CONTACT_NORMAL, CONTACT_REVERSE, \ |
29 |
CONTACT_RISING, CONTACT_FALLING, COIL_NORMAL, COIL_REVERSE, COIL_SET, \ |
|
30 |
COIL_RESET, COIL_RISING, COIL_FALLING |
|
31 |
from graphics.LD_Objects import LD_Contact, LD_Coil |
|
32 |
from BlockPreviewDialog import BlockPreviewDialog |
|
814 | 33 |
|
34 |
#------------------------------------------------------------------------------- |
|
1246 | 35 |
# Set Ladder Element Parmeters Dialog |
814 | 36 |
#------------------------------------------------------------------------------- |
37 |
||
1246 | 38 |
""" |
39 |
Class that implements a dialog for defining parameters of a LD contact or coil |
|
40 |
graphic element |
|
41 |
""" |
|
42 |
||
43 |
class LDElementDialog(BlockPreviewDialog): |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
44 |
|
1246 | 45 |
def __init__(self, parent, controller, tagname, type): |
46 |
""" |
|
47 |
Constructor |
|
48 |
@param parent: Parent wx.Window of dialog for modal |
|
49 |
@param controller: Reference to project controller |
|
50 |
@param tagname: Tagname of project POU edited |
|
51 |
@param type: Type of LD element ('contact or 'coil') |
|
52 |
""" |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
53 |
BlockPreviewDialog.__init__(self, parent, controller, tagname, |
1246 | 54 |
title=(_("Edit Contact Values") |
55 |
if type == "contact" |
|
56 |
else _("Edit Coil Values"))) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
57 |
|
1250
7e6de17c687a
Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents:
1247
diff
changeset
|
58 |
# Init common sizers |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
59 |
self._init_sizers(2, 0, |
1250
7e6de17c687a
Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents:
1247
diff
changeset
|
60 |
(7 if type == "contact" else 9), None, 2, 1) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
61 |
|
1246 | 62 |
# Create label for LD element modifier |
814 | 63 |
modifier_label = wx.StaticText(self, label=_('Modifier:')) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
64 |
self.LeftGridSizer.AddWindow(modifier_label, border=5, |
1246 | 65 |
flag=wx.GROW|wx.BOTTOM) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
66 |
|
1246 | 67 |
# Create radio buttons for selecting LD element modifier |
68 |
self.ModifierRadioButtons = {} |
|
69 |
first = True |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
70 |
element_modifiers = ([CONTACT_NORMAL, CONTACT_REVERSE, |
1246 | 71 |
CONTACT_RISING, CONTACT_FALLING] |
72 |
if type == "contact" |
|
73 |
else [COIL_NORMAL, COIL_REVERSE, COIL_SET, |
|
74 |
COIL_RESET, COIL_RISING, COIL_FALLING]) |
|
75 |
modifiers_label = [_("Normal"), _("Negated")] + \ |
|
76 |
([_("Set"), _("Reset")] if type == "coil" else []) + \ |
|
77 |
[_("Rising Edge"), _("Falling Edge")] |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
78 |
|
1246 | 79 |
for modifier, label in zip(element_modifiers, modifiers_label): |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
80 |
radio_button = wx.RadioButton(self, label=label, |
1247 | 81 |
style=(wx.RB_GROUP if first else 0)) |
1246 | 82 |
radio_button.SetValue(first) |
83 |
self.Bind(wx.EVT_RADIOBUTTON, self.OnModifierChanged, radio_button) |
|
1250
7e6de17c687a
Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents:
1247
diff
changeset
|
84 |
self.LeftGridSizer.AddWindow(radio_button, flag=wx.GROW) |
1246 | 85 |
self.ModifierRadioButtons[modifier] = radio_button |
86 |
first = False |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
87 |
|
1246 | 88 |
# Create label for LD element variable |
89 |
element_variable_label = wx.StaticText(self, label=_('Variable:')) |
|
1250
7e6de17c687a
Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents:
1247
diff
changeset
|
90 |
self.LeftGridSizer.AddWindow(element_variable_label, border=5, |
1246 | 91 |
flag=wx.GROW|wx.TOP) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
92 |
|
1246 | 93 |
# Create a combo box for defining LD element variable |
1370
ee795a8d4404
Fixed coil and contact dialog to let user select a complex type variable for contact and coil expression
Laurent Bessard
parents:
1259
diff
changeset
|
94 |
self.ElementVariable = wx.ComboBox(self, style=wx.CB_SORT) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
95 |
self.Bind(wx.EVT_COMBOBOX, self.OnVariableChanged, |
1246 | 96 |
self.ElementVariable) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
97 |
self.Bind(wx.EVT_TEXT, self.OnVariableChanged, |
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
98 |
self.ElementVariable) |
1250
7e6de17c687a
Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents:
1247
diff
changeset
|
99 |
self.LeftGridSizer.AddWindow(self.ElementVariable, border=5, |
1246 | 100 |
flag=wx.GROW|wx.TOP) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
101 |
|
1246 | 102 |
# Add preview panel and associated label to sizers |
1250
7e6de17c687a
Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents:
1247
diff
changeset
|
103 |
self.RightGridSizer.AddWindow(self.PreviewLabel, flag=wx.GROW) |
7e6de17c687a
Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents:
1247
diff
changeset
|
104 |
self.RightGridSizer.AddWindow(self.Preview, flag=wx.GROW) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
105 |
|
1246 | 106 |
# Add buttons sizer to sizers |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
107 |
self.MainSizer.AddSizer(self.ButtonSizer, border=20, |
814 | 108 |
flag=wx.ALIGN_RIGHT|wx.BOTTOM|wx.LEFT|wx.RIGHT) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
109 |
|
1246 | 110 |
# Save LD element class |
111 |
self.ElementClass = (LD_Contact if type == "contact" else LD_Coil) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
112 |
|
1246 | 113 |
# Extract list of variables defined in POU |
114 |
self.RefreshVariableList() |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
115 |
|
1246 | 116 |
# Set values in ElementVariable |
117 |
for name, (var_type, value_type) in self.VariableList.iteritems(): |
|
118 |
# Only select BOOL variable and avoid input for coil |
|
119 |
if (type == "contact" or var_type != "Input") and \ |
|
120 |
value_type == "BOOL": |
|
121 |
self.ElementVariable.Append(name) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
122 |
|
1696
8043f32de7b8
make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
123 |
self.Fit() |
1246 | 124 |
# Normal radio button is default control having keyboard focus |
125 |
self.ModifierRadioButtons[element_modifiers[0]].SetFocus() |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
126 |
|
1246 | 127 |
def GetElementModifier(self): |
128 |
""" |
|
129 |
Return modifier selected for LD element |
|
130 |
@return: Modifier selected (None if not found) |
|
131 |
""" |
|
132 |
# Go through radio buttons and return modifier associated to the one |
|
133 |
# that is selected |
|
134 |
for modifier, control in self.ModifierRadioButtons.iteritems(): |
|
135 |
if control.GetValue(): |
|
136 |
return modifier |
|
137 |
return None |
|
814 | 138 |
|
139 |
def SetValues(self, values): |
|
1246 | 140 |
""" |
141 |
Set default LD element parameters |
|
1252 | 142 |
@param values: LD element parameters values |
1246 | 143 |
""" |
144 |
# For each parameters defined, set corresponding control value |
|
814 | 145 |
for name, value in values.items(): |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
146 |
|
1246 | 147 |
# Parameter is LD element variable |
148 |
if name == "variable": |
|
1370
ee795a8d4404
Fixed coil and contact dialog to let user select a complex type variable for contact and coil expression
Laurent Bessard
parents:
1259
diff
changeset
|
149 |
self.ElementVariable.SetValue(value) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
150 |
|
1246 | 151 |
# Set value of other controls |
152 |
elif name == "modifier": |
|
153 |
self.ModifierRadioButtons[value].SetValue(True) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
154 |
|
1246 | 155 |
# Refresh preview panel |
156 |
self.RefreshPreview() |
|
814 | 157 |
|
158 |
def GetValues(self): |
|
1246 | 159 |
""" |
160 |
Return LD element parameters defined in dialog |
|
161 |
@return: {parameter_name: parameter_value,...} |
|
162 |
""" |
|
163 |
values = { |
|
164 |
"variable": self.ElementVariable.GetValue(), |
|
165 |
"modifier": self.GetElementModifier()} |
|
814 | 166 |
values["width"], values["height"] = self.Element.GetSize() |
167 |
return values |
|
168 |
||
1246 | 169 |
def OnModifierChanged(self, event): |
170 |
""" |
|
171 |
Called when LD element modifier changed |
|
172 |
@param event: wx.RadioButtonEvent |
|
173 |
""" |
|
814 | 174 |
self.RefreshPreview() |
175 |
event.Skip() |
|
176 |
||
1246 | 177 |
def OnVariableChanged(self, event): |
178 |
""" |
|
179 |
Called when LD element associated variable changed |
|
180 |
@param event: wx.ComboBoxEvent |
|
181 |
""" |
|
814 | 182 |
self.RefreshPreview() |
183 |
event.Skip() |
|
184 |
||
185 |
def RefreshPreview(self): |
|
1246 | 186 |
""" |
187 |
Refresh preview panel of graphic element |
|
188 |
Override BlockPreviewDialog function |
|
189 |
""" |
|
1698
ae3e819252fc
disable empty coils and contacts in LD/SFC editors
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1696
diff
changeset
|
190 |
value = self.ElementVariable.GetValue() |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
191 |
|
1246 | 192 |
# Set graphic element displayed, creating a LD element |
193 |
self.Element = self.ElementClass( |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
194 |
self.Preview, |
1246 | 195 |
self.GetElementModifier(), |
1698
ae3e819252fc
disable empty coils and contacts in LD/SFC editors
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1696
diff
changeset
|
196 |
value) |
ae3e819252fc
disable empty coils and contacts in LD/SFC editors
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1696
diff
changeset
|
197 |
|
ae3e819252fc
disable empty coils and contacts in LD/SFC editors
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1696
diff
changeset
|
198 |
button = self.ButtonSizer.GetAffirmativeButton() |
ae3e819252fc
disable empty coils and contacts in LD/SFC editors
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1696
diff
changeset
|
199 |
button.Enable(value != "") |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
200 |
|
1246 | 201 |
# Call BlockPreviewDialog function |
202 |
BlockPreviewDialog.RefreshPreview(self) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1698
diff
changeset
|
203 |
|
1698
ae3e819252fc
disable empty coils and contacts in LD/SFC editors
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1696
diff
changeset
|
204 |
def OnOK(self, event): |
ae3e819252fc
disable empty coils and contacts in LD/SFC editors
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1696
diff
changeset
|
205 |
if self.ElementVariable.GetValue() != "": |
ae3e819252fc
disable empty coils and contacts in LD/SFC editors
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1696
diff
changeset
|
206 |
self.EndModal(wx.ID_OK) |