author | Edouard Tisserant |
Fri, 09 Jul 2021 15:47:43 +0200 | |
branch | svghmi |
changeset 3271 | 561dbd1e3e04 |
parent 2437 | 105c20fdeb19 |
child 3303 | 0ffb41625592 |
child 3649 | 61fa60130ad6 |
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:
1498
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:
1498
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:
1498
diff
changeset
|
7 |
# Copyright (C) 2012: 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:
1498
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:
1498
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:
1498
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:
1498
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:
1498
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:
1498
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:
1498
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:
1498
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:
1498
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:
1498
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:
1498
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:
1498
diff
changeset
|
23 |
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. |
814 | 24 |
|
1881
091005ec69c4
fix pylint py3k conversion warning: "(no-absolute-import) import missing `from __future__ import absolute_import`"
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1878
diff
changeset
|
25 |
|
091005ec69c4
fix pylint py3k conversion warning: "(no-absolute-import) import missing `from __future__ import absolute_import`"
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1878
diff
changeset
|
26 |
from __future__ import absolute_import |
2437
105c20fdeb19
python3 support: pylint, W1619 #(old-division) division w/o __future__ statement
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1948
diff
changeset
|
27 |
from __future__ import division |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
28 |
from collections import namedtuple |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
29 |
|
814 | 30 |
import wx |
1281 | 31 |
import wx.lib.agw.customtreectrl as CT |
814 | 32 |
import wx.lib.buttons |
33 |
||
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
34 |
from plcopen.types_enums import * |
1783
3311eea28d56
clean-up: fix PEP8 E402 module level import not at top of file
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1782
diff
changeset
|
35 |
|
3311eea28d56
clean-up: fix PEP8 E402 module level import not at top of file
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1782
diff
changeset
|
36 |
from util.BitmapLibrary import GetBitmap |
3311eea28d56
clean-up: fix PEP8 E402 module level import not at top of file
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1782
diff
changeset
|
37 |
|
3311eea28d56
clean-up: fix PEP8 E402 module level import not at top of file
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1782
diff
changeset
|
38 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
39 |
# Customize CustomTreeItem for adding icon on item right |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
40 |
CT.GenericTreeItem._rightimages = [] |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
41 |
|
1736
7e61baa047f0
clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1730
diff
changeset
|
42 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
43 |
def SetRightImages(self, images): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
44 |
self._rightimages = images |
1749
d73b64672238
clean-up: fix PEP8 E305 expected 2 blank lines after class or function definition
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
45 |
|
d73b64672238
clean-up: fix PEP8 E305 expected 2 blank lines after class or function definition
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
46 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
47 |
CT.GenericTreeItem.SetRightImages = SetRightImages |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
48 |
|
1736
7e61baa047f0
clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1730
diff
changeset
|
49 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
50 |
def GetRightImages(self): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
51 |
return self._rightimages |
1749
d73b64672238
clean-up: fix PEP8 E305 expected 2 blank lines after class or function definition
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
52 |
|
d73b64672238
clean-up: fix PEP8 E305 expected 2 blank lines after class or function definition
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
53 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
54 |
CT.GenericTreeItem.GetRightImages = GetRightImages |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
55 |
|
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
56 |
|
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
57 |
class CustomTreeCtrlWithRightImage(CT.CustomTreeCtrl): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
58 |
|
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
59 |
def SetRightImageList(self, imageList): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
60 |
self._imageListRight = imageList |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
61 |
|
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
62 |
def GetLineHeight(self, item): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
63 |
height = CT.CustomTreeCtrl.GetLineHeight(self, item) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
64 |
rightimages = item.GetRightImages() |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
65 |
if len(rightimages) > 0: |
1847
6198190bc121
explicitly mark unused variables found by pylint with _ or dummy
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1846
diff
changeset
|
66 |
_r_image_w, r_image_h = self._imageListRight.GetSize(rightimages[0]) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
67 |
return max(height, r_image_h + 8) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
68 |
return height |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
69 |
|
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
70 |
def GetItemRightImagesBBox(self, item): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
71 |
rightimages = item.GetRightImages() |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
72 |
if len(rightimages) > 0: |
1847
6198190bc121
explicitly mark unused variables found by pylint with _ or dummy
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1846
diff
changeset
|
73 |
w, _h = self.GetClientSize() |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
74 |
total_h = self.GetLineHeight(item) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
75 |
r_image_w, r_image_h = self._imageListRight.GetSize(rightimages[0]) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
76 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
77 |
bbox_width = (r_image_w + 4) * len(rightimages) + 4 |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
78 |
bbox_height = r_image_h + 8 |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
79 |
bbox_x = w - bbox_width |
2437
105c20fdeb19
python3 support: pylint, W1619 #(old-division) division w/o __future__ statement
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1948
diff
changeset
|
80 |
bbox_y = item.GetY() + ((total_h > r_image_h) and [(total_h-r_image_h)//2] or [0])[0] |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
81 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
82 |
return wx.Rect(bbox_x, bbox_y, bbox_width, bbox_height) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
83 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
84 |
return None |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
85 |
|
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
86 |
def IsOverItemRightImage(self, item, point): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
87 |
rightimages = item.GetRightImages() |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
88 |
if len(rightimages) > 0: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
89 |
point = self.CalcUnscrolledPosition(point) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
90 |
r_image_w, r_image_h = self._imageListRight.GetSize(rightimages[0]) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
91 |
images_bbx = self.GetItemRightImagesBBox(item) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
92 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
93 |
rect = wx.Rect(images_bbx.x + 4, images_bbx.y + 4, |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
94 |
r_image_w, r_image_h) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
95 |
for r_image in rightimages: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
96 |
if rect.Inside(point): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
97 |
return r_image |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
98 |
rect.x += r_image_w + 4 |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
99 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
100 |
return None |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
101 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
102 |
def PaintItem(self, item, dc, level, align): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
103 |
CT.CustomTreeCtrl.PaintItem(self, item, dc, level, align) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
104 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
105 |
rightimages = item.GetRightImages() |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
106 |
if len(rightimages) > 0: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
107 |
images_bbx = self.GetItemRightImagesBBox(item) |
1847
6198190bc121
explicitly mark unused variables found by pylint with _ or dummy
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1846
diff
changeset
|
108 |
r_image_w, _r_image_h = self._imageListRight.GetSize(rightimages[0]) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
109 |
|
1636
ad3dee8b6d48
change white background for icons in PouInstanceVariablePanel to transparent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1571
diff
changeset
|
110 |
dc.SetBrush(wx.TRANSPARENT_BRUSH) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
111 |
dc.SetPen(wx.TRANSPARENT_PEN) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
112 |
|
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
113 |
dc.DrawRectangle(images_bbx.x, images_bbx.y, |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
114 |
images_bbx.width, images_bbx.height) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
115 |
x_pos = images_bbx.x + 4 |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
116 |
for r_image in rightimages: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
117 |
self._imageListRight.Draw( |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
118 |
r_image, dc, x_pos, images_bbx.y + 4, |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
119 |
wx.IMAGELIST_DRAW_TRANSPARENT) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
120 |
x_pos += r_image_w + 4 |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
121 |
|
1749
d73b64672238
clean-up: fix PEP8 E305 expected 2 blank lines after class or function definition
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1742
diff
changeset
|
122 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
123 |
_ButtonCallbacks = namedtuple("ButtonCallbacks", ["leftdown", "dclick"]) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
124 |
|
1736
7e61baa047f0
clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1730
diff
changeset
|
125 |
|
814 | 126 |
class PouInstanceVariablesPanel(wx.Panel): |
1362
077bcba2d485
Cleaner matplotlib import preventing noisy warnings
Edouard Tisserant
parents:
1348
diff
changeset
|
127 |
|
814 | 128 |
def __init__(self, parent, window, controller, debug): |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
129 |
wx.Panel.__init__(self, name='PouInstanceTreePanel', |
1768
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
130 |
parent=parent, pos=wx.Point(0, 0), |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
131 |
size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL) |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
132 |
|
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
133 |
self.ParentButton = wx.lib.buttons.GenBitmapButton( |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
134 |
self, bitmap=GetBitmap("top"), size=wx.Size(28, 28), style=wx.NO_BORDER) |
814 | 135 |
self.ParentButton.SetToolTipString(_("Parent instance")) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
136 |
self.Bind(wx.EVT_BUTTON, self.OnParentButtonClick, |
1768
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
137 |
self.ParentButton) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
138 |
|
821
3667bb14aeca
Fix bug debug instance button not visible in PouInstanceVariablesPanel when instance path is too long
laurent
parents:
814
diff
changeset
|
139 |
self.InstanceChoice = wx.ComboBox(self, size=wx.Size(0, 0), style=wx.CB_READONLY) |
814 | 140 |
self.Bind(wx.EVT_COMBOBOX, self.OnInstanceChoiceChanged, |
1768
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
141 |
self.InstanceChoice) |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
142 |
|
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
143 |
self.DebugButton = wx.lib.buttons.GenBitmapButton( |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
144 |
self, bitmap=GetBitmap("debug_instance"), size=wx.Size(28, 28), style=wx.NO_BORDER) |
1082
5a08404d5dda
Fixed bug in PouInstanceVariablesPanel buttons tooltips
Laurent Bessard
parents:
1031
diff
changeset
|
145 |
self.DebugButton.SetToolTipString(_("Debug instance")) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
146 |
self.Bind(wx.EVT_BUTTON, self.OnDebugButtonClick, |
1768
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
147 |
self.DebugButton) |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
148 |
|
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
149 |
self.VariablesList = CustomTreeCtrlWithRightImage( |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
150 |
self, |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
151 |
style=wx.SUNKEN_BORDER, |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
152 |
agwStyle=(CT.TR_NO_BUTTONS | |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
153 |
CT.TR_SINGLE | |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
154 |
CT.TR_HAS_VARIABLE_ROW_HEIGHT | |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
155 |
CT.TR_HIDE_ROOT | |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
156 |
CT.TR_NO_LINES | |
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
157 |
getattr(CT, "TR_ALIGN_WINDOWS_RIGHT", CT.TR_ALIGN_WINDOWS))) |
814 | 158 |
self.VariablesList.SetIndent(0) |
159 |
self.VariablesList.SetSpacing(5) |
|
1740
b789b695b5c6
clean-up: fix PEP8 E231 missing whitespace after ':' or ','
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1736
diff
changeset
|
160 |
self.VariablesList.DoSelectItem = lambda *x, **y: True |
814 | 161 |
self.VariablesList.Bind(CT.EVT_TREE_ITEM_ACTIVATED, |
1768
691083b5682a
clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1754
diff
changeset
|
162 |
self.OnVariablesListItemActivated) |
814 | 163 |
self.VariablesList.Bind(wx.EVT_LEFT_DOWN, self.OnVariablesListLeftDown) |
1031
5743398071eb
Fix bug when pressing left arrow key in PouInstanceVariablesPanel
Laurent Bessard
parents:
930
diff
changeset
|
164 |
self.VariablesList.Bind(wx.EVT_KEY_DOWN, self.OnVariablesListKeyDown) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
165 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
166 |
self.TreeRightImageList = wx.ImageList(24, 24) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
167 |
self.EditImage = self.TreeRightImageList.Add(GetBitmap("edit")) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
168 |
self.DebugInstanceImage = self.TreeRightImageList.Add(GetBitmap("debug_instance")) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
169 |
self.VariablesList.SetRightImageList(self.TreeRightImageList) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
170 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
171 |
self.ButtonCallBacks = { |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
172 |
self.EditImage: _ButtonCallbacks( |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
173 |
self.EditButtonCallback, None), |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
174 |
self.DebugInstanceImage: _ButtonCallbacks( |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
175 |
self.DebugButtonCallback, self.DebugButtonDClickCallback)} |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
176 |
|
814 | 177 |
buttons_sizer = wx.FlexGridSizer(cols=3, hgap=0, rows=1, vgap=0) |
178 |
buttons_sizer.AddWindow(self.ParentButton) |
|
179 |
buttons_sizer.AddWindow(self.InstanceChoice, flag=wx.GROW) |
|
180 |
buttons_sizer.AddWindow(self.DebugButton) |
|
181 |
buttons_sizer.AddGrowableCol(1) |
|
182 |
buttons_sizer.AddGrowableRow(0) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
183 |
|
814 | 184 |
main_sizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0) |
185 |
main_sizer.AddSizer(buttons_sizer, flag=wx.GROW) |
|
186 |
main_sizer.AddWindow(self.VariablesList, flag=wx.GROW) |
|
187 |
main_sizer.AddGrowableCol(0) |
|
188 |
main_sizer.AddGrowableRow(1) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
189 |
|
814 | 190 |
self.SetSizer(main_sizer) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
191 |
|
814 | 192 |
self.ParentWindow = window |
193 |
self.Controller = controller |
|
194 |
self.Debug = debug |
|
195 |
if not self.Debug: |
|
196 |
self.DebugButton.Hide() |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
197 |
|
814 | 198 |
self.PouTagName = None |
199 |
self.PouInfos = None |
|
200 |
self.PouInstance = None |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
201 |
|
814 | 202 |
def __del__(self): |
203 |
self.Controller = None |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
204 |
|
814 | 205 |
def SetTreeImageList(self, tree_image_list): |
206 |
self.VariablesList.SetImageList(tree_image_list) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
207 |
|
814 | 208 |
def SetController(self, controller): |
209 |
self.Controller = controller |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
210 |
|
814 | 211 |
self.RefreshView() |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
212 |
|
814 | 213 |
def SetPouType(self, tagname, pou_instance=None): |
1222
775b48a2be3b
Fixed flickering and lag when refreshing PouInstanceVariablesPanel
Laurent Bessard
parents:
1217
diff
changeset
|
214 |
if self.Controller is not None: |
1233
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
215 |
if tagname == "Project": |
915 | 216 |
config_name = self.Controller.GetProjectMainConfigurationName() |
217 |
if config_name is not None: |
|
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
218 |
tagname = ComputeConfigurationName(config_name) |
915 | 219 |
if pou_instance is not None: |
220 |
self.PouInstance = pou_instance |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
221 |
|
1233
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
222 |
if self.PouTagName != tagname: |
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
223 |
self.PouTagName = tagname |
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
224 |
self.RefreshView() |
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
225 |
else: |
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
226 |
self.RefreshInstanceChoice() |
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
227 |
else: |
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
228 |
self.RefreshView() |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
229 |
|
814 | 230 |
def ResetView(self): |
231 |
self.Controller = None |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
232 |
|
814 | 233 |
self.PouTagName = None |
234 |
self.PouInfos = None |
|
235 |
self.PouInstance = None |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
236 |
|
814 | 237 |
self.RefreshView() |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
238 |
|
814 | 239 |
def RefreshView(self): |
1222
775b48a2be3b
Fixed flickering and lag when refreshing PouInstanceVariablesPanel
Laurent Bessard
parents:
1217
diff
changeset
|
240 |
self.Freeze() |
814 | 241 |
self.VariablesList.DeleteAllItems() |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
242 |
|
814 | 243 |
if self.Controller is not None and self.PouTagName is not None: |
1669
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
244 |
if self.PouTagName.split('::')[0] in ['A', 'T']: |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
245 |
self.PouInfos = self.Controller.GetPouVariables('P::%s' % self.PouTagName.split('::')[1], self.Debug) |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
246 |
else: |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
247 |
self.PouInfos = self.Controller.GetPouVariables(self.PouTagName, self.Debug) |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
248 |
if None in self.Controller.GetEditedElementType(self.PouTagName, self.Debug) and self.PouInfos is not None: |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
249 |
self.PouInfos.debug = False |
814 | 250 |
else: |
251 |
self.PouInfos = None |
|
252 |
if self.PouInfos is not None: |
|
1669
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
253 |
root = self.VariablesList.AddRoot("", data=self.PouInfos) |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
254 |
for var_infos in self.PouInfos.variables: |
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
255 |
if var_infos.type is not None: |
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
256 |
text = "%s (%s)" % (var_infos.name, var_infos.type) |
814 | 257 |
else: |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
258 |
text = var_infos.name |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
259 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
260 |
right_images = [] |
1364
e9e17d3b2849
Remove old debug panels and viewers not using matplotlib
Laurent Bessard
parents:
1362
diff
changeset
|
261 |
if var_infos.edit: |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
262 |
right_images.append(self.EditImage) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
263 |
|
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
264 |
if var_infos.debug and self.Debug: |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
265 |
right_images.append(self.DebugInstanceImage) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
266 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
267 |
item = self.VariablesList.AppendItem(root, text) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
268 |
item.SetRightImages(right_images) |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
269 |
self.VariablesList.SetItemImage(item, self.ParentWindow.GetTreeImage(var_infos.var_class)) |
814 | 270 |
self.VariablesList.SetPyData(item, var_infos) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
271 |
|
1238
24577755485d
Fixed bug with InstanceChoice values in PouInstanceVariablesPanel
Laurent Bessard
parents:
1233
diff
changeset
|
272 |
self.RefreshInstanceChoice() |
1233
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
273 |
self.RefreshButtons() |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
274 |
|
1233
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
275 |
self.Thaw() |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
276 |
|
1233
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
277 |
def RefreshInstanceChoice(self): |
1238
24577755485d
Fixed bug with InstanceChoice values in PouInstanceVariablesPanel
Laurent Bessard
parents:
1233
diff
changeset
|
278 |
self.InstanceChoice.Clear() |
24577755485d
Fixed bug with InstanceChoice values in PouInstanceVariablesPanel
Laurent Bessard
parents:
1233
diff
changeset
|
279 |
self.InstanceChoice.SetValue("") |
1233
5e6d0969bb5d
Fixed bugs in refresh of PouInstanceVariablesPanel
Laurent Bessard
parents:
1222
diff
changeset
|
280 |
if self.Controller is not None and self.PouInfos is not None: |
814 | 281 |
instances = self.Controller.SearchPouInstances(self.PouTagName, self.Debug) |
282 |
for instance in instances: |
|
283 |
self.InstanceChoice.Append(instance) |
|
284 |
if len(instances) == 1: |
|
285 |
self.PouInstance = instances[0] |
|
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
286 |
if self.PouInfos.var_class in [ITEM_CONFIGURATION, ITEM_RESOURCE]: |
814 | 287 |
self.PouInstance = None |
288 |
self.InstanceChoice.SetSelection(0) |
|
289 |
elif self.PouInstance in instances: |
|
290 |
self.InstanceChoice.SetStringSelection(self.PouInstance) |
|
291 |
else: |
|
292 |
self.PouInstance = None |
|
293 |
self.InstanceChoice.SetValue(_("Select an instance")) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
294 |
|
814 | 295 |
def RefreshButtons(self): |
296 |
enabled = self.InstanceChoice.GetSelection() != -1 |
|
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
297 |
self.ParentButton.Enable(enabled and self.PouInfos.var_class != ITEM_CONFIGURATION) |
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
298 |
self.DebugButton.Enable(enabled and self.PouInfos.debug and self.Debug) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
299 |
|
814 | 300 |
root = self.VariablesList.GetRootItem() |
301 |
if root is not None and root.IsOk(): |
|
302 |
item, item_cookie = self.VariablesList.GetFirstChild(root) |
|
303 |
while item is not None and item.IsOk(): |
|
304 |
panel = self.VariablesList.GetItemWindow(item) |
|
305 |
if panel is not None: |
|
306 |
for child in panel.GetChildren(): |
|
307 |
if child.GetName() != "edit": |
|
308 |
child.Enable(enabled) |
|
309 |
item, item_cookie = self.VariablesList.GetNextChild(root, item_cookie) |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
310 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
311 |
def EditButtonCallback(self, infos): |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
312 |
var_class = infos.var_class |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
313 |
if var_class == ITEM_RESOURCE: |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
314 |
tagname = ComputeConfigurationResourceName( |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
315 |
self.InstanceChoice.GetStringSelection(), |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
316 |
infos.name) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
317 |
elif var_class == ITEM_TRANSITION: |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
318 |
tagname = ComputePouTransitionName( |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
319 |
self.PouTagName.split("::")[1], |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
320 |
infos.name) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
321 |
elif var_class == ITEM_ACTION: |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
322 |
tagname = ComputePouActionName( |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
323 |
self.PouTagName.split("::")[1], |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
324 |
infos.name) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
325 |
else: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
326 |
var_class = ITEM_POU |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
327 |
tagname = ComputePouName(infos.type) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
328 |
self.ParentWindow.EditProjectElement(var_class, tagname) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
329 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
330 |
def DebugButtonCallback(self, infos): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
331 |
if self.InstanceChoice.GetSelection() != -1: |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
332 |
var_class = infos.var_class |
1669
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
333 |
instance_path = self.InstanceChoice.GetStringSelection() |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
334 |
if self.PouTagName.split("::")[0] in ["A", "T"]: |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
335 |
pos = instance_path.rfind('.') |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
336 |
instance_path = instance_path[0:pos] |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
337 |
var_path = "%s.%s" % (instance_path, infos.name) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
338 |
if var_class in ITEMS_VARIABLE: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
339 |
self.ParentWindow.AddDebugVariable(var_path, force=True) |
826
098f822ef308
Adding transition and action in list of instances of SFC POU in PouInstanceVariablesPanel
laurent
parents:
821
diff
changeset
|
340 |
elif var_class == ITEM_TRANSITION: |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
341 |
self.ParentWindow.OpenDebugViewer( |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
342 |
var_class, |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
343 |
var_path, |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
344 |
ComputePouTransitionName( |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
345 |
self.PouTagName.split("::")[1], |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
346 |
infos.name)) |
826
098f822ef308
Adding transition and action in list of instances of SFC POU in PouInstanceVariablesPanel
laurent
parents:
821
diff
changeset
|
347 |
elif var_class == ITEM_ACTION: |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
348 |
self.ParentWindow.OpenDebugViewer( |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
349 |
var_class, |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
350 |
var_path, |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
351 |
ComputePouActionName( |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
352 |
self.PouTagName.split("::")[1], |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
353 |
infos.name)) |
814 | 354 |
else: |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
355 |
self.ParentWindow.OpenDebugViewer( |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
356 |
var_class, |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
357 |
var_path, |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
358 |
ComputePouName(infos.type)) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
359 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
360 |
def DebugButtonDClickCallback(self, infos): |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
361 |
if self.InstanceChoice.GetSelection() != -1: |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
362 |
if infos.var_class in ITEMS_VARIABLE: |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
363 |
self.ParentWindow.AddDebugVariable( |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
364 |
"%s.%s" % (self.InstanceChoice.GetStringSelection(), |
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
365 |
infos.name), |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
366 |
force=True, |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
367 |
graph=True) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
368 |
|
814 | 369 |
def ShowInstanceChoicePopup(self): |
370 |
self.InstanceChoice.SetFocusFromKbd() |
|
371 |
size = self.InstanceChoice.GetSize() |
|
372 |
event = wx.MouseEvent(wx.EVT_LEFT_DOWN._getEvtType()) |
|
2437
105c20fdeb19
python3 support: pylint, W1619 #(old-division) division w/o __future__ statement
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1948
diff
changeset
|
373 |
event.x = size.width // 2 |
105c20fdeb19
python3 support: pylint, W1619 #(old-division) division w/o __future__ statement
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1948
diff
changeset
|
374 |
event.y = size.height // 2 |
814 | 375 |
event.SetEventObject(self.InstanceChoice) |
1782
5b6ad7a7fd9d
clean-up: fix PEP8 E265 block comment should start with '# '
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1768
diff
changeset
|
376 |
# event = wx.KeyEvent(wx.EVT_KEY_DOWN._getEvtType()) |
5b6ad7a7fd9d
clean-up: fix PEP8 E265 block comment should start with '# '
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1768
diff
changeset
|
377 |
# event.m_keyCode = wx.WXK_SPACE |
814 | 378 |
self.InstanceChoice.GetEventHandler().ProcessEvent(event) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
379 |
|
814 | 380 |
def OnParentButtonClick(self, event): |
381 |
if self.InstanceChoice.GetSelection() != -1: |
|
382 |
parent_path = self.InstanceChoice.GetStringSelection().rsplit(".", 1)[0] |
|
383 |
tagname = self.Controller.GetPouInstanceTagName(parent_path, self.Debug) |
|
384 |
if tagname is not None: |
|
385 |
wx.CallAfter(self.SetPouType, tagname, parent_path) |
|
386 |
wx.CallAfter(self.ParentWindow.SelectProjectTreeItem, tagname) |
|
387 |
event.Skip() |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
388 |
|
814 | 389 |
def OnInstanceChoiceChanged(self, event): |
390 |
self.RefreshButtons() |
|
391 |
event.Skip() |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
392 |
|
814 | 393 |
def OnDebugButtonClick(self, event): |
394 |
if self.InstanceChoice.GetSelection() != -1: |
|
395 |
self.ParentWindow.OpenDebugViewer( |
|
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
396 |
self.PouInfos.var_class, |
814 | 397 |
self.InstanceChoice.GetStringSelection(), |
398 |
self.PouTagName) |
|
399 |
event.Skip() |
|
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
400 |
|
814 | 401 |
def OnVariablesListItemActivated(self, event): |
1189
93a4431a0cd8
Fixed bug in PouInstanceVariablesPanel, exploring child FunctionBlock variables if no instance selected
Laurent Bessard
parents:
1107
diff
changeset
|
402 |
selected_item = event.GetItem() |
93a4431a0cd8
Fixed bug in PouInstanceVariablesPanel, exploring child FunctionBlock variables if no instance selected
Laurent Bessard
parents:
1107
diff
changeset
|
403 |
if selected_item is not None and selected_item.IsOk(): |
93a4431a0cd8
Fixed bug in PouInstanceVariablesPanel, exploring child FunctionBlock variables if no instance selected
Laurent Bessard
parents:
1107
diff
changeset
|
404 |
item_infos = self.VariablesList.GetPyData(selected_item) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
405 |
if item_infos is not None: |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
406 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
407 |
item_button = self.VariablesList.IsOverItemRightImage( |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
408 |
selected_item, event.GetPoint()) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
409 |
if item_button is not None: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
410 |
callback = self.ButtonCallBacks[item_button].dclick |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
411 |
if callback is not None: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
412 |
callback(item_infos) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
413 |
|
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
414 |
elif item_infos.var_class not in ITEMS_VARIABLE: |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
415 |
instance_path = self.InstanceChoice.GetStringSelection() |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
416 |
if item_infos.var_class == ITEM_RESOURCE: |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
417 |
if instance_path != "": |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
418 |
tagname = ComputeConfigurationResourceName( |
1878
fb73a6b6622d
fix pylint warning '(bad-continuation) Wrong hanging indentation before block'
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1847
diff
changeset
|
419 |
instance_path, |
fb73a6b6622d
fix pylint warning '(bad-continuation) Wrong hanging indentation before block'
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1847
diff
changeset
|
420 |
item_infos.name) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
421 |
else: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
422 |
tagname = None |
814 | 423 |
else: |
1669
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
424 |
parent_infos = self.VariablesList.GetPyData(selected_item.GetParent()) |
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
425 |
if item_infos.var_class == ITEM_ACTION: |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
426 |
tagname = ComputePouActionName(parent_infos.type, item_infos.name) |
1669
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
427 |
elif item_infos.var_class == ITEM_TRANSITION: |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
428 |
tagname = ComputePouTransitionName(parent_infos.type, item_infos.name) |
1669
54da2cfe0180
fix debug button and variable tree generate for actions and transitions in POU instance variable panel
Surkov Sergey <surkovsv93@gmail.com>
parents:
1636
diff
changeset
|
429 |
else: |
1948
b9a3f771aaab
Moved some definitions away from controller class, and adaped references them through all code.
Edouard Tisserant
parents:
1881
diff
changeset
|
430 |
tagname = ComputePouName(item_infos.type) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
431 |
if tagname is not None: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
432 |
if instance_path != "": |
1348
aee0a7eb833a
Fixed pou variables instance information loading stylesheet
Laurent Bessard
parents:
1343
diff
changeset
|
433 |
item_path = "%s.%s" % (instance_path, item_infos.name) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
434 |
else: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
435 |
item_path = None |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
436 |
self.SetPouType(tagname, item_path) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
437 |
self.ParentWindow.SelectProjectTreeItem(tagname) |
814 | 438 |
event.Skip() |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
439 |
|
814 | 440 |
def OnVariablesListLeftDown(self, event): |
441 |
if self.InstanceChoice.GetSelection() == -1: |
|
442 |
wx.CallAfter(self.ShowInstanceChoicePopup) |
|
898
6b2958f04f30
Adding drag'n drop of debug variable from DebugVariable grid and PouInstance variable list
Laurent Bessard
parents:
885
diff
changeset
|
443 |
else: |
6b2958f04f30
Adding drag'n drop of debug variable from DebugVariable grid and PouInstance variable list
Laurent Bessard
parents:
885
diff
changeset
|
444 |
instance_path = self.InstanceChoice.GetStringSelection() |
6b2958f04f30
Adding drag'n drop of debug variable from DebugVariable grid and PouInstance variable list
Laurent Bessard
parents:
885
diff
changeset
|
445 |
item, flags = self.VariablesList.HitTest(event.GetPosition()) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
446 |
if item is not None: |
898
6b2958f04f30
Adding drag'n drop of debug variable from DebugVariable grid and PouInstance variable list
Laurent Bessard
parents:
885
diff
changeset
|
447 |
item_infos = self.VariablesList.GetPyData(item) |
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
448 |
if item_infos is not None: |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
449 |
|
1343
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
450 |
item_button = self.VariablesList.IsOverItemRightImage( |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
451 |
item, event.GetPosition()) |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
452 |
if item_button is not None: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
453 |
callback = self.ButtonCallBacks[item_button].leftdown |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
454 |
if callback is not None: |
a76a020b8822
Fixed PouInstanceVariablesPanel, replacing wx controls, too long to create and destroy, by bitmaps directly drawn in panel
Laurent Bessard
parents:
1281
diff
changeset
|
455 |
callback(item_infos) |
1730
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
456 |
|
64d8f52bc8c8
clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents:
1669
diff
changeset
|
457 |
elif (flags & CT.TREE_HITTEST_ONITEMLABEL and |
1369
9bd4c783c98d
Fixed bug Drag'n drop variables from left panel to debug panel disabled
Laurent Bessard
parents:
1364
diff
changeset
|
458 |
item_infos.var_class in ITEMS_VARIABLE): |
9bd4c783c98d
Fixed bug Drag'n drop variables from left panel to debug panel disabled
Laurent Bessard
parents:
1364
diff
changeset
|
459 |
self.ParentWindow.EnsureTabVisible( |
9bd4c783c98d
Fixed bug Drag'n drop variables from left panel to debug panel disabled
Laurent Bessard
parents:
1364
diff
changeset
|
460 |
self.ParentWindow.DebugVariablePanel) |
9bd4c783c98d
Fixed bug Drag'n drop variables from left panel to debug panel disabled
Laurent Bessard
parents:
1364
diff
changeset
|
461 |
item_path = "%s.%s" % (instance_path, item_infos.name) |
9bd4c783c98d
Fixed bug Drag'n drop variables from left panel to debug panel disabled
Laurent Bessard
parents:
1364
diff
changeset
|
462 |
data = wx.TextDataObject(str((item_path, "debug"))) |
9bd4c783c98d
Fixed bug Drag'n drop variables from left panel to debug panel disabled
Laurent Bessard
parents:
1364
diff
changeset
|
463 |
dragSource = wx.DropSource(self.VariablesList) |
9bd4c783c98d
Fixed bug Drag'n drop variables from left panel to debug panel disabled
Laurent Bessard
parents:
1364
diff
changeset
|
464 |
dragSource.SetData(data) |
9bd4c783c98d
Fixed bug Drag'n drop variables from left panel to debug panel disabled
Laurent Bessard
parents:
1364
diff
changeset
|
465 |
dragSource.DoDragDrop() |
814 | 466 |
event.Skip() |
1031
5743398071eb
Fix bug when pressing left arrow key in PouInstanceVariablesPanel
Laurent Bessard
parents:
930
diff
changeset
|
467 |
|
5743398071eb
Fix bug when pressing left arrow key in PouInstanceVariablesPanel
Laurent Bessard
parents:
930
diff
changeset
|
468 |
def OnVariablesListKeyDown(self, event): |
5743398071eb
Fix bug when pressing left arrow key in PouInstanceVariablesPanel
Laurent Bessard
parents:
930
diff
changeset
|
469 |
keycode = event.GetKeyCode() |
5743398071eb
Fix bug when pressing left arrow key in PouInstanceVariablesPanel
Laurent Bessard
parents:
930
diff
changeset
|
470 |
if keycode != wx.WXK_LEFT: |
5743398071eb
Fix bug when pressing left arrow key in PouInstanceVariablesPanel
Laurent Bessard
parents:
930
diff
changeset
|
471 |
event.Skip() |