author | Andrey Skvortsov <andrej.skvortzov@gmail.com> |
Thu, 17 Aug 2017 11:39:10 +0300 | |
changeset 1762 | fcc406143e5b |
parent 1754 | 63f4af6bf6d9 |
child 1768 | 691083b5682a |
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:
1508
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:
1508
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:
1508
diff
changeset
|
7 |
# Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD |
814 | 8 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1508
diff
changeset
|
9 |
# See COPYING file for copyrights details. |
814 | 10 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1508
diff
changeset
|
11 |
# 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:
1508
diff
changeset
|
12 |
# 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:
1508
diff
changeset
|
13 |
# 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:
1508
diff
changeset
|
14 |
# of the License, or (at your option) any later version. |
814 | 15 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1508
diff
changeset
|
16 |
# 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:
1508
diff
changeset
|
17 |
# 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:
1508
diff
changeset
|
18 |
# 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:
1508
diff
changeset
|
19 |
# GNU General Public License for more details. |
814 | 20 |
# |
1571
486f94a8032c
fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1508
diff
changeset
|
21 |
# 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:
1508
diff
changeset
|
22 |
# 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:
1508
diff
changeset
|
23 |
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. |
814 | 24 |
|
25 |
import re |
|
864
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
26 |
from types import TupleType |
814 | 27 |
|
28 |
import wx |
|
29 |
import wx.grid |
|
30 |
import wx.lib.buttons |
|
31 |
||
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
32 |
from plcopen.structures import IEC_KEYWORDS, TestIdentifier, DefaultType |
814 | 33 |
from graphics.GraphicCommons import REFRESH_HIGHLIGHT_PERIOD |
34 |
from controls import CustomEditableListBox, CustomGrid, CustomTable |
|
864
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
35 |
from dialogs import ArrayTypeDialog |
814 | 36 |
from EditorPanel import EditorPanel |
37 |
from util.BitmapLibrary import GetBitmap |
|
1762
fcc406143e5b
clean-up: fix PEP8 E731 do not assign a lambda expression, use a def
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
38 |
from util.TranslationCatalogs import NoTranslate |
814 | 39 |
|
40 |
#------------------------------------------------------------------------------- |
|
41 |
# Helpers |
|
42 |
#------------------------------------------------------------------------------- |
|
43 |
||
44 |
DIMENSION_MODEL = re.compile("([0-9]+)\.\.([0-9]+)$") |
|
45 |
||
1736
7e61baa047f0
clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1735
diff
changeset
|
46 |
|
814 | 47 |
def AppendMenu(parent, help, id, kind, text): |
48 |
parent.Append(help=help, id=id, kind=kind, text=text) |
|
49 |
||
1736
7e61baa047f0
clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1735
diff
changeset
|
50 |
|
814 | 51 |
def GetElementsTableColnames(): |
1762
fcc406143e5b
clean-up: fix PEP8 E731 do not assign a lambda expression, use a def
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
52 |
_ = NoTranslate |
814 | 53 |
return ["#", _("Name"), _("Type"), _("Initial Value")] |
54 |
||
1736
7e61baa047f0
clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1735
diff
changeset
|
55 |
|
814 | 56 |
def GetDatatypeTypes(): |
1762
fcc406143e5b
clean-up: fix PEP8 E731 do not assign a lambda expression, use a def
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
57 |
_ = NoTranslate |
814 | 58 |
return [_("Directly"), _("Subrange"), _("Enumerated"), _("Array"), _("Structure")] |
1749
d73b64672238
clean-up: fix PEP8 E305 expected 2 blank lines after class or function definition
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1745
diff
changeset
|
59 |
|
d73b64672238
clean-up: fix PEP8 E305 expected 2 blank lines after class or function definition
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1745
diff
changeset
|
60 |
|
814 | 61 |
DATATYPE_TYPES_DICT = dict([(_(datatype), datatype) for datatype in GetDatatypeTypes()]) |
62 |
||
63 |
#------------------------------------------------------------------------------- |
|
64 |
# Structure Elements Table |
|
65 |
#------------------------------------------------------------------------------- |
|
66 |
||
1736
7e61baa047f0
clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1735
diff
changeset
|
67 |
|
814 | 68 |
class ElementsTable(CustomTable): |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
69 |
|
814 | 70 |
""" |
71 |
A custom wx.grid.Grid Table using user supplied data |
|
72 |
""" |
|
73 |
def __init__(self, parent, data, colnames): |
|
74 |
# The base class must be initialized *first* |
|
75 |
CustomTable.__init__(self, parent, data, colnames) |
|
76 |
self.old_value = None |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
77 |
|
814 | 78 |
def GetValue(self, row, col): |
79 |
if row < self.GetNumberRows(): |
|
80 |
if col == 0: |
|
81 |
return row + 1 |
|
864
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
82 |
colname = self.GetColLabelValue(col, False) |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
83 |
value = self.data[row].get(colname, "") |
1735
c02818d7e29f
clean-up: fix PEP8 W293 blank line contains whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1734
diff
changeset
|
84 |
|
864
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
85 |
if colname == "Type" and isinstance(value, TupleType): |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
86 |
if value[0] == "array": |
1739
ec153828ded2
clean-up: fix PEP8 E203 whitespace before ':' and whitespace before ','
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1736
diff
changeset
|
87 |
return "ARRAY [%s] OF %s" % (",".join(map(lambda x: "..".join(x), value[2])), value[1]) |
1508
4c645e6b8c98
fix error if non-latin character was entered in initial value in
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1412
diff
changeset
|
88 |
return value |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
89 |
|
814 | 90 |
def SetValue(self, row, col, value): |
91 |
if col < len(self.colnames): |
|
92 |
colname = self.GetColLabelValue(col, False) |
|
93 |
if colname == "Name": |
|
94 |
self.old_value = self.data[row][colname] |
|
95 |
self.data[row][colname] = value |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
96 |
|
814 | 97 |
def GetOldValue(self): |
98 |
return self.old_value |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
99 |
|
814 | 100 |
def _updateColAttrs(self, grid): |
101 |
""" |
|
102 |
wx.grid.Grid -> update the column attributes to add the |
|
103 |
appropriate renderer given the column name. |
|
104 |
||
105 |
Otherwise default to the default renderer. |
|
106 |
""" |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
107 |
|
814 | 108 |
for row in range(self.GetNumberRows()): |
109 |
row_highlights = self.Highlights.get(row, {}) |
|
110 |
for col in range(self.GetNumberCols()): |
|
111 |
editor = None |
|
112 |
renderer = None |
|
113 |
colname = self.GetColLabelValue(col, False) |
|
114 |
if col != 0: |
|
115 |
grid.SetReadOnly(row, col, False) |
|
116 |
if colname == "Name": |
|
117 |
editor = wx.grid.GridCellTextEditor() |
|
118 |
renderer = wx.grid.GridCellStringRenderer() |
|
119 |
elif colname == "Initial Value": |
|
120 |
editor = wx.grid.GridCellTextEditor() |
|
121 |
renderer = wx.grid.GridCellStringRenderer() |
|
122 |
elif colname == "Type": |
|
123 |
editor = wx.grid.GridCellTextEditor() |
|
124 |
else: |
|
125 |
grid.SetReadOnly(row, col, True) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
126 |
|
814 | 127 |
grid.SetCellEditor(row, col, editor) |
128 |
grid.SetCellRenderer(row, col, renderer) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
129 |
|
814 | 130 |
highlight_colours = row_highlights.get(colname.lower(), [(wx.WHITE, wx.BLACK)])[-1] |
131 |
grid.SetCellBackgroundColour(row, col, highlight_colours[0]) |
|
132 |
grid.SetCellTextColour(row, col, highlight_colours[1]) |
|
133 |
self.ResizeRow(grid, row) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
134 |
|
814 | 135 |
def AddHighlight(self, infos, highlight_type): |
136 |
row_highlights = self.Highlights.setdefault(infos[0], {}) |
|
137 |
if infos[1] == "initial": |
|
138 |
col_highlights = row_highlights.setdefault("initial value", []) |
|
139 |
else: |
|
140 |
col_highlights = row_highlights.setdefault(infos[1], []) |
|
141 |
col_highlights.append(highlight_type) |
|
142 |
||
143 |
#------------------------------------------------------------------------------- |
|
144 |
# Datatype Editor class |
|
145 |
#------------------------------------------------------------------------------- |
|
146 |
||
1736
7e61baa047f0
clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1735
diff
changeset
|
147 |
|
814 | 148 |
class DataTypeEditor(EditorPanel): |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
149 |
|
814 | 150 |
def _init_Editor(self, parent): |
151 |
self.Editor = wx.Panel(parent, style=wx.SUNKEN_BORDER) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
152 |
|
814 | 153 |
self.MainSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=10) |
154 |
self.MainSizer.AddGrowableCol(0) |
|
155 |
self.MainSizer.AddGrowableRow(1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
156 |
|
814 | 157 |
top_sizer = wx.BoxSizer(wx.HORIZONTAL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
158 |
self.MainSizer.AddSizer(top_sizer, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
159 |
flag=wx.GROW | wx.TOP | wx.LEFT | wx.RIGHT) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
160 |
|
814 | 161 |
derivation_type_label = wx.StaticText(self.Editor, label=_('Derivation Type:')) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
162 |
top_sizer.AddWindow(derivation_type_label, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
163 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.LEFT | wx.RIGHT) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
164 |
|
814 | 165 |
self.DerivationType = wx.ComboBox(self.Editor, |
166 |
size=wx.Size(200, -1), style=wx.CB_READONLY) |
|
167 |
self.Bind(wx.EVT_COMBOBOX, self.OnDerivationTypeChanged, self.DerivationType) |
|
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
168 |
top_sizer.AddWindow(self.DerivationType, border=5, flag=wx.GROW | wx.RIGHT) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
169 |
|
814 | 170 |
typeinfos_staticbox = wx.StaticBox(self.Editor, label=_('Type infos:')) |
171 |
typeinfos_sizer = wx.StaticBoxSizer(typeinfos_staticbox, wx.HORIZONTAL) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
172 |
self.MainSizer.AddSizer(typeinfos_sizer, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
173 |
flag=wx.GROW | wx.BOTTOM | wx.LEFT | wx.RIGHT) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
174 |
|
814 | 175 |
# Panel for Directly derived data types |
176 |
||
177 |
self.DirectlyPanel = wx.Panel(self.Editor, style=wx.TAB_TRAVERSAL) |
|
178 |
typeinfos_sizer.AddWindow(self.DirectlyPanel, 1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
179 |
|
814 | 180 |
directly_panel_sizer = wx.BoxSizer(wx.HORIZONTAL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
181 |
|
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
182 |
directly_basetype_label = wx.StaticText(self.DirectlyPanel, |
814 | 183 |
label=_('Base Type:')) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
184 |
directly_panel_sizer.AddWindow(directly_basetype_label, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
185 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
186 |
|
814 | 187 |
self.DirectlyBaseType = wx.ComboBox(self.DirectlyPanel, style=wx.CB_READONLY) |
947 | 188 |
self.Bind(wx.EVT_COMBOBOX, self.OnInfosChanged, self.DirectlyBaseType) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
189 |
directly_panel_sizer.AddWindow(self.DirectlyBaseType, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
190 |
flag=wx.GROW | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
191 |
|
814 | 192 |
directly_initialvalue_label = wx.StaticText(self.DirectlyPanel, |
193 |
label=_('Initial Value:')) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
194 |
directly_panel_sizer.AddWindow(directly_initialvalue_label, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
195 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
196 |
|
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
197 |
self.DirectlyInitialValue = wx.TextCtrl(self.DirectlyPanel, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
198 |
style=wx.TE_PROCESS_ENTER | wx.TE_RICH) |
814 | 199 |
self.Bind(wx.EVT_TEXT_ENTER, self.OnReturnKeyPressed, self.DirectlyInitialValue) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
200 |
directly_panel_sizer.AddWindow(self.DirectlyInitialValue, 1, border=5, |
814 | 201 |
flag=wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
202 |
|
814 | 203 |
self.DirectlyPanel.SetSizer(directly_panel_sizer) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
204 |
|
814 | 205 |
# Panel for Subrange data types |
206 |
||
207 |
self.SubrangePanel = wx.Panel(self.Editor, style=wx.TAB_TRAVERSAL) |
|
208 |
typeinfos_sizer.AddWindow(self.SubrangePanel, 1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
209 |
|
814 | 210 |
subrange_panel_sizer = wx.GridSizer(cols=4, hgap=5, rows=3, vgap=0) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
211 |
|
814 | 212 |
subrange_basetype_label = wx.StaticText(self.SubrangePanel, |
213 |
label=_('Base Type:')) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
214 |
subrange_panel_sizer.AddWindow(subrange_basetype_label, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
215 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
216 |
|
814 | 217 |
self.SubrangeBaseType = wx.ComboBox(self.SubrangePanel, style=wx.CB_READONLY) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
218 |
self.Bind(wx.EVT_COMBOBOX, self.OnSubrangeBaseTypeChanged, |
814 | 219 |
self.SubrangeBaseType) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
220 |
subrange_panel_sizer.AddWindow(self.SubrangeBaseType, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
221 |
flag=wx.GROW | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
222 |
|
814 | 223 |
subrange_initialvalue_label = wx.StaticText(self.SubrangePanel, |
224 |
label=_('Initial Value:')) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
225 |
subrange_panel_sizer.AddWindow(subrange_initialvalue_label, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
226 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
227 |
|
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
228 |
self.SubrangeInitialValue = wx.SpinCtrl(self.SubrangePanel, |
814 | 229 |
style=wx.TAB_TRAVERSAL) |
230 |
self.Bind(wx.EVT_SPINCTRL, self.OnInfosChanged, self.SubrangeInitialValue) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
231 |
subrange_panel_sizer.AddWindow(self.SubrangeInitialValue, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
232 |
flag=wx.GROW | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
233 |
|
814 | 234 |
subrange_minimum_label = wx.StaticText(self.SubrangePanel, label=_('Minimum:')) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
235 |
subrange_panel_sizer.AddWindow(subrange_minimum_label, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
236 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
237 |
|
814 | 238 |
self.SubrangeMinimum = wx.SpinCtrl(self.SubrangePanel, style=wx.TAB_TRAVERSAL) |
239 |
self.Bind(wx.EVT_SPINCTRL, self.OnSubrangeMinimumChanged, self.SubrangeMinimum) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
240 |
subrange_panel_sizer.AddWindow(self.SubrangeMinimum, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
241 |
flag=wx.GROW | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
242 |
|
814 | 243 |
for i in xrange(2): |
244 |
subrange_panel_sizer.AddWindow(wx.Size(0, 0), 1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
245 |
|
814 | 246 |
subrange_maximum_label = wx.StaticText(self.SubrangePanel, |
247 |
label=_('Maximum:')) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
248 |
subrange_panel_sizer.AddWindow(subrange_maximum_label, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
249 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
250 |
|
814 | 251 |
self.SubrangeMaximum = wx.SpinCtrl(self.SubrangePanel, style=wx.TAB_TRAVERSAL) |
252 |
self.Bind(wx.EVT_SPINCTRL, self.OnSubrangeMaximumChanged, self.SubrangeMaximum) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
253 |
|
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
254 |
subrange_panel_sizer.AddWindow(self.SubrangeMaximum, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
255 |
flag=wx.GROW | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
256 |
|
814 | 257 |
self.SubrangePanel.SetSizer(subrange_panel_sizer) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
258 |
|
814 | 259 |
# Panel for Enumerated data types |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
260 |
|
814 | 261 |
self.EnumeratedPanel = wx.Panel(self.Editor, style=wx.TAB_TRAVERSAL) |
262 |
typeinfos_sizer.AddWindow(self.EnumeratedPanel, 1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
263 |
|
814 | 264 |
enumerated_panel_sizer = wx.BoxSizer(wx.HORIZONTAL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
265 |
|
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
266 |
self.EnumeratedValues = CustomEditableListBox(self.EnumeratedPanel, |
1754
63f4af6bf6d9
clean-up: fix most PEP8 E221 multiple spaces before operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1753
diff
changeset
|
267 |
label=_("Values:"), style=wx.gizmos.EL_ALLOW_NEW | |
1742
92932cd370a4
clean-up: fix PEP8 E225 missing whitespace around operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1739
diff
changeset
|
268 |
wx.gizmos.EL_ALLOW_EDIT | |
814 | 269 |
wx.gizmos.EL_ALLOW_DELETE) |
270 |
setattr(self.EnumeratedValues, "_OnLabelEndEdit", self.OnEnumeratedValueEndEdit) |
|
271 |
for func in ["_OnAddButton", "_OnDelButton", "_OnUpButton", "_OnDownButton"]: |
|
272 |
setattr(self.EnumeratedValues, func, self.OnEnumeratedValuesChanged) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
273 |
enumerated_panel_sizer.AddWindow(self.EnumeratedValues, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
274 |
flag=wx.GROW | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
275 |
|
814 | 276 |
enumerated_panel_rightsizer = wx.BoxSizer(wx.HORIZONTAL) |
277 |
enumerated_panel_sizer.AddSizer(enumerated_panel_rightsizer, 1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
278 |
|
814 | 279 |
enumerated_initialvalue_label = wx.StaticText(self.EnumeratedPanel, |
280 |
label=_('Initial Value:')) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
281 |
enumerated_panel_rightsizer.AddWindow(enumerated_initialvalue_label, 1, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
282 |
border=5, flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
283 |
|
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
284 |
self.EnumeratedInitialValue = wx.ComboBox(self.EnumeratedPanel, |
814 | 285 |
style=wx.CB_READONLY) |
286 |
self.Bind(wx.EVT_COMBOBOX, self.OnInfosChanged, self.EnumeratedInitialValue) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
287 |
enumerated_panel_rightsizer.AddWindow(self.EnumeratedInitialValue, 1, |
814 | 288 |
border=5, flag=wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
289 |
|
814 | 290 |
self.EnumeratedPanel.SetSizer(enumerated_panel_sizer) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
291 |
|
814 | 292 |
# Panel for Array data types |
293 |
||
294 |
self.ArrayPanel = wx.Panel(self.Editor, style=wx.TAB_TRAVERSAL) |
|
295 |
typeinfos_sizer.AddWindow(self.ArrayPanel, 1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
296 |
|
814 | 297 |
array_panel_sizer = wx.FlexGridSizer(cols=2, hgap=5, rows=2, vgap=0) |
298 |
array_panel_sizer.AddGrowableCol(0) |
|
299 |
array_panel_sizer.AddGrowableCol(1) |
|
300 |
array_panel_sizer.AddGrowableRow(1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
301 |
|
814 | 302 |
array_panel_leftSizer = wx.BoxSizer(wx.HORIZONTAL) |
303 |
array_panel_sizer.AddSizer(array_panel_leftSizer, flag=wx.GROW) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
304 |
|
814 | 305 |
array_basetype_label = wx.StaticText(self.ArrayPanel, label=_('Base Type:')) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
306 |
array_panel_leftSizer.AddWindow(array_basetype_label, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
307 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
308 |
|
814 | 309 |
self.ArrayBaseType = wx.ComboBox(self.ArrayPanel, style=wx.CB_READONLY) |
310 |
self.Bind(wx.EVT_COMBOBOX, self.OnInfosChanged, self.ArrayBaseType) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
311 |
array_panel_leftSizer.AddWindow(self.ArrayBaseType, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
312 |
flag=wx.GROW | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
313 |
|
814 | 314 |
array_panel_rightsizer = wx.BoxSizer(wx.HORIZONTAL) |
315 |
array_panel_sizer.AddSizer(array_panel_rightsizer, flag=wx.GROW) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
316 |
|
814 | 317 |
array_initialvalue_label = wx.StaticText(self.ArrayPanel, |
318 |
label=_('Initial Value:')) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
319 |
array_panel_rightsizer.AddWindow(array_initialvalue_label, 1, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
320 |
flag=wx.ALIGN_CENTER_VERTICAL | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
321 |
|
814 | 322 |
self.ArrayInitialValue = wx.TextCtrl(self.ArrayPanel, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
323 |
style=wx.TE_PROCESS_ENTER | wx.TE_RICH) |
814 | 324 |
self.Bind(wx.EVT_TEXT_ENTER, self.OnReturnKeyPressed, self.ArrayInitialValue) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
325 |
array_panel_rightsizer.AddWindow(self.ArrayInitialValue, 1, border=5, |
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
326 |
flag=wx.ALL) |
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
327 |
|
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
328 |
self.ArrayDimensions = CustomEditableListBox(self.ArrayPanel, |
1754
63f4af6bf6d9
clean-up: fix most PEP8 E221 multiple spaces before operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1753
diff
changeset
|
329 |
label=_("Dimensions:"), style=wx.gizmos.EL_ALLOW_NEW | |
1742
92932cd370a4
clean-up: fix PEP8 E225 missing whitespace around operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1739
diff
changeset
|
330 |
wx.gizmos.EL_ALLOW_EDIT | |
814 | 331 |
wx.gizmos.EL_ALLOW_DELETE) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
332 |
for func in ["_OnLabelEndEdit", "_OnAddButton", "_OnDelButton", |
814 | 333 |
"_OnUpButton", "_OnDownButton"]: |
334 |
setattr(self.ArrayDimensions, func, self.OnDimensionsChanged) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
335 |
array_panel_sizer.AddWindow(self.ArrayDimensions, 0, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
336 |
flag=wx.GROW | wx.ALL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
337 |
|
814 | 338 |
self.ArrayPanel.SetSizer(array_panel_sizer) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
339 |
|
814 | 340 |
# Panel for Structure data types |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
341 |
|
814 | 342 |
self.StructurePanel = wx.Panel(self.Editor, style=wx.TAB_TRAVERSAL) |
343 |
typeinfos_sizer.AddWindow(self.StructurePanel, 1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
344 |
|
814 | 345 |
structure_panel_sizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0) |
346 |
structure_panel_sizer.AddGrowableCol(0) |
|
347 |
structure_panel_sizer.AddGrowableRow(1) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
348 |
|
814 | 349 |
structure_button_sizer = wx.FlexGridSizer(cols=5, hgap=5, rows=1, vgap=0) |
350 |
structure_button_sizer.AddGrowableCol(0) |
|
351 |
structure_button_sizer.AddGrowableRow(0) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
352 |
structure_panel_sizer.AddSizer(structure_button_sizer, 0, border=5, |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
353 |
flag=wx.ALL | wx.GROW) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
354 |
|
814 | 355 |
structure_elements_label = wx.StaticText(self.StructurePanel, |
356 |
label=_('Elements :')) |
|
357 |
structure_button_sizer.AddWindow(structure_elements_label, flag=wx.ALIGN_BOTTOM) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
358 |
|
814 | 359 |
for name, bitmap, help in [ |
360 |
("StructureAddButton", "add_element", _("Add element")), |
|
361 |
("StructureDeleteButton", "remove_element", _("Remove element")), |
|
362 |
("StructureUpButton", "up", _("Move element up")), |
|
363 |
("StructureDownButton", "down", _("Move element down"))]: |
|
364 |
button = wx.lib.buttons.GenBitmapButton(self.StructurePanel, |
|
365 |
bitmap=GetBitmap(bitmap), size=wx.Size(28, 28), style=wx.NO_BORDER) |
|
366 |
button.SetToolTipString(help) |
|
367 |
setattr(self, name, button) |
|
368 |
structure_button_sizer.AddWindow(button) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
369 |
|
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
370 |
self.StructureElementsGrid = CustomGrid(self.StructurePanel, |
814 | 371 |
size=wx.Size(0, 150), style=wx.VSCROLL) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
372 |
self.StructureElementsGrid.Bind(wx.grid.EVT_GRID_CELL_CHANGE, |
814 | 373 |
self.OnStructureElementsGridCellChange) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
374 |
self.StructureElementsGrid.Bind(wx.grid.EVT_GRID_EDITOR_SHOWN, |
814 | 375 |
self.OnStructureElementsGridEditorShown) |
376 |
structure_panel_sizer.AddWindow(self.StructureElementsGrid, flag=wx.GROW) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
377 |
|
814 | 378 |
self.StructurePanel.SetSizer(structure_panel_sizer) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
379 |
|
814 | 380 |
self.Editor.SetSizer(self.MainSizer) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
381 |
|
814 | 382 |
def __init__(self, parent, tagname, window, controler): |
383 |
EditorPanel.__init__(self, parent, tagname, window, controler) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
384 |
|
1739
ec153828ded2
clean-up: fix PEP8 E203 whitespace before ':' and whitespace before ','
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1736
diff
changeset
|
385 |
self.StructureElementDefaultValue = {"Name": "", "Type": DefaultType, "Initial Value": ""} |
814 | 386 |
self.StructureElementsTable = ElementsTable(self, [], GetElementsTableColnames()) |
387 |
self.StructureColSizes = [40, 150, 100, 250] |
|
388 |
self.StructureColAlignements = [wx.ALIGN_CENTER, wx.ALIGN_LEFT, wx.ALIGN_LEFT, wx.ALIGN_LEFT] |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
389 |
|
814 | 390 |
self.StructureElementsGrid.SetTable(self.StructureElementsTable) |
391 |
self.StructureElementsGrid.SetButtons({"Add": self.StructureAddButton, |
|
392 |
"Delete": self.StructureDeleteButton, |
|
393 |
"Up": self.StructureUpButton, |
|
394 |
"Down": self.StructureDownButton}) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
395 |
|
814 | 396 |
def _AddStructureElement(new_row): |
397 |
self.StructureElementsTable.InsertRow(new_row, self.StructureElementDefaultValue.copy()) |
|
398 |
self.RefreshTypeInfos() |
|
399 |
self.StructureElementsTable.ResetView(self.StructureElementsGrid) |
|
400 |
return new_row |
|
401 |
setattr(self.StructureElementsGrid, "_AddRow", _AddStructureElement) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
402 |
|
814 | 403 |
def _DeleteStructureElement(row): |
404 |
self.StructureElementsTable.RemoveRow(row) |
|
405 |
self.RefreshTypeInfos() |
|
406 |
self.StructureElementsTable.ResetView(self.StructureElementsGrid) |
|
407 |
setattr(self.StructureElementsGrid, "_DeleteRow", _DeleteStructureElement) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
408 |
|
814 | 409 |
def _MoveStructureElement(row, move): |
410 |
new_row = self.StructureElementsTable.MoveRow(row, move) |
|
411 |
if new_row != row: |
|
412 |
self.RefreshTypeInfos() |
|
413 |
self.StructureElementsTable.ResetView(self.StructureElementsGrid) |
|
414 |
return new_row |
|
415 |
setattr(self.StructureElementsGrid, "_MoveRow", _MoveStructureElement) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
416 |
|
814 | 417 |
self.StructureElementsGrid.SetRowLabelSize(0) |
418 |
for col in range(self.StructureElementsTable.GetNumberCols()): |
|
419 |
attr = wx.grid.GridCellAttr() |
|
420 |
attr.SetAlignment(self.StructureColAlignements[col], wx.ALIGN_CENTRE) |
|
421 |
self.StructureElementsGrid.SetColAttr(col, attr) |
|
422 |
self.StructureElementsGrid.SetColMinimalWidth(col, self.StructureColSizes[col]) |
|
423 |
self.StructureElementsGrid.AutoSizeColumn(col, False) |
|
424 |
self.StructureElementsGrid.RefreshButtons() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
425 |
|
814 | 426 |
for datatype in GetDatatypeTypes(): |
427 |
self.DerivationType.Append(_(datatype)) |
|
428 |
self.SubrangePanel.Hide() |
|
429 |
self.EnumeratedPanel.Hide() |
|
430 |
self.ArrayPanel.Hide() |
|
431 |
self.StructurePanel.Hide() |
|
432 |
self.CurrentPanel = "Directly" |
|
433 |
self.Highlights = [] |
|
434 |
self.Initializing = False |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
435 |
|
814 | 436 |
self.HighlightControls = { |
437 |
("Directly", "base"): self.DirectlyBaseType, |
|
438 |
("Directly", "initial"): self.DirectlyInitialValue, |
|
439 |
("Subrange", "base"): self.SubrangeBaseType, |
|
440 |
("Subrange", "lower"): self.SubrangeMinimum, |
|
441 |
("Subrange", "upper"): self.SubrangeMaximum, |
|
442 |
("Subrange", "initial"): self.SubrangeInitialValue, |
|
443 |
("Enumerated", "value"): self.EnumeratedValues, |
|
444 |
("Enumerated", "initial"): self.EnumeratedInitialValue, |
|
445 |
("Array", "initial"): self.ArrayInitialValue, |
|
446 |
("Array", "base"): self.ArrayBaseType, |
|
447 |
("Array", "range"): self.ArrayDimensions, |
|
448 |
} |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
449 |
|
814 | 450 |
self.RefreshHighlightsTimer = wx.Timer(self, -1) |
451 |
self.Bind(wx.EVT_TIMER, self.OnRefreshHighlightsTimer, self.RefreshHighlightsTimer) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
452 |
|
814 | 453 |
def __del__(self): |
454 |
self.RefreshHighlightsTimer.Stop() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
455 |
|
814 | 456 |
def GetBufferState(self): |
457 |
return self.Controler.GetBufferState() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
458 |
|
814 | 459 |
def Undo(self): |
460 |
self.Controler.LoadPrevious() |
|
461 |
self.ParentWindow.CloseTabsWithoutModel() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
462 |
|
814 | 463 |
def Redo(self): |
464 |
self.Controler.LoadNext() |
|
465 |
self.ParentWindow.CloseTabsWithoutModel() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
466 |
|
814 | 467 |
def HasNoModel(self): |
468 |
return self.Controler.GetEditedElement(self.TagName) is None |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
469 |
|
814 | 470 |
def RefreshView(self): |
471 |
self.Initializing = True |
|
472 |
self.DirectlyBaseType.Clear() |
|
473 |
self.ArrayBaseType.Clear() |
|
474 |
for datatype in self.Controler.GetDataTypes(self.TagName): |
|
475 |
self.DirectlyBaseType.Append(datatype) |
|
476 |
self.ArrayBaseType.Append(datatype) |
|
477 |
self.DirectlyBaseType.SetSelection(0) |
|
478 |
self.SubrangeBaseType.Clear() |
|
479 |
words = self.TagName.split("::") |
|
480 |
for base_type in self.Controler.GetSubrangeBaseTypes(words[1]): |
|
481 |
self.SubrangeBaseType.Append(base_type) |
|
482 |
self.SubrangeBaseType.SetSelection(0) |
|
483 |
self.RefreshBoundsRange() |
|
484 |
type_infos = self.Controler.GetDataTypeInfos(self.TagName) |
|
485 |
if type_infos is not None: |
|
486 |
datatype = type_infos["type"] |
|
487 |
self.DerivationType.SetStringSelection(_(datatype)) |
|
488 |
if type_infos["type"] == "Directly": |
|
489 |
self.DirectlyBaseType.SetStringSelection(type_infos["base_type"]) |
|
490 |
self.DirectlyInitialValue.SetValue(type_infos["initial"]) |
|
491 |
elif type_infos["type"] == "Subrange": |
|
492 |
self.SubrangeBaseType.SetStringSelection(type_infos["base_type"]) |
|
493 |
self.RefreshBoundsRange() |
|
494 |
self.SubrangeMinimum.SetValue(int(type_infos["min"])) |
|
495 |
self.SubrangeMaximum.SetValue(int(type_infos["max"])) |
|
496 |
self.RefreshSubrangeInitialValueRange() |
|
497 |
if type_infos["initial"] != "": |
|
498 |
self.SubrangeInitialValue.SetValue(int(type_infos["initial"])) |
|
499 |
else: |
|
500 |
self.SubrangeInitialValue.SetValue(type_infos["min"]) |
|
501 |
elif type_infos["type"] == "Enumerated": |
|
502 |
self.EnumeratedValues.SetStrings(type_infos["values"]) |
|
503 |
self.RefreshEnumeratedValues() |
|
504 |
self.EnumeratedInitialValue.SetStringSelection(type_infos["initial"]) |
|
505 |
elif type_infos["type"] == "Array": |
|
506 |
self.ArrayBaseType.SetStringSelection(type_infos["base_type"]) |
|
1739
ec153828ded2
clean-up: fix PEP8 E203 whitespace before ':' and whitespace before ','
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1736
diff
changeset
|
507 |
self.ArrayDimensions.SetStrings(map(lambda x: "..".join(x), type_infos["dimensions"])) |
814 | 508 |
self.ArrayInitialValue.SetValue(type_infos["initial"]) |
509 |
elif type_infos["type"] == "Structure": |
|
510 |
self.StructureElementsTable.SetData(type_infos["elements"]) |
|
511 |
self.RefreshDisplayedInfos() |
|
512 |
self.ShowHighlights() |
|
513 |
self.StructureElementsTable.ResetView(self.StructureElementsGrid) |
|
514 |
self.StructureElementsGrid.RefreshButtons() |
|
515 |
self.Initializing = False |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
516 |
|
814 | 517 |
def OnDerivationTypeChanged(self, event): |
518 |
wx.CallAfter(self.RefreshDisplayedInfos) |
|
519 |
wx.CallAfter(self.RefreshTypeInfos) |
|
520 |
event.Skip() |
|
521 |
||
522 |
def OnReturnKeyPressed(self, event): |
|
523 |
self.RefreshTypeInfos() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
524 |
|
814 | 525 |
def OnInfosChanged(self, event): |
526 |
self.RefreshTypeInfos() |
|
527 |
event.Skip() |
|
528 |
||
529 |
def OnSubrangeBaseTypeChanged(self, event): |
|
530 |
self.RefreshBoundsRange() |
|
531 |
self.RefreshTypeInfos() |
|
532 |
event.Skip() |
|
533 |
||
534 |
def OnSubrangeMinimumChanged(self, event): |
|
535 |
if not self.Initializing: |
|
536 |
wx.CallAfter(self.SubrangeMinimum.SetValue, min(self.SubrangeMaximum.GetValue(), self.SubrangeMinimum.GetValue())) |
|
537 |
wx.CallAfter(self.RefreshSubrangeInitialValueRange) |
|
538 |
wx.CallAfter(self.RefreshTypeInfos) |
|
539 |
event.Skip() |
|
540 |
||
541 |
def OnSubrangeMaximumChanged(self, event): |
|
542 |
if not self.Initializing: |
|
543 |
wx.CallAfter(self.SubrangeMaximum.SetValue, max(self.SubrangeMinimum.GetValue(), self.SubrangeMaximum.GetValue())) |
|
544 |
wx.CallAfter(self.RefreshSubrangeInitialValueRange) |
|
545 |
wx.CallAfter(self.RefreshTypeInfos) |
|
546 |
event.Skip() |
|
547 |
||
548 |
def OnDimensionsChanged(self, event): |
|
549 |
wx.CallAfter(self.RefreshTypeInfos) |
|
550 |
event.Skip() |
|
551 |
||
552 |
def OnEnumeratedValueEndEdit(self, event): |
|
553 |
text = event.GetText() |
|
554 |
values = self.EnumeratedValues.GetStrings() |
|
555 |
index = event.GetIndex() |
|
556 |
if index >= len(values) or values[index].upper() != text.upper(): |
|
557 |
if text.upper() in [value.upper() for value in values]: |
|
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
558 |
message = wx.MessageDialog(self, _("\"%s\" value already defined!") % text, _("Error"), wx.OK | wx.ICON_ERROR) |
814 | 559 |
message.ShowModal() |
560 |
message.Destroy() |
|
561 |
event.Veto() |
|
562 |
elif text.upper() in IEC_KEYWORDS: |
|
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
563 |
message = wx.MessageDialog(self, _("\"%s\" is a keyword. It can't be used!") % text, _("Error"), wx.OK | wx.ICON_ERROR) |
814 | 564 |
message.ShowModal() |
565 |
message.Destroy() |
|
566 |
else: |
|
567 |
initial_selected = None |
|
568 |
if index < len(values) and self.EnumeratedInitialValue.GetStringSelection() == values[index]: |
|
569 |
initial_selected = text |
|
570 |
wx.CallAfter(self.RefreshEnumeratedValues, initial_selected) |
|
571 |
wx.CallAfter(self.RefreshTypeInfos) |
|
572 |
event.Skip() |
|
573 |
else: |
|
574 |
event.Skip() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
575 |
|
814 | 576 |
def OnEnumeratedValuesChanged(self, event): |
577 |
wx.CallAfter(self.RefreshEnumeratedValues) |
|
578 |
wx.CallAfter(self.RefreshTypeInfos) |
|
579 |
event.Skip() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
580 |
|
1658
ba6a6d6e989c
fix twice shown error message box, when wrong non-valid IEC identifier entered
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
581 |
def ShowErrorMessage(self, message): |
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
582 |
dialog = wx.MessageDialog(self, message, _("Error"), wx.OK | wx.ICON_ERROR) |
1658
ba6a6d6e989c
fix twice shown error message box, when wrong non-valid IEC identifier entered
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
583 |
dialog.ShowModal() |
ba6a6d6e989c
fix twice shown error message box, when wrong non-valid IEC identifier entered
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
584 |
dialog.Destroy() |
1735
c02818d7e29f
clean-up: fix PEP8 W293 blank line contains whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1734
diff
changeset
|
585 |
|
814 | 586 |
def OnStructureElementsGridCellChange(self, event): |
587 |
row, col = event.GetRow(), event.GetCol() |
|
947 | 588 |
colname = self.StructureElementsTable.GetColLabelValue(col, False) |
814 | 589 |
value = self.StructureElementsTable.GetValue(row, col) |
590 |
if colname == "Name": |
|
1658
ba6a6d6e989c
fix twice shown error message box, when wrong non-valid IEC identifier entered
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
591 |
message = None |
814 | 592 |
if not TestIdentifier(value): |
1734
750eeb7230a1
clean-up: fix some PEP8 E228 missing whitespace around modulo operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1658
diff
changeset
|
593 |
message = _("\"%s\" is not a valid identifier!") % value |
814 | 594 |
elif value.upper() in IEC_KEYWORDS: |
1734
750eeb7230a1
clean-up: fix some PEP8 E228 missing whitespace around modulo operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1658
diff
changeset
|
595 |
message = _("\"%s\" is a keyword. It can't be used!") % value |
1753
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
596 |
# elif value.upper() in self.PouNames: |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
597 |
# message = _("A pou with \"%s\" as name exists!")%value |
814 | 598 |
elif value.upper() in [var["Name"].upper() for idx, var in enumerate(self.StructureElementsTable.GetData()) if idx != row]: |
1734
750eeb7230a1
clean-up: fix some PEP8 E228 missing whitespace around modulo operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1658
diff
changeset
|
599 |
message = _("An element named \"%s\" already exists in this structure!") % value |
814 | 600 |
else: |
601 |
self.RefreshTypeInfos() |
|
602 |
wx.CallAfter(self.StructureElementsTable.ResetView, self.StructureElementsGrid) |
|
1753
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
603 |
# old_value = self.Table.GetOldValue() |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
604 |
# if old_value != "": |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
605 |
# self.Controler.UpdateEditedElementUsedVariable(self.TagName, old_value, value) |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
606 |
# self.Controler.BufferProject() |
814 | 607 |
event.Skip() |
1658
ba6a6d6e989c
fix twice shown error message box, when wrong non-valid IEC identifier entered
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
608 |
|
ba6a6d6e989c
fix twice shown error message box, when wrong non-valid IEC identifier entered
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
609 |
if message is not None: |
ba6a6d6e989c
fix twice shown error message box, when wrong non-valid IEC identifier entered
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
610 |
event.Veto() |
ba6a6d6e989c
fix twice shown error message box, when wrong non-valid IEC identifier entered
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
611 |
wx.CallAfter(self.ShowErrorMessage, message) |
814 | 612 |
else: |
613 |
self.RefreshTypeInfos() |
|
614 |
wx.CallAfter(self.StructureElementsTable.ResetView, self.StructureElementsGrid) |
|
615 |
event.Skip() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
616 |
|
814 | 617 |
def OnStructureElementsGridSelectCell(self, event): |
618 |
wx.CallAfter(self.RefreshStructureButtons) |
|
619 |
event.Skip() |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
620 |
|
814 | 621 |
def OnStructureElementsGridEditorShown(self, event): |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
622 |
row, col = event.GetRow(), event.GetCol() |
947 | 623 |
if self.StructureElementsTable.GetColLabelValue(col, False) == "Type": |
814 | 624 |
type_menu = wx.Menu(title='') |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
625 |
|
814 | 626 |
base_menu = wx.Menu(title='') |
627 |
for base_type in self.Controler.GetBaseTypes(): |
|
628 |
new_id = wx.NewId() |
|
629 |
AppendMenu(base_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=base_type) |
|
630 |
self.Bind(wx.EVT_MENU, self.GetElementTypeFunction(base_type), id=new_id) |
|
631 |
type_menu.AppendMenu(wx.NewId(), _("Base Types"), base_menu) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
632 |
|
814 | 633 |
datatype_menu = wx.Menu(title='') |
634 |
for datatype in self.Controler.GetDataTypes(self.TagName, False): |
|
635 |
new_id = wx.NewId() |
|
636 |
AppendMenu(datatype_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=datatype) |
|
637 |
self.Bind(wx.EVT_MENU, self.GetElementTypeFunction(datatype), id=new_id) |
|
638 |
type_menu.AppendMenu(wx.NewId(), _("User Data Types"), datatype_menu) |
|
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
639 |
|
864
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
640 |
new_id = wx.NewId() |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
641 |
AppendMenu(type_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=_("Array")) |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
642 |
self.Bind(wx.EVT_MENU, self.ElementArrayTypeFunction, id=new_id) |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
643 |
|
1753
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
644 |
# functionblock_menu = wx.Menu(title='') |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
645 |
# bodytype = self.Controler.GetEditedElementBodyType(self.TagName) |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
646 |
# pouname, poutype = self.Controler.GetEditedElementType(self.TagName) |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
647 |
# if classtype in ["Input","Output","InOut","External","Global"] or poutype != "function" and bodytype in ["ST", "IL"]: |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
648 |
# for functionblock_type in self.Controler.GetFunctionBlockTypes(self.TagName): |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
649 |
# new_id = wx.NewId() |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
650 |
# AppendMenu(functionblock_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=functionblock_type) |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
651 |
# self.Bind(wx.EVT_MENU, self.GetVariableTypeFunction(functionblock_type), id=new_id) |
19f19c66b67e
clean-up: fix most PEP8 E266 too many leading '#' for block comment
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1749
diff
changeset
|
652 |
# type_menu.AppendMenu(wx.NewId(), _("Function Block Types"), functionblock_menu) |
864
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
653 |
|
814 | 654 |
rect = self.StructureElementsGrid.BlockToDeviceRect((row, col), (row, col)) |
655 |
self.StructureElementsGrid.PopupMenuXY(type_menu, rect.x + rect.width, rect.y + self.StructureElementsGrid.GetColLabelSize()) |
|
656 |
type_menu.Destroy() |
|
657 |
event.Veto() |
|
658 |
else: |
|
659 |
event.Skip() |
|
660 |
||
661 |
def GetElementTypeFunction(self, base_type): |
|
662 |
def ElementTypeFunction(event): |
|
663 |
row = self.StructureElementsGrid.GetGridCursorRow() |
|
664 |
self.StructureElementsTable.SetValueByName(row, "Type", base_type) |
|
665 |
self.RefreshTypeInfos() |
|
666 |
self.StructureElementsTable.ResetView(self.StructureElementsGrid) |
|
667 |
return ElementTypeFunction |
|
668 |
||
864
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
669 |
def ElementArrayTypeFunction(self, event): |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
670 |
row = self.StructureElementsGrid.GetGridCursorRow() |
1412
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
671 |
dialog = ArrayTypeDialog(self, |
50192dd2f5ff
Added plcopen.definitions.DefaultType, set to INT.
Edouard Tisserant
parents:
947
diff
changeset
|
672 |
self.Controler.GetDataTypes(self.TagName), |
864
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
673 |
self.StructureElementsTable.GetValueByName(row, "Type")) |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
674 |
if dialog.ShowModal() == wx.ID_OK: |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
675 |
self.StructureElementsTable.SetValueByName(row, "Type", dialog.GetValue()) |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
676 |
self.RefreshTypeInfos() |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
677 |
self.StructureElementsTable.ResetView(self.StructureElementsGrid) |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
678 |
dialog.Destroy() |
bf4f7f0801b9
Adding support for direct array declaration in structure element declaration
Laurent Bessard
parents:
814
diff
changeset
|
679 |
|
814 | 680 |
def RefreshDisplayedInfos(self): |
681 |
selected = DATATYPE_TYPES_DICT[self.DerivationType.GetStringSelection()] |
|
682 |
if selected != self.CurrentPanel: |
|
683 |
if self.CurrentPanel == "Directly": |
|
684 |
self.DirectlyPanel.Hide() |
|
685 |
elif self.CurrentPanel == "Subrange": |
|
686 |
self.SubrangePanel.Hide() |
|
687 |
elif self.CurrentPanel == "Enumerated": |
|
688 |
self.EnumeratedPanel.Hide() |
|
689 |
elif self.CurrentPanel == "Array": |
|
690 |
self.ArrayPanel.Hide() |
|
691 |
elif self.CurrentPanel == "Structure": |
|
692 |
self.StructurePanel.Hide() |
|
693 |
self.CurrentPanel = selected |
|
694 |
if selected == "Directly": |
|
695 |
self.DirectlyPanel.Show() |
|
696 |
elif selected == "Subrange": |
|
697 |
self.SubrangePanel.Show() |
|
698 |
elif selected == "Enumerated": |
|
699 |
self.EnumeratedPanel.Show() |
|
700 |
elif selected == "Array": |
|
701 |
self.ArrayPanel.Show() |
|
702 |
elif selected == "Structure": |
|
703 |
self.StructurePanel.Show() |
|
704 |
self.MainSizer.Layout() |
|
705 |
||
706 |
def RefreshEnumeratedValues(self, initial_selected=None): |
|
707 |
if initial_selected is None: |
|
708 |
initial_selected = self.EnumeratedInitialValue.GetStringSelection() |
|
709 |
self.EnumeratedInitialValue.Clear() |
|
710 |
self.EnumeratedInitialValue.Append("") |
|
711 |
for value in self.EnumeratedValues.GetStrings(): |
|
712 |
self.EnumeratedInitialValue.Append(value) |
|
713 |
self.EnumeratedInitialValue.SetStringSelection(initial_selected) |
|
714 |
||
715 |
def RefreshBoundsRange(self): |
|
716 |
range = self.Controler.GetDataTypeRange(self.SubrangeBaseType.GetStringSelection()) |
|
717 |
if range is not None: |
|
718 |
min_value, max_value = range |
|
719 |
self.SubrangeMinimum.SetRange(min_value, max_value) |
|
720 |
self.SubrangeMinimum.SetValue(min(max(min_value, self.SubrangeMinimum.GetValue()), max_value)) |
|
721 |
self.SubrangeMaximum.SetRange(min_value, max_value) |
|
722 |
self.SubrangeMaximum.SetValue(min(max(min_value, self.SubrangeMaximum.GetValue()), max_value)) |
|
723 |
||
724 |
def RefreshSubrangeInitialValueRange(self): |
|
725 |
self.SubrangeInitialValue.SetRange(self.SubrangeMinimum.GetValue(), self.SubrangeMaximum.GetValue()) |
|
726 |
||
727 |
def RefreshTypeInfos(self): |
|
728 |
selected = DATATYPE_TYPES_DICT[self.DerivationType.GetStringSelection()] |
|
1739
ec153828ded2
clean-up: fix PEP8 E203 whitespace before ':' and whitespace before ','
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1736
diff
changeset
|
729 |
infos = {"type": selected} |
814 | 730 |
if selected == "Directly": |
731 |
infos["base_type"] = self.DirectlyBaseType.GetStringSelection() |
|
732 |
infos["initial"] = self.DirectlyInitialValue.GetValue() |
|
733 |
elif selected == "Subrange": |
|
734 |
infos["base_type"] = self.SubrangeBaseType.GetStringSelection() |
|
735 |
infos["min"] = str(self.SubrangeMinimum.GetValue()) |
|
736 |
infos["max"] = str(self.SubrangeMaximum.GetValue()) |
|
737 |
initial_value = self.SubrangeInitialValue.GetValue() |
|
738 |
if initial_value == infos["min"]: |
|
739 |
infos["initial"] = "" |
|
740 |
else: |
|
741 |
infos["initial"] = str(initial_value) |
|
742 |
elif selected == "Enumerated": |
|
743 |
infos["values"] = self.EnumeratedValues.GetStrings() |
|
744 |
infos["initial"] = self.EnumeratedInitialValue.GetStringSelection() |
|
745 |
elif selected == "Array": |
|
746 |
infos["base_type"] = self.ArrayBaseType.GetStringSelection() |
|
747 |
infos["dimensions"] = [] |
|
748 |
for dimensions in self.ArrayDimensions.GetStrings(): |
|
749 |
result = DIMENSION_MODEL.match(dimensions) |
|
750 |
if result is None: |
|
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
751 |
message = wx.MessageDialog(self, _("\"%s\" value isn't a valid array dimension!") % dimensions, _("Error"), wx.OK | wx.ICON_ERROR) |
814 | 752 |
message.ShowModal() |
753 |
message.Destroy() |
|
754 |
self.RefreshView() |
|
755 |
return |
|
756 |
bounds = result.groups() |
|
757 |
if int(bounds[0]) >= int(bounds[1]): |
|
1745
f9d32913bad4
clean-up: fix PEP8 E227 missing whitespace around bitwise or shift operator
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
758 |
message = wx.MessageDialog(self, _("\"%s\" value isn't a valid array dimension!\nRight value must be greater than left value.") % dimensions, _("Error"), wx.OK | wx.ICON_ERROR) |
814 | 759 |
message.ShowModal() |
760 |
message.Destroy() |
|
761 |
self.RefreshView() |
|
762 |
return |
|
763 |
infos["dimensions"].append(bounds) |
|
764 |
infos["initial"] = self.ArrayInitialValue.GetValue() |
|
765 |
elif selected == "Structure": |
|
766 |
infos["elements"] = self.StructureElementsTable.GetData() |
|
767 |
infos["initial"] = "" |
|
768 |
self.Controler.SetDataTypeInfos(self.TagName, infos) |
|
769 |
self.ParentWindow.RefreshTitle() |
|
770 |
self.ParentWindow.RefreshFileMenu() |
|
771 |
self.ParentWindow.RefreshEditMenu() |
|
772 |
||
773 |
#------------------------------------------------------------------------------- |
|
774 |
# Highlights showing functions |
|
775 |
#------------------------------------------------------------------------------- |
|
776 |
||
777 |
def OnRefreshHighlightsTimer(self, event): |
|
778 |
self.RefreshView() |
|
779 |
event.Skip() |
|
780 |
||
781 |
def ClearHighlights(self, highlight_type=None): |
|
782 |
if highlight_type is None: |
|
783 |
self.Highlights = [] |
|
784 |
else: |
|
785 |
self.Highlights = [(infos, start, end, highlight) for (infos, start, end, highlight) in self.Highlights if highlight != highlight_type] |
|
786 |
for control in self.HighlightControls.itervalues(): |
|
787 |
if isinstance(control, (wx.ComboBox, wx.SpinCtrl)): |
|
788 |
control.SetBackgroundColour(wx.NullColour) |
|
789 |
control.SetForegroundColour(wx.NullColour) |
|
790 |
elif isinstance(control, wx.TextCtrl): |
|
791 |
value = control.GetValue() |
|
792 |
control.SetStyle(0, len(value), wx.TextAttr(wx.NullColour)) |
|
793 |
elif isinstance(control, wx.gizmos.EditableListBox): |
|
794 |
listctrl = control.GetListCtrl() |
|
795 |
for i in xrange(listctrl.GetItemCount()): |
|
796 |
listctrl.SetItemBackgroundColour(i, wx.NullColour) |
|
797 |
listctrl.SetItemTextColour(i, wx.NullColour) |
|
798 |
self.StructureElementsTable.ClearHighlights(highlight_type) |
|
799 |
self.RefreshView() |
|
800 |
||
1739
ec153828ded2
clean-up: fix PEP8 E203 whitespace before ':' and whitespace before ','
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1736
diff
changeset
|
801 |
def AddHighlight(self, infos, start, end, highlight_type): |
814 | 802 |
self.Highlights.append((infos, start, end, highlight_type)) |
803 |
self.RefreshHighlightsTimer.Start(int(REFRESH_HIGHLIGHT_PERIOD * 1000), oneShot=True) |
|
804 |
||
805 |
def ShowHighlights(self): |
|
806 |
type_infos = self.Controler.GetDataTypeInfos(self.TagName) |
|
807 |
for infos, start, end, highlight_type in self.Highlights: |
|
808 |
if infos[0] == "struct": |
|
809 |
self.StructureElementsTable.AddHighlight(infos[1:], highlight_type) |
|
810 |
else: |
|
811 |
control = self.HighlightControls.get((type_infos["type"], infos[0]), None) |
|
812 |
if control is not None: |
|
813 |
if isinstance(control, (wx.ComboBox, wx.SpinCtrl)): |
|
814 |
control.SetBackgroundColour(highlight_type[0]) |
|
815 |
control.SetForegroundColour(highlight_type[1]) |
|
816 |
elif isinstance(control, wx.TextCtrl): |
|
817 |
control.SetStyle(start[1], end[1] + 1, wx.TextAttr(highlight_type[1], highlight_type[0])) |
|
818 |
elif isinstance(control, wx.gizmos.EditableListBox): |
|
819 |
listctrl = control.GetListCtrl() |
|
820 |
listctrl.SetItemBackgroundColour(infos[1], highlight_type[0]) |
|
821 |
listctrl.SetItemTextColour(infos[1], highlight_type[1]) |
|
822 |
listctrl.Select(listctrl.FocusedItem, False) |