VariablePanel.py
author laurent
Sun, 09 Oct 2011 20:10:36 +0200
changeset 568 31976c61c701
parent 566 6014ef82a98a
child 577 9dbb79722fbc
permissions -rw-r--r--
Fix bug when opening another project while current edited project has at least one tab opened
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
     1
#!/usr/bin/env python
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     3
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     4
#This file is part of PLCOpenEditor, a library implementing an IEC 61131-3 editor
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     5
#based on the plcopen standard. 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     6
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     7
#Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     8
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     9
#See COPYING file for copyrights details.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    10
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    11
#This library is free software; you can redistribute it and/or
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    12
#modify it under the terms of the GNU General Public
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    13
#License as published by the Free Software Foundation; either
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    14
#version 2.1 of the License, or (at your option) any later version.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    15
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    16
#This library is distributed in the hope that it will be useful,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    17
#but WITHOUT ANY WARRANTY; without even the implied warranty of
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    18
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    19
#General Public License for more details.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    20
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    21
#You should have received a copy of the GNU General Public
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    22
#License along with this library; if not, write to the Free Software
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    23
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    24
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
    25
import os
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    26
import wx, wx.grid
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    27
419
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
    28
from types import TupleType
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
    29
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    30
from plcopen.structures import LOCATIONDATATYPES, TestIdentifier, IEC_KEYWORDS
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
    31
from PLCControler import LOCATION_PLUGIN, LOCATION_MODULE, LOCATION_GROUP, LOCATION_VAR_INPUT, LOCATION_VAR_OUTPUT, LOCATION_VAR_MEMORY
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
    32
from graphics.GraphicCommons import REFRESH_HIGHLIGHT_PERIOD
507
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
    33
from dialogs import ArrayTypeDialog
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
    34
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
    35
CWD = os.path.split(os.path.realpath(__file__))[0]
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    36
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    37
# Compatibility function for wx versions < 2.6
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    38
def AppendMenu(parent, help, id, kind, text):
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    39
    if wx.VERSION >= (2, 6, 0):
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    40
        parent.Append(help=help, id=id, kind=kind, text=text)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    41
    else:
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    42
        parent.Append(helpString=help, id=id, kind=kind, item=text)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    43
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    44
[TITLE, TOOLBAR, FILEMENU, EDITMENU, DISPLAYMENU, TYPESTREE, 
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    45
 INSTANCESTREE, LIBRARYTREE, SCALING
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    46
] = range(9)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    47
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    48
#-------------------------------------------------------------------------------
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    49
#                            Variables Editor Panel
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    50
#-------------------------------------------------------------------------------
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    51
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    52
def GetVariableTableColnames(location):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    53
    _ = lambda x : x
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    54
    if location:
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
    55
    	return ["#", _("Name"), _("Class"), _("Type"), _("Location"), _("Initial Value"), _("Option"), _("Documentation")]
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
    56
    return ["#", _("Name"), _("Class"), _("Type"), _("Initial Value"), _("Option"), _("Documentation")]
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
    57
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    58
def GetOptions(constant=True, retain=True, non_retain=True):
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    59
    _ = lambda x : x
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    60
    options = [""]
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    61
    if constant:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    62
        options.append(_("Constant"))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    63
    if retain:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    64
        options.append(_("Retain"))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    65
    if non_retain:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    66
        options.append(_("Non-Retain"))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    67
    return options
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
    68
OPTIONS_DICT = dict([(_(option), option) for option in GetOptions()])
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    69
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    70
def GetFilterChoiceTransfer():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    71
    _ = lambda x : x
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    72
    return {_("All"): _("All"), _("Interface"): _("Interface"), 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    73
            _("   Input"): _("Input"), _("   Output"): _("Output"), _("   InOut"): _("InOut"), 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    74
            _("   External"): _("External"), _("Variables"): _("Variables"), _("   Local"): _("Local"),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    75
            _("   Temp"): _("Temp"), _("Global"): _("Global")}#, _("Access") : _("Access")}
509
6f72513bc074 Bug on variable panel row size in grid preventing readability of value inside cell editors fixed
laurent
parents: 507
diff changeset
    76
VARIABLE_CHOICES_DICT = dict([(_(_class), _class) for _class in GetFilterChoiceTransfer().iterkeys()])
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    77
VARIABLE_CLASSES_DICT = dict([(_(_class), _class) for _class in GetFilterChoiceTransfer().itervalues()])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    78
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    79
CheckOptionForClass = {"Local": lambda x: x,
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    80
                       "Temp": lambda x: "",
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    81
                       "Input": lambda x: {"Retain": "Retain", "Non-Retain": "Non-Retain"}.get(x, ""),
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    82
                       "InOut": lambda x: "",
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    83
                       "Output": lambda x: {"Retain": "Retain", "Non-Retain": "Non-Retain"}.get(x, ""),
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    84
                       "Global": lambda x: {"Constant": "Constant", "Retain": "Retain"}.get(x, ""),
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    85
                       "External": lambda x: {"Constant": "Constant"}.get(x, "")
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    86
                      }
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    87
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    88
class VariableTable(wx.grid.PyGridTableBase):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    89
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    90
    """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    91
    A custom wx.grid.Grid Table using user supplied data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    92
    """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    93
    def __init__(self, parent, data, colnames):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    94
        # The base class must be initialized *first*
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    95
        wx.grid.PyGridTableBase.__init__(self)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    96
        self.data = data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    97
        self.old_value = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    98
        self.colnames = colnames
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
    99
        self.Highlights = {}
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   100
        self.Parent = parent
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   101
        # XXX
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   102
        # we need to store the row length and collength to
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   103
        # see if the table has changed size
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   104
        self._rows = self.GetNumberRows()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   105
        self._cols = self.GetNumberCols()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   106
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   107
    def GetNumberCols(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   108
        return len(self.colnames)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   109
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   110
    def GetNumberRows(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   111
        return len(self.data)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   112
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   113
    def GetColLabelValue(self, col, translate=True):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   114
        if col < len(self.colnames):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   115
            if translate:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   116
                return _(self.colnames[col])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   117
            return self.colnames[col]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   118
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   119
    def GetRowLabelValues(self, row, translate=True):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   120
        return row
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   121
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   122
    def GetValue(self, row, col):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   123
        if row < self.GetNumberRows():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   124
            if col == 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   125
                return self.data[row]["Number"]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   126
            colname = self.GetColLabelValue(col, False)
507
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   127
            value = self.data[row].get(colname, "")
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   128
            if colname == "Type" and isinstance(value, TupleType):
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   129
                if value[0] == "array":
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   130
                    return "ARRAY [%s] OF %s" % (",".join(map(lambda x : "..".join(x), value[2])), value[1])
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   131
            value = str(value)
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   132
            if colname in ["Class", "Option"]:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   133
                return _(value)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   134
            return value
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   135
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   136
    def SetValue(self, row, col, value):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   137
        if col < len(self.colnames):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   138
            colname = self.GetColLabelValue(col, False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   139
            if colname == "Name":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   140
                self.old_value = self.data[row][colname]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   141
            elif colname == "Class":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   142
                value = VARIABLE_CLASSES_DICT[value]
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   143
                self.SetValueByName(row, "Option", CheckOptionForClass[value](self.GetValueByName(row, "Option")))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   144
                if value == "External":
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   145
                    self.SetValueByName(row, "Initial Value", "")
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   146
            elif colname == "Option":
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   147
                value = OPTIONS_DICT[value]
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   148
            self.data[row][colname] = value
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   149
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   150
    def GetValueByName(self, row, colname):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   151
        if row < self.GetNumberRows():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   152
            return self.data[row].get(colname)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   153
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   154
    def SetValueByName(self, row, colname, value):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   155
        if row < self.GetNumberRows():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   156
            self.data[row][colname] = value
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   157
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   158
    def GetOldValue(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   159
        return self.old_value
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   160
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   161
    def ResetView(self, grid):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   162
        """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   163
        (wx.grid.Grid) -> Reset the grid view.   Call this to
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   164
        update the grid if rows and columns have been added or deleted
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   165
        """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   166
        grid.BeginBatch()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   167
        for current, new, delmsg, addmsg in [
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   168
            (self._rows, self.GetNumberRows(), wx.grid.GRIDTABLE_NOTIFY_ROWS_DELETED, wx.grid.GRIDTABLE_NOTIFY_ROWS_APPENDED),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   169
            (self._cols, self.GetNumberCols(), wx.grid.GRIDTABLE_NOTIFY_COLS_DELETED, wx.grid.GRIDTABLE_NOTIFY_COLS_APPENDED),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   170
        ]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   171
            if new < current:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   172
                msg = wx.grid.GridTableMessage(self,delmsg,new,current-new)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   173
                grid.ProcessTableMessage(msg)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   174
            elif new > current:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   175
                msg = wx.grid.GridTableMessage(self,addmsg,new-current)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   176
                grid.ProcessTableMessage(msg)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   177
                self.UpdateValues(grid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   178
        grid.EndBatch()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   179
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   180
        self._rows = self.GetNumberRows()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   181
        self._cols = self.GetNumberCols()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   182
        # update the column rendering scheme
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   183
        self._updateColAttrs(grid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   184
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   185
        # update the scrollbars and the displayed part of the grid
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   186
        grid.AdjustScrollbars()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   187
        grid.ForceRefresh()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   188
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   189
    def UpdateValues(self, grid):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   190
        """Update all displayed values"""
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   191
        # This sends an event to the grid table to update all of the values
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   192
        msg = wx.grid.GridTableMessage(self, wx.grid.GRIDTABLE_REQUEST_VIEW_GET_VALUES)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   193
        grid.ProcessTableMessage(msg)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   194
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   195
    def _updateColAttrs(self, grid):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   196
        """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   197
        wx.grid.Grid -> update the column attributes to add the
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   198
        appropriate renderer given the column name.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   199
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   200
        Otherwise default to the default renderer.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   201
        """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   202
        for row in range(self.GetNumberRows()):
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   203
            var_class = self.GetValueByName(row, "Class")
552
a387f258814a Disabling location definition for enumerated and structure variables
laurent
parents: 544
diff changeset
   204
            var_type = self.GetValueByName(row, "Type")
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   205
            row_highlights = self.Highlights.get(row, {})
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   206
            for col in range(self.GetNumberCols()):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   207
                editor = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   208
                renderer = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   209
                colname = self.GetColLabelValue(col, False)
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   210
                if colname == "Option":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   211
                    options = GetOptions(constant = var_class in ["Local", "External", "Global"],
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   212
                                         retain = self.Parent.ElementType != "function" and var_class in ["Local", "Input", "Output", "Global"],
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   213
                                         non_retain = self.Parent.ElementType != "function" and var_class in ["Local", "Input", "Output"])
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   214
                    if len(options) > 1:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   215
                        editor = wx.grid.GridCellChoiceEditor()
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   216
                        editor.SetParameters(",".join(map(_, options)))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   217
                    else:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   218
                        grid.SetReadOnly(row, col, True)
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   219
                elif col != 0 and self.GetValueByName(row, "Edit"):
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   220
                    grid.SetReadOnly(row, col, False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   221
                    if colname == "Name":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   222
                        if self.Parent.PouIsUsed and var_class in ["Input", "Output", "InOut"]:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   223
                            grid.SetReadOnly(row, col, True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   224
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   225
                            editor = wx.grid.GridCellTextEditor()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   226
                            renderer = wx.grid.GridCellStringRenderer()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   227
                    elif colname == "Initial Value":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   228
                        if var_class != "External":
552
a387f258814a Disabling location definition for enumerated and structure variables
laurent
parents: 544
diff changeset
   229
                            if self.Parent.Controler.IsEnumeratedType(var_type):
a387f258814a Disabling location definition for enumerated and structure variables
laurent
parents: 544
diff changeset
   230
                                editor = wx.grid.GridCellChoiceEditor()
a387f258814a Disabling location definition for enumerated and structure variables
laurent
parents: 544
diff changeset
   231
                                editor.SetParameters(",".join(self.Parent.Controler.GetEnumeratedDataValues(var_type)))
a387f258814a Disabling location definition for enumerated and structure variables
laurent
parents: 544
diff changeset
   232
                            else:
a387f258814a Disabling location definition for enumerated and structure variables
laurent
parents: 544
diff changeset
   233
                                editor = wx.grid.GridCellTextEditor()
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   234
                            renderer = wx.grid.GridCellStringRenderer()
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   235
                        else:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   236
                            grid.SetReadOnly(row, col, True)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   237
                    elif colname == "Location":
552
a387f258814a Disabling location definition for enumerated and structure variables
laurent
parents: 544
diff changeset
   238
                        if var_class in ["Local", "Global"] and self.Parent.Controler.IsLocatableType(var_type):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   239
                            editor = LocationCellEditor(self, self.Parent.Controler)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   240
                            renderer = wx.grid.GridCellStringRenderer()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   241
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   242
                            grid.SetReadOnly(row, col, True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   243
                    elif colname == "Class":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   244
                        if len(self.Parent.ClassList) == 1 or self.Parent.PouIsUsed and var_class in ["Input", "Output", "InOut"]:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   245
                            grid.SetReadOnly(row, col, True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   246
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   247
                            editor = wx.grid.GridCellChoiceEditor()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   248
                            excluded = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   249
                            if self.Parent.PouIsUsed:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   250
                                excluded.extend(["Input","Output","InOut"])
552
a387f258814a Disabling location definition for enumerated and structure variables
laurent
parents: 544
diff changeset
   251
                            if self.Parent.IsFunctionBlockType(var_type):
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   252
                                excluded.extend(["Local","Temp"])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   253
                            editor.SetParameters(",".join([_(choice) for choice in self.Parent.ClassList if choice not in excluded]))
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   254
                elif colname != "Documentation":
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   255
                    grid.SetReadOnly(row, col, True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   256
                
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   257
                grid.SetCellEditor(row, col, editor)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   258
                grid.SetCellRenderer(row, col, renderer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   259
                
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   260
                highlight_colours = row_highlights.get(colname.lower(), [(wx.WHITE, wx.BLACK)])[-1]
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   261
                grid.SetCellBackgroundColour(row, col, highlight_colours[0])
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   262
                grid.SetCellTextColour(row, col, highlight_colours[1])
509
6f72513bc074 Bug on variable panel row size in grid preventing readability of value inside cell editors fixed
laurent
parents: 507
diff changeset
   263
            if wx.Platform == '__WXMSW__':
6f72513bc074 Bug on variable panel row size in grid preventing readability of value inside cell editors fixed
laurent
parents: 507
diff changeset
   264
                grid.SetRowMinimalHeight(row, 20)
6f72513bc074 Bug on variable panel row size in grid preventing readability of value inside cell editors fixed
laurent
parents: 507
diff changeset
   265
            else:
6f72513bc074 Bug on variable panel row size in grid preventing readability of value inside cell editors fixed
laurent
parents: 507
diff changeset
   266
                grid.SetRowMinimalHeight(row, 28)
6f72513bc074 Bug on variable panel row size in grid preventing readability of value inside cell editors fixed
laurent
parents: 507
diff changeset
   267
            grid.AutoSizeRow(row, False)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   268
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   269
    def SetData(self, data):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   270
        self.data = data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   271
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   272
    def GetData(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   273
        return self.data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   274
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   275
    def GetCurrentIndex(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   276
        return self.CurrentIndex
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   277
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   278
    def SetCurrentIndex(self, index):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   279
        self.CurrentIndex = index
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   280
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   281
    def AppendRow(self, row_content):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   282
        self.data.append(row_content)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   283
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   284
    def RemoveRow(self, row_index):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   285
        self.data.pop(row_index)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   286
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   287
    def GetRow(self, row_index):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   288
        return self.data[row_index]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   289
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   290
    def Empty(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   291
        self.data = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   292
        self.editors = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   293
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   294
    def AddHighlight(self, infos, highlight_type):
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   295
        row_highlights = self.Highlights.setdefault(infos[0], {})
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   296
        col_highlights = row_highlights.setdefault(infos[1], [])
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   297
        col_highlights.append(highlight_type)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   298
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   299
    def ClearHighlights(self, highlight_type=None):
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   300
        if highlight_type is None:
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   301
            self.Highlights = {}
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   302
        else:
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   303
            for row, row_highlights in self.Highlights.iteritems():
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   304
                row_items = row_highlights.items()
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   305
                for col, col_highlights in row_items:
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   306
                    if highlight_type in col_highlights:
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   307
                        col_highlights.remove(highlight_type)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   308
                    if len(col_highlights) == 0:
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   309
                        row_highlights.pop(col)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   310
                    
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   311
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   312
class VariableDropTarget(wx.TextDropTarget):
419
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   313
    '''
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   314
    This allows dragging a variable location from somewhere to the Location
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   315
    column of a variable row.
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   316
    
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   317
    The drag source should be a TextDataObject containing a Python tuple like:
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   318
        ('%ID0.0.0', 'location', 'REAL')
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   319
    
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   320
    c_ext/CFileEditor.py has an example of this (you can drag a C extension
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   321
    variable to the Location column of the variable panel).
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   322
    '''
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   323
    def __init__(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   324
        wx.TextDropTarget.__init__(self)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   325
        self.ParentWindow = parent
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   326
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   327
    def OnDropText(self, x, y, data):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   328
        x, y = self.ParentWindow.VariablesGrid.CalcUnscrolledPosition(x, y)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   329
        col = self.ParentWindow.VariablesGrid.XToCol(x)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   330
        row = self.ParentWindow.VariablesGrid.YToRow(y - self.ParentWindow.VariablesGrid.GetColLabelSize())
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   331
        if col != wx.NOT_FOUND and row != wx.NOT_FOUND:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   332
            if self.ParentWindow.Table.GetColLabelValue(col, False) != "Location":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   333
                return
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   334
            message = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   335
            if not self.ParentWindow.Table.GetValueByName(row, "Edit"):
427
22d16c457d87 improved English spelling & grammar
b.taylor@willowglen.ca
parents: 425
diff changeset
   336
                message = _("Can't give a location to a function block instance")
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   337
            elif self.ParentWindow.Table.GetValueByName(row, "Class") not in ["Local", "Global"]:
427
22d16c457d87 improved English spelling & grammar
b.taylor@willowglen.ca
parents: 425
diff changeset
   338
                message = _("Can only give a location to local or global variables")
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   339
            else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   340
                try:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   341
                    values = eval(data)    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   342
                except:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   343
                    message = _("Invalid value \"%s\" for location")%data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   344
                    values = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   345
                if not isinstance(values, TupleType):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   346
                    message = _("Invalid value \"%s\" for location")%data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   347
                    values = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   348
                if values is not None and values[1] == "location":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   349
                    location = values[0]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   350
                    variable_type = self.ParentWindow.Table.GetValueByName(row, "Type")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   351
                    base_type = self.ParentWindow.Controler.GetBaseType(variable_type)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   352
                    message = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   353
                    if location.startswith("%"):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   354
                        if base_type != values[2]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   355
                            message = _("Incompatible data types between \"%s\" and \"%s\"")%(values[2], variable_type)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   356
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   357
                            self.ParentWindow.Table.SetValue(row, col, location)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   358
                            self.ParentWindow.Table.ResetView(self.ParentWindow.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   359
                            self.ParentWindow.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   360
                    else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   361
                        if location[0].isdigit() and base_type != "BOOL":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   362
                            message = _("Incompatible size of data between \"%s\" and \"BOOL\"")%location
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   363
                        elif location[0] not in LOCATIONDATATYPES:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   364
                            message = _("Unrecognized data size \"%s\"")%location[0]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   365
                        elif base_type not in LOCATIONDATATYPES[location[0]]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   366
                            message = _("Incompatible size of data between \"%s\" and \"%s\"")%(location, variable_type)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   367
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   368
                            dialog = wx.SingleChoiceDialog(self.ParentWindow, _("Select a variable class:"), _("Variable class"), ["Input", "Output", "Memory"], wx.OK|wx.CANCEL)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   369
                            if dialog.ShowModal() == wx.ID_OK:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   370
                                selected = dialog.GetSelection()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   371
                                if selected == 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   372
                                    location = "%I" + location
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   373
                                elif selected == 1:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   374
                                    location = "%Q" + location
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   375
                                else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   376
                                    location = "%M" + location
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   377
                                self.ParentWindow.Table.SetValue(row, col, location)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   378
                                self.ParentWindow.Table.ResetView(self.ParentWindow.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   379
                                self.ParentWindow.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   380
                            dialog.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   381
            if message is not None:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   382
                wx.CallAfter(self.ShowMessage, message)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   383
            
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   384
    def ShowMessage(self, message):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   385
        message = wx.MessageDialog(self.ParentWindow, message, _("Error"), wx.OK|wx.ICON_ERROR)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   386
        message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   387
        message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   388
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   389
[ID_VARIABLEEDITORPANEL, ID_VARIABLEEDITORPANELVARIABLESGRID, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   390
 ID_VARIABLEEDITORCONTROLPANEL, ID_VARIABLEEDITORPANELRETURNTYPE, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   391
 ID_VARIABLEEDITORPANELCLASSFILTER, ID_VARIABLEEDITORPANELADDBUTTON, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   392
 ID_VARIABLEEDITORPANELDELETEBUTTON, ID_VARIABLEEDITORPANELUPBUTTON, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   393
 ID_VARIABLEEDITORPANELDOWNBUTTON, ID_VARIABLEEDITORPANELSTATICTEXT1, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   394
 ID_VARIABLEEDITORPANELSTATICTEXT2, ID_VARIABLEEDITORPANELSTATICTEXT3,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   395
] = [wx.NewId() for _init_ctrls in range(12)]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   396
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   397
class VariablePanel(wx.Panel):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   398
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   399
    if wx.VERSION < (2, 6, 0):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   400
        def Bind(self, event, function, id = None):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   401
            if id is not None:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   402
                event(self, id, function)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   403
            else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   404
                event(self, function)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   405
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   406
    def _init_coll_MainSizer_Items(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   407
        parent.AddWindow(self.VariablesGrid, 0, border=0, flag=wx.GROW)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   408
        parent.AddWindow(self.ControlPanel, 0, border=5, flag=wx.GROW|wx.ALL)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   409
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   410
    def _init_coll_MainSizer_Growables(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   411
        parent.AddGrowableCol(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   412
        parent.AddGrowableRow(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   413
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   414
    def _init_coll_ControlPanelSizer_Items(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   415
        parent.AddSizer(self.ChoicePanelSizer, 0, border=0, flag=wx.GROW)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   416
        parent.AddSizer(self.ButtonPanelSizer, 0, border=0, flag=wx.ALIGN_CENTER)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   417
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   418
    def _init_coll_ControlPanelSizer_Growables(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   419
        parent.AddGrowableCol(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   420
        parent.AddGrowableRow(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   421
        parent.AddGrowableRow(1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   422
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   423
    def _init_coll_ChoicePanelSizer_Items(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   424
        parent.AddWindow(self.staticText1, 0, border=0, flag=wx.ALIGN_BOTTOM)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   425
        parent.AddWindow(self.ReturnType, 0, border=0, flag=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   426
        parent.AddWindow(self.staticText2, 0, border=0, flag=wx.ALIGN_BOTTOM)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   427
        parent.AddWindow(self.ClassFilter, 0, border=0, flag=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   428
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   429
    def _init_coll_ButtonPanelSizer_Items(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   430
        parent.AddWindow(self.UpButton, 0, border=0, flag=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   431
        parent.AddWindow(self.AddButton, 0, border=0, flag=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   432
        parent.AddWindow(self.DownButton, 0, border=0, flag=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   433
        parent.AddWindow(self.DeleteButton, 0, border=0, flag=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   434
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   435
    def _init_coll_ButtonPanelSizer_Growables(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   436
        parent.AddGrowableCol(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   437
        parent.AddGrowableCol(1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   438
        parent.AddGrowableCol(2)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   439
        parent.AddGrowableCol(3)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   440
        parent.AddGrowableRow(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   441
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   442
    def _init_sizers(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   443
        self.MainSizer = wx.FlexGridSizer(cols=2, hgap=10, rows=1, vgap=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   444
        self.ControlPanelSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=5)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   445
        self.ChoicePanelSizer = wx.GridSizer(cols=1, hgap=5, rows=4, vgap=5)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   446
        self.ButtonPanelSizer = wx.FlexGridSizer(cols=2, hgap=5, rows=2, vgap=5)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   447
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   448
        self._init_coll_MainSizer_Items(self.MainSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   449
        self._init_coll_MainSizer_Growables(self.MainSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   450
        self._init_coll_ControlPanelSizer_Items(self.ControlPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   451
        self._init_coll_ControlPanelSizer_Growables(self.ControlPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   452
        self._init_coll_ChoicePanelSizer_Items(self.ChoicePanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   453
        self._init_coll_ButtonPanelSizer_Items(self.ButtonPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   454
        self._init_coll_ButtonPanelSizer_Growables(self.ButtonPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   455
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   456
        self.SetSizer(self.MainSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   457
        self.ControlPanel.SetSizer(self.ControlPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   458
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   459
    def _init_ctrls(self, prnt):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   460
        wx.Panel.__init__(self, id=ID_VARIABLEEDITORPANEL,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   461
              name='VariableEditorPanel', parent=prnt, pos=wx.Point(0, 0),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   462
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   463
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   464
        self.VariablesGrid = wx.grid.Grid(id=ID_VARIABLEEDITORPANELVARIABLESGRID,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   465
              name='VariablesGrid', parent=self, pos=wx.Point(0, 0), 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   466
              size=wx.Size(0, 0), style=wx.VSCROLL)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   467
        self.VariablesGrid.SetFont(wx.Font(12, 77, wx.NORMAL, wx.NORMAL, False,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   468
              'Sans'))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   469
        self.VariablesGrid.SetLabelFont(wx.Font(10, 77, wx.NORMAL, wx.NORMAL,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   470
              False, 'Sans'))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   471
        self.VariablesGrid.SetSelectionBackground(wx.WHITE)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   472
        self.VariablesGrid.SetSelectionForeground(wx.BLACK)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   473
        if wx.VERSION >= (2, 6, 0):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   474
            self.VariablesGrid.Bind(wx.grid.EVT_GRID_CELL_CHANGE, self.OnVariablesGridCellChange)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   475
            self.VariablesGrid.Bind(wx.grid.EVT_GRID_SELECT_CELL, self.OnVariablesGridSelectCell)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   476
            self.VariablesGrid.Bind(wx.grid.EVT_GRID_CELL_LEFT_CLICK, self.OnVariablesGridCellLeftClick)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   477
            self.VariablesGrid.Bind(wx.grid.EVT_GRID_EDITOR_SHOWN, self.OnVariablesGridEditorShown)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   478
            #self.VariablesGrid.Bind(wx.EVT_KEY_DOWN, self.OnChar)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   479
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   480
            wx.grid.EVT_GRID_CELL_CHANGE(self.VariablesGrid, self.OnVariablesGridCellChange)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   481
            wx.grid.EVT_GRID_SELECT_CELL(self.VariablesGrid, self.OnVariablesGridSelectCell)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   482
            wx.grid.EVT_GRID_CELL_LEFT_CLICK(self.VariablesGrid, self.OnVariablesGridCellLeftClick)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   483
            wx.grid.EVT_GRID_EDITOR_SHOWN(self.VariablesGrid, self.OnVariablesGridEditorShown)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   484
            #wx.EVT_KEY_DOWN(self.VariablesGrid, self.OnChar)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   485
        self.VariablesGrid.SetDropTarget(VariableDropTarget(self))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   486
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   487
        self.ControlPanel = wx.ScrolledWindow(id=ID_VARIABLEEDITORCONTROLPANEL,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   488
              name='ControlPanel', parent=self, pos=wx.Point(0, 0),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   489
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   490
        self.ControlPanel.SetScrollRate(0, 10)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   491
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   492
        self.staticText1 = wx.StaticText(id=ID_VARIABLEEDITORPANELSTATICTEXT1,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   493
              label=_('Return Type:'), name='staticText1', parent=self.ControlPanel,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   494
              pos=wx.Point(0, 0), size=wx.Size(145, 17), style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   495
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   496
        self.ReturnType = wx.ComboBox(id=ID_VARIABLEEDITORPANELRETURNTYPE,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   497
              name='ReturnType', parent=self.ControlPanel, pos=wx.Point(0, 0),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   498
              size=wx.Size(145, 28), style=wx.CB_READONLY)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   499
        self.Bind(wx.EVT_COMBOBOX, self.OnReturnTypeChanged, id=ID_VARIABLEEDITORPANELRETURNTYPE)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   500
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   501
        self.staticText2 = wx.StaticText(id=ID_VARIABLEEDITORPANELSTATICTEXT2,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   502
              label=_('Class Filter:'), name='staticText2', parent=self.ControlPanel,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   503
              pos=wx.Point(0, 0), size=wx.Size(145, 17), style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   504
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   505
        self.ClassFilter = wx.ComboBox(id=ID_VARIABLEEDITORPANELCLASSFILTER,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   506
              name='ClassFilter', parent=self.ControlPanel, pos=wx.Point(0, 0),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   507
              size=wx.Size(145, 28), style=wx.CB_READONLY)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   508
        self.Bind(wx.EVT_COMBOBOX, self.OnClassFilter, id=ID_VARIABLEEDITORPANELCLASSFILTER)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   509
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   510
        self.AddButton = wx.Button(id=ID_VARIABLEEDITORPANELADDBUTTON, label=_('Add'),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   511
              name='AddButton', parent=self.ControlPanel, pos=wx.Point(0, 0),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   512
              size=wx.DefaultSize, style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   513
        self.Bind(wx.EVT_BUTTON, self.OnAddButton, id=ID_VARIABLEEDITORPANELADDBUTTON)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   514
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   515
        self.DeleteButton = wx.Button(id=ID_VARIABLEEDITORPANELDELETEBUTTON, label=_('Delete'),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   516
              name='DeleteButton', parent=self.ControlPanel, pos=wx.Point(0, 0),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   517
              size=wx.DefaultSize, style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   518
        self.Bind(wx.EVT_BUTTON, self.OnDeleteButton, id=ID_VARIABLEEDITORPANELDELETEBUTTON)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   519
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   520
        self.UpButton = wx.Button(id=ID_VARIABLEEDITORPANELUPBUTTON, label='^',
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   521
              name='UpButton', parent=self.ControlPanel, pos=wx.Point(0, 0),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   522
              size=wx.Size(32, 32), style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   523
        self.Bind(wx.EVT_BUTTON, self.OnUpButton, id=ID_VARIABLEEDITORPANELUPBUTTON)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   524
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   525
        self.DownButton = wx.Button(id=ID_VARIABLEEDITORPANELDOWNBUTTON, label='v',
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   526
              name='DownButton', parent=self.ControlPanel, pos=wx.Point(0, 0),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   527
              size=wx.Size(32, 32), style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   528
        self.Bind(wx.EVT_BUTTON, self.OnDownButton, id=ID_VARIABLEEDITORPANELDOWNBUTTON)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   529
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   530
        self._init_sizers()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   531
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   532
    def __init__(self, parent, window, controler, element_type):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   533
        self._init_ctrls(parent)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   534
        self.ParentWindow = window
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   535
        self.Controler = controler
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   536
        self.ElementType = element_type
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   537
        
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   538
        self.RefreshHighlightsTimer = wx.Timer(self, -1)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   539
        self.Bind(wx.EVT_TIMER, self.OnRefreshHighlightsTimer, self.RefreshHighlightsTimer)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   540
        
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   541
        self.Filter = "All"
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   542
        self.FilterChoices = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   543
        self.FilterChoiceTransfer = GetFilterChoiceTransfer()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   544
        
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   545
        self.DefaultValue = {   "Name" : "", "Class" : "", "Type" : "INT", "Location" : "",
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   546
                                "Initial Value" : "", "Option" : "",
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   547
                                "Documentation" : "", "Edit" : True
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   548
                            }
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   549
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   550
        if element_type in ["config", "resource"]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   551
            self.DefaultTypes = {"All" : "Global"}
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   552
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   553
            self.DefaultTypes = {"All" : "Local", "Interface" : "Input", "Variables" : "Local"}
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   554
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   555
        if element_type in ["config", "resource"] \
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   556
        or element_type in ["program", "transition", "action"]:
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   557
            # this is an element that can have located variables
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   558
            self.Table = VariableTable(self, [], GetVariableTableColnames(True))
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   559
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   560
            if element_type in ["config", "resource"]:
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   561
                self.FilterChoices = ["All", "Global"]#,"Access"]
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   562
            else:
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   563
                self.FilterChoices = ["All",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   564
                                        "Interface", "   Input", "   Output", "   InOut", "   External",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   565
                                        "Variables", "   Local", "   Temp"]#,"Access"]
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   566
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   567
            # these condense the ColAlignements list
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   568
            l = wx.ALIGN_LEFT
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   569
            c = wx.ALIGN_CENTER 
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   570
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   571
            #                      Num  Name    Class   Type    Loc     Init    Option   Doc
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   572
            self.ColSizes       = [40,  80,     70,     80,     80,     80,     100,     80]
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   573
            self.ColAlignements = [c,   l,      l,      l,      l,      l,      l,       l]
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   574
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   575
        else:
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   576
            # this is an element that cannot have located variables
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   577
            self.Table = VariableTable(self, [], GetVariableTableColnames(False))
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   578
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   579
            if element_type == "function":
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   580
                self.FilterChoices = ["All",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   581
                                        "Interface", "   Input", "   Output", "   InOut",
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   582
                                        "Variables", "   Local"]
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   583
            else:
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   584
                self.FilterChoices = ["All",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   585
                                        "Interface", "   Input", "   Output", "   InOut", "   External",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   586
                                        "Variables", "   Local", "   Temp"]
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   587
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   588
            # these condense the ColAlignements list
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   589
            l = wx.ALIGN_LEFT
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   590
            c = wx.ALIGN_CENTER 
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   591
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   592
            #                      Num  Name    Class   Type    Init    Option   Doc
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   593
            self.ColSizes       = [40,  80,     70,     80,     80,     100,     160]
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   594
            self.ColAlignements = [c,   l,      l,      l,      l,      l,       l]
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   595
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   596
        for choice in self.FilterChoices:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   597
            self.ClassFilter.Append(_(choice))
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   598
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   599
        reverse_transfer = {}
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   600
        for filter, choice in self.FilterChoiceTransfer.items():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   601
            reverse_transfer[choice] = filter
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   602
        self.ClassFilter.SetStringSelection(_(reverse_transfer[self.Filter]))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   603
        self.RefreshTypeList()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   604
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   605
        self.VariablesGrid.SetTable(self.Table)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   606
        self.VariablesGrid.SetRowLabelSize(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   607
        for col in range(self.Table.GetNumberCols()):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   608
            attr = wx.grid.GridCellAttr()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   609
            attr.SetAlignment(self.ColAlignements[col], wx.ALIGN_CENTRE)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   610
            self.VariablesGrid.SetColAttr(col, attr)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   611
            self.VariablesGrid.SetColMinimalWidth(col, self.ColSizes[col])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   612
            self.VariablesGrid.AutoSizeColumn(col, False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   613
    
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   614
    def __del__(self):
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   615
        self.RefreshHighlightsTimer.Stop()
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   616
    
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   617
    def SetTagName(self, tagname):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   618
        self.TagName = tagname
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   619
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   620
    def IsFunctionBlockType(self, name):
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   621
        bodytype = self.Controler.GetEditedElementBodyType(self.TagName)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   622
        pouname, poutype = self.Controler.GetEditedElementType(self.TagName)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   623
        if poutype != "function" and bodytype in ["ST", "IL"]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   624
            return False
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   625
        else:
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   626
            return name in self.Controler.GetFunctionBlockTypes(self.TagName)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   627
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   628
    def RefreshView(self):
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   629
        self.PouNames = self.Controler.GetProjectPouNames()
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   630
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   631
        words = self.TagName.split("::")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   632
        if self.ElementType == "config":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   633
            self.PouIsUsed = False
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   634
            returnType = None
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   635
            self.Values = self.Controler.GetConfigurationGlobalVars(words[1])
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   636
        elif self.ElementType == "resource":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   637
            self.PouIsUsed = False
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   638
            returnType = None
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   639
            self.Values = self.Controler.GetConfigurationResourceGlobalVars(words[1], words[2])
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   640
        else:
544
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   641
            if self.ElementType == "function":
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   642
                self.ReturnType.Clear()
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   643
                for base_type in self.Controler.GetDataTypes(self.TagName, True):
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   644
                    self.ReturnType.Append(base_type)
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   645
                returnType = self.Controler.GetEditedElementInterfaceReturnType(self.TagName)
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   646
            else:
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   647
                returnType = None
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   648
            self.PouIsUsed = self.Controler.PouIsUsed(words[1])
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   649
            self.Values = self.Controler.GetEditedElementInterfaceVars(self.TagName)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   650
        
544
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   651
        if returnType is not None:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   652
            self.ReturnType.SetStringSelection(returnType)
544
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   653
            self.ReturnType.Enable(True)
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   654
            self.staticText1.Show()
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   655
            self.ReturnType.Show()
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   656
        else:
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   657
            self.ReturnType.Enable(False)
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   658
            self.staticText1.Hide()
ad4dd01c3c35 Adding support for selecting user data type for function return type
laurent
parents: 520
diff changeset
   659
            self.ReturnType.Hide()
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   660
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   661
        self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   662
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   663
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   664
    def OnReturnTypeChanged(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   665
        words = self.TagName.split("::")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   666
        self.Controler.SetPouInterfaceReturnType(words[1], self.ReturnType.GetStringSelection())
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   667
        self.Controler.BufferProject()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   668
        self.ParentWindow.RefreshEditor(variablepanel = False)
494
c91644c2bfa7 Bug on FileMenu not refreshed when modifications fixed
laurent
parents: 491
diff changeset
   669
        self.ParentWindow._Refresh(TITLE, FILEMENU, EDITMENU, INSTANCESTREE, LIBRARYTREE)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   670
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   671
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   672
    def OnClassFilter(self, event):
509
6f72513bc074 Bug on variable panel row size in grid preventing readability of value inside cell editors fixed
laurent
parents: 507
diff changeset
   673
        self.Filter = self.FilterChoiceTransfer[VARIABLE_CHOICES_DICT[self.ClassFilter.GetStringSelection()]]
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   674
        self.RefreshTypeList()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   675
        self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   676
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   677
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   678
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   679
    def RefreshTypeList(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   680
        if self.Filter == "All":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   681
            self.ClassList = [self.FilterChoiceTransfer[choice] for choice in self.FilterChoices if self.FilterChoiceTransfer[choice] not in ["All","Interface","Variables"]]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   682
        elif self.Filter == "Interface":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   683
            self.ClassList = ["Input","Output","InOut","External"]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   684
        elif self.Filter == "Variables":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   685
            self.ClassList = ["Local","Temp"]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   686
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   687
            self.ClassList = [self.Filter]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   688
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   689
    def RefreshButtons(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   690
        if getattr(self, "Table", None):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   691
            table_length = len(self.Table.data)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   692
            row_class = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   693
            row_edit = True
496
5ff24ccff2c7 Disable Up and Down buttons when not useful
laurent
parents: 494
diff changeset
   694
            row = 0
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   695
            if table_length > 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   696
                row = self.VariablesGrid.GetGridCursorRow()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   697
                row_edit = self.Table.GetValueByName(row, "Edit")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   698
                if self.PouIsUsed:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   699
                    row_class = self.Table.GetValueByName(row, "Class")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   700
            self.AddButton.Enable(not self.PouIsUsed or self.Filter not in ["Interface", "Input", "Output", "InOut"])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   701
            self.DeleteButton.Enable(table_length > 0 and row_edit and row_class not in ["Input", "Output", "InOut"])
496
5ff24ccff2c7 Disable Up and Down buttons when not useful
laurent
parents: 494
diff changeset
   702
            self.UpButton.Enable(table_length > 0 and row > 0 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
5ff24ccff2c7 Disable Up and Down buttons when not useful
laurent
parents: 494
diff changeset
   703
            self.DownButton.Enable(table_length > 0 and row < table_length - 1 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   704
561
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   705
    def CloseVariablesGridEditControl(self):
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   706
        row = self.VariablesGrid.GetGridCursorRow()
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   707
        col = self.VariablesGrid.GetGridCursorCol()
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   708
        self.VariablesGrid.SetGridCursor(row, col)
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   709
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   710
    def OnAddButton(self, event):
561
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   711
        self.CloseVariablesGridEditControl()
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   712
        new_row = self.DefaultValue.copy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   713
        if self.Filter in self.DefaultTypes:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   714
            new_row["Class"] = self.DefaultTypes[self.Filter]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   715
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   716
            new_row["Class"] = self.Filter
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   717
        if self.Filter == "All" and len(self.Values) > 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   718
            row_index = self.VariablesGrid.GetGridCursorRow() + 1
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   719
            self.Values.insert(row_index, new_row)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   720
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   721
            row_index = -1
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   722
            self.Values.append(new_row)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   723
        self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   724
        self.RefreshValues(row_index)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   725
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   726
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   727
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   728
    def OnDeleteButton(self, event):
561
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   729
        self.CloseVariablesGridEditControl()
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   730
        row_index = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   731
        self.Values.remove(row_index)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   732
        self.SaveValues()
561
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   733
        self.RefreshValues(row_index)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   734
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   735
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   736
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   737
    def OnUpButton(self, event):
561
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   738
        self.CloseVariablesGridEditControl()
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   739
        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), -1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   740
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   741
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   742
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   743
    def OnDownButton(self, event):
561
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   744
        self.CloseVariablesGridEditControl()
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   745
        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), 1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   746
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   747
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   748
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   749
    def OnVariablesGridCellChange(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   750
        row, col = event.GetRow(), event.GetCol()
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   751
        colname = self.Table.GetColLabelValue(col, False)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   752
        value = self.Table.GetValue(row, col)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   753
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   754
        if colname == "Name" and value != "":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   755
            if not TestIdentifier(value):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   756
                message = wx.MessageDialog(self, _("\"%s\" is not a valid identifier!")%value, _("Error"), wx.OK|wx.ICON_ERROR)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   757
                message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   758
                message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   759
                event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   760
            elif value.upper() in IEC_KEYWORDS:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   761
                message = wx.MessageDialog(self, _("\"%s\" is a keyword. It can't be used!")%value, _("Error"), wx.OK|wx.ICON_ERROR)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   762
                message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   763
                message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   764
                event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   765
            elif value.upper() in self.PouNames:
446
0dd1a5f2a7a1 Update internationalization
laurent
parents: 443
diff changeset
   766
                message = wx.MessageDialog(self, _("A POU named \"%s\" already exists!")%value, _("Error"), wx.OK|wx.ICON_ERROR)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   767
                message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   768
                message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   769
                event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   770
            elif value.upper() in [var["Name"].upper() for var in self.Values if var != self.Table.data[row]]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   771
                message = wx.MessageDialog(self, _("A variable with \"%s\" as name already exists in this pou!")%value, _("Error"), wx.OK|wx.ICON_ERROR)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   772
                message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   773
                message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   774
                event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   775
            else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   776
                self.SaveValues(False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   777
                old_value = self.Table.GetOldValue()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   778
                if old_value != "":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   779
                    self.Controler.UpdateEditedElementUsedVariable(self.TagName, old_value, value)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   780
                self.Controler.BufferProject()
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   781
                self.ParentWindow.RefreshEditor(variablepanel = False)
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   782
                self.ParentWindow._Refresh(TITLE, FILEMENU, EDITMENU, INSTANCESTREE, LIBRARYTREE)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   783
                event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   784
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   785
            self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   786
            if colname == "Class":
520
7ca6c3e076f7 Bug on changing variable class fixed
laurent
parents: 509
diff changeset
   787
                self.ParentWindow.RefreshEditor(variablepanel = False)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   788
            event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   789
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   790
    def OnVariablesGridEditorShown(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   791
        row, col = event.GetRow(), event.GetCol() 
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   792
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   793
        label_value = self.Table.GetColLabelValue(col)
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   794
        if label_value == "Type":
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   795
            type_menu = wx.Menu(title='')   # the root menu
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   796
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   797
            # build a submenu containing standard IEC types
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   798
            base_menu = wx.Menu(title='')
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   799
            for base_type in self.Controler.GetBaseTypes():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   800
                new_id = wx.NewId()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   801
                AppendMenu(base_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=base_type)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   802
                self.Bind(wx.EVT_MENU, self.GetVariableTypeFunction(base_type), id=new_id)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   803
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   804
            type_menu.AppendMenu(wx.NewId(), _("Base Types"), base_menu)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   805
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   806
            # build a submenu containing user-defined types
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   807
            datatype_menu = wx.Menu(title='')
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   808
            
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   809
            # TODO : remove complextypes argument when matiec can manage complex types in pou interface
491
d22a4a95fd5e Remove limitation on complex types in POU interface
laurent
parents: 484
diff changeset
   810
            datatypes = self.Controler.GetDataTypes(basetypes = False)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   811
            for datatype in datatypes:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   812
                new_id = wx.NewId()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   813
                AppendMenu(datatype_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=datatype)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   814
                self.Bind(wx.EVT_MENU, self.GetVariableTypeFunction(datatype), id=new_id)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   815
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   816
            type_menu.AppendMenu(wx.NewId(), _("User Data Types"), datatype_menu)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   817
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   818
            # build a submenu containing function block types
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   819
            bodytype = self.Controler.GetEditedElementBodyType(self.TagName)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   820
            pouname, poutype = self.Controler.GetEditedElementType(self.TagName)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   821
            classtype = self.Table.GetValueByName(row, "Class")
507
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   822
            
556
69214983dd03 Enabling support for direct array variable declaration
laurent
parents: 552
diff changeset
   823
            new_id = wx.NewId()
69214983dd03 Enabling support for direct array variable declaration
laurent
parents: 552
diff changeset
   824
            AppendMenu(type_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=_("Array"))
69214983dd03 Enabling support for direct array variable declaration
laurent
parents: 552
diff changeset
   825
            self.Bind(wx.EVT_MENU, self.VariableArrayTypeFunction, id=new_id)
507
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   826
            
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   827
            if classtype in ["Input", "Output", "InOut", "External", "Global"] or \
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   828
            poutype != "function" and bodytype in ["ST", "IL"]:
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   829
                functionblock_menu = wx.Menu(title='')
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   830
                fbtypes = self.Controler.GetFunctionBlockTypes(self.TagName)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   831
                for functionblock_type in fbtypes:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   832
                    new_id = wx.NewId()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   833
                    AppendMenu(functionblock_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=functionblock_type)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   834
                    self.Bind(wx.EVT_MENU, self.GetVariableTypeFunction(functionblock_type), id=new_id)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   835
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   836
                type_menu.AppendMenu(wx.NewId(), _("Function Block Types"), functionblock_menu)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   837
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   838
            rect = self.VariablesGrid.BlockToDeviceRect((row, col), (row, col))
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   839
            corner_x = rect.x + rect.width
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   840
            corner_y = rect.y + self.VariablesGrid.GetColLabelSize()
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   841
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   842
            # pop up this new menu
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   843
            self.VariablesGrid.PopupMenuXY(type_menu, corner_x, corner_y)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   844
            event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   845
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   846
            event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   847
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   848
    def GetVariableTypeFunction(self, base_type):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   849
        def VariableTypeFunction(event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   850
            row = self.VariablesGrid.GetGridCursorRow()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   851
            self.Table.SetValueByName(row, "Type", base_type)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   852
            self.Table.ResetView(self.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   853
            self.SaveValues(False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   854
            self.ParentWindow.RefreshEditor(variablepanel = False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   855
            self.Controler.BufferProject()
494
c91644c2bfa7 Bug on FileMenu not refreshed when modifications fixed
laurent
parents: 491
diff changeset
   856
            self.ParentWindow._Refresh(TITLE, FILEMENU, EDITMENU, INSTANCESTREE, LIBRARYTREE)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   857
        return VariableTypeFunction
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   858
    
507
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   859
    def VariableArrayTypeFunction(self, event):
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   860
        row = self.VariablesGrid.GetGridCursorRow()
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   861
        dialog = ArrayTypeDialog(self, 
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   862
                                 self.Controler.GetDataTypes(self.TagName), 
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   863
                                 self.Table.GetValueByName(row, "Type"))
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   864
        if dialog.ShowModal() == wx.ID_OK:
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   865
            self.Table.SetValueByName(row, "Type", dialog.GetValue())
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   866
            self.Table.ResetView(self.VariablesGrid)
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   867
            self.SaveValues(False)
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   868
            self.ParentWindow.RefreshEditor(variablepanel = False)
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   869
            self.Controler.BufferProject()
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   870
            self.ParentWindow._Refresh(TITLE, FILEMENU, EDITMENU, INSTANCESTREE, LIBRARYTREE)
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   871
        dialog.Destroy()
42150e041dbe Adding support for direct array variable declaration in variable panel (still disable cause matiec doesn't support this feature)
laurent
parents: 496
diff changeset
   872
    
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   873
    def OnVariablesGridCellLeftClick(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   874
        row = event.GetRow()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   875
        if event.GetCol() == 0 and self.Table.GetValueByName(row, "Edit"):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   876
            row = event.GetRow()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   877
            var_name = self.Table.GetValueByName(row, "Name")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   878
            var_class = self.Table.GetValueByName(row, "Class")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   879
            var_type = self.Table.GetValueByName(row, "Type")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   880
            data = wx.TextDataObject(str((var_name, var_class, var_type, self.TagName)))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   881
            dragSource = wx.DropSource(self.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   882
            dragSource.SetData(data)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   883
            dragSource.DoDragDrop()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   884
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   885
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   886
    def OnVariablesGridSelectCell(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   887
        wx.CallAfter(self.RefreshButtons)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   888
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   889
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   890
    def OnChar(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   891
        keycode = event.GetKeyCode()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   892
        if keycode == wx.WXK_DELETE:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   893
            row = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   894
            self.Values.remove(row)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   895
            self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   896
            self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   897
            self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   898
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   899
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   900
    def MoveValue(self, value_index, move):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   901
        new_index = max(0, min(value_index + move, len(self.Values) - 1))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   902
        if new_index != value_index:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   903
            self.Values.insert(new_index, self.Values.pop(value_index))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   904
            self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   905
            self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   906
            self.VariablesGrid.SetGridCursor(new_index, self.VariablesGrid.GetGridCursorCol())
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   907
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   908
    def RefreshValues(self, select=0):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   909
        data = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   910
        for num, variable in enumerate(self.Values):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   911
            if variable["Class"] in self.ClassList:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   912
                variable["Number"] = num + 1
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   913
                data.append(variable)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   914
        self.Table.SetData(data)
561
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   915
        self.Table.ResetView(self.VariablesGrid)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   916
        if len(self.Table.data) > 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   917
            if select == -1:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   918
                select = len(self.Table.data) - 1
561
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   919
            else:
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   920
                select = min(select, len(self.Table.data) - 1)
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   921
            col = max(1, self.VariablesGrid.GetGridCursorCol())
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   922
            self.VariablesGrid.SetGridCursor(select, col)
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   923
            self.VariablesGrid.MakeCellVisible(select, col)
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   924
            self.VariablesGrid.SetFocus()
5c8fa95eb834 Fixing bug in Variable Panel when pressing Add,Delete,Up or Down button while a cell editor in variable grid is active
laurent
parents: 556
diff changeset
   925
        
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   926
    def SaveValues(self, buffer = True):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   927
        words = self.TagName.split("::")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   928
        if self.ElementType == "config":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   929
            self.Controler.SetConfigurationGlobalVars(words[1], self.Values)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   930
        elif self.ElementType == "resource":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   931
            self.Controler.SetConfigurationResourceGlobalVars(words[1], words[2], self.Values)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   932
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   933
            if self.ReturnType.IsEnabled():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   934
                self.Controler.SetPouInterfaceReturnType(words[1], self.ReturnType.GetStringSelection())
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   935
            self.Controler.SetPouInterfaceVars(words[1], self.Values)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   936
        if buffer:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   937
            self.Controler.BufferProject()
494
c91644c2bfa7 Bug on FileMenu not refreshed when modifications fixed
laurent
parents: 491
diff changeset
   938
            self.ParentWindow._Refresh(TITLE, FILEMENU, EDITMENU, INSTANCESTREE, LIBRARYTREE)            
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   939
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   940
#-------------------------------------------------------------------------------
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   941
#                        Highlights showing functions
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   942
#-------------------------------------------------------------------------------
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   943
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   944
    def OnRefreshHighlightsTimer(self, event):
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   945
        self.Table.ResetView(self.VariablesGrid)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   946
        event.Skip()
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   947
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   948
    def AddVariableHighlight(self, infos, highlight_type):
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   949
        if isinstance(infos[0], TupleType):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   950
            for i in xrange(*infos[0]):
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   951
                self.Table.AddHighlight((i,) + infos[1:], highlight_type)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   952
        else:
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   953
            self.Table.AddHighlight(infos, highlight_type)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   954
        self.RefreshHighlightsTimer.Start(int(REFRESH_HIGHLIGHT_PERIOD * 1000), oneShot=True)
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   955
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   956
    def ClearHighlights(self, highlight_type=None):
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   957
        self.Table.ClearHighlights(highlight_type)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   958
        self.Table.ResetView(self.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   959
566
6014ef82a98a Adding support for searching text or regular expression in whole project
laurent
parents: 564
diff changeset
   960
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   961
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   962
class LocationCellControl(wx.PyControl):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   963
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   964
    def _init_coll_MainSizer_Items(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   965
        parent.AddWindow(self.Location, 0, border=0, flag=wx.GROW)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   966
        parent.AddWindow(self.BrowseButton, 0, border=0, flag=wx.GROW)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   967
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   968
    def _init_coll_MainSizer_Growables(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   969
        parent.AddGrowableCol(0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   970
        parent.AddGrowableRow(0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   971
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   972
    def _init_sizers(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   973
        self.MainSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=1, vgap=0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   974
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   975
        self._init_coll_MainSizer_Items(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   976
        self._init_coll_MainSizer_Growables(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   977
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   978
        self.SetSizer(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   979
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   980
    def _init_ctrls(self, prnt):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   981
        wx.Control.__init__(self, id=-1, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   982
              name='LocationCellControl', parent=prnt,  
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   983
              size=wx.DefaultSize, style=0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   984
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   985
        # create location text control
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   986
        self.Location = wx.TextCtrl(id=-1, name='Location', parent=self,
443
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   987
              pos=wx.Point(0, 0), size=wx.Size(0, 0), style=wx.TE_PROCESS_ENTER)
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   988
        self.Location.Bind(wx.EVT_KEY_DOWN, self.OnLocationChar)
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   989
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   990
        # create browse button
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   991
        self.BrowseButton = wx.Button(id=-1, label='...', 
564
5024d42e1050 Adding custom cell editor for interval value in task informations of ResourceEditor
laurent
parents: 561
diff changeset
   992
              name='BrowseButton', parent=self, pos=wx.Point(0, 0), 
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   993
              size=wx.Size(30, 0), style=0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   994
        self.BrowseButton.Bind(wx.EVT_BUTTON, self.OnBrowseButtonClick)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   995
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   996
        self.Bind(wx.EVT_SIZE, self.OnSize)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   997
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   998
        self._init_sizers()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   999
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1000
    '''
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1001
    Custom cell editor control with a text box and a button that launches
564
5024d42e1050 Adding custom cell editor for interval value in task informations of ResourceEditor
laurent
parents: 561
diff changeset
  1002
    the BrowseLocationsDialog.
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1003
    '''
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1004
    def __init__(self, parent, locations):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1005
        self._init_ctrls(parent)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1006
        self.Locations = locations
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1007
        self.VarType = None
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1008
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1009
    def SetVarType(self, vartype):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1010
        self.VarType = vartype
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1011
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1012
    def SetValue(self, value):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1013
        self.Location.SetValue(value)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1014
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1015
    def GetValue(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1016
        return self.Location.GetValue()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1017
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1018
    def OnSize(self, event):
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
  1019
        self.Layout()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1020
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1021
    def OnBrowseButtonClick(self, event):
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1022
        # pop up the location browser dialog
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1023
        dialog = BrowseLocationsDialog(self, self.VarType, self.Locations)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1024
        if dialog.ShowModal() == wx.ID_OK:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1025
            infos = dialog.GetValues()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1026
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1027
            # set the location
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1028
            self.Location.SetValue(infos["location"])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1029
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1030
        dialog.Destroy()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1031
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1032
        self.Location.SetFocus()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1033
443
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1034
    def OnLocationChar(self, event):
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1035
        keycode = event.GetKeyCode()
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1036
        if keycode == wx.WXK_RETURN or keycode == wx.WXK_TAB:
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1037
            self.Parent.Parent.ProcessEvent(event)
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1038
            self.Parent.Parent.SetFocus()
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1039
        else:
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1040
            event.Skip()
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1041
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1042
    def SetInsertionPoint(self, i):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1043
        self.Location.SetInsertionPoint(i)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1044
    
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1045
    def SetFocus(self):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1046
        self.Location.SetFocus()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1047
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1048
class LocationCellEditor(wx.grid.PyGridCellEditor):
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1049
    '''
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1050
    Grid cell editor that uses LocationCellControl to display a browse button.
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1051
    '''
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1052
    def __init__(self, table, controler):
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1053
        wx.grid.PyGridCellEditor.__init__(self)
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1054
        self.Table = table
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1055
        self.Controler = controler
443
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1056
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1057
    def __del__(self):
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1058
        self.CellControl = None
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
  1059
    
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1060
    def Create(self, parent, id, evt_handler):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1061
        locations = self.Controler.GetVariableLocationTree()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1062
        if len(locations) > 0:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1063
            self.CellControl = LocationCellControl(parent, locations)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1064
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1065
            self.CellControl = wx.TextCtrl(parent, -1)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1066
        self.SetControl(self.CellControl)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1067
        if evt_handler:
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1068
            self.CellControl.PushEventHandler(evt_handler)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1069
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1070
    def BeginEdit(self, row, col, grid):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1071
        self.CellControl.SetValue(self.Table.GetValueByName(row, 'Location'))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1072
        if isinstance(self.CellControl, LocationCellControl):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1073
            self.CellControl.SetVarType(self.Controler.GetBaseType(self.Table.GetValueByName(row, 'Type')))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1074
        self.CellControl.SetFocus()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1075
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1076
    def EndEdit(self, row, col, grid):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1077
        loc = self.CellControl.GetValue()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1078
        old_loc = self.Table.GetValueByName(row, 'Location')
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1079
        if loc != old_loc:
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1080
            self.Table.SetValueByName(row, 'Location', loc)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1081
            return True
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1082
        return False
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1083
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1084
    def SetSize(self, rect):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1085
        self.CellControl.SetDimensions(rect.x + 1, rect.y,
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
  1086
                                        rect.width, rect.height,
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1087
                                        wx.SIZE_ALLOW_MINUS_ONE)
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1088
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1089
    def Clone(self):
564
5024d42e1050 Adding custom cell editor for interval value in task informations of ResourceEditor
laurent
parents: 561
diff changeset
  1090
        return LocationCellEditor(self.Table, self.Controler)
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1091
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1092
def GetDirChoiceOptions():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1093
    _ = lambda x : x
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1094
    return [(_("All"), [LOCATION_VAR_INPUT, LOCATION_VAR_OUTPUT, LOCATION_VAR_MEMORY]), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1095
            (_("Input"), [LOCATION_VAR_INPUT]), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1096
            (_("Output"), [LOCATION_VAR_OUTPUT]), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1097
            (_("Memory"), [LOCATION_VAR_MEMORY])]
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1098
DIRCHOICE_OPTIONS_FILTER = dict([(_(option), filter) for option, filter in GetDirChoiceOptions()])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1099
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1100
# turn LOCATIONDATATYPES inside-out
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1101
LOCATION_SIZES = {}
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1102
for size, types in LOCATIONDATATYPES.iteritems():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1103
    for type in types:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1104
        LOCATION_SIZES[type] = size
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1105
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1106
[ID_BROWSELOCATIONSDIALOG, ID_BROWSELOCATIONSDIALOGLOCATIONSTREE, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1107
 ID_BROWSELOCATIONSDIALOGDIRCHOICE, ID_BROWSELOCATIONSDIALOGSTATICTEXT1, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1108
 ID_BROWSELOCATIONSDIALOGSTATICTEXT2, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1109
] = [wx.NewId() for _init_ctrls in range(5)]
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1110
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1111
class BrowseLocationsDialog(wx.Dialog):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1112
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1113
    if wx.VERSION < (2, 6, 0):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1114
        def Bind(self, event, function, id = None):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1115
            if id is not None:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1116
                event(self, id, function)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1117
            else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1118
                event(self, function)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1119
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1120
    def _init_coll_MainSizer_Items(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1121
        parent.AddWindow(self.staticText1, 0, border=20, flag=wx.TOP|wx.LEFT|wx.RIGHT|wx.GROW)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1122
        parent.AddWindow(self.LocationsTree, 0, border=20, flag=wx.LEFT|wx.RIGHT|wx.GROW)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1123
        parent.AddSizer(self.ButtonGridSizer, 0, border=20, flag=wx.LEFT|wx.RIGHT|wx.BOTTOM|wx.GROW)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1124
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1125
    def _init_coll_MainSizer_Growables(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1126
        parent.AddGrowableCol(0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1127
        parent.AddGrowableRow(1)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1128
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1129
    def _init_coll_ButtonGridSizer_Items(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1130
        parent.AddWindow(self.staticText2, 0, border=0, flag=wx.ALIGN_CENTER_VERTICAL)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1131
        parent.AddWindow(self.DirChoice, 0, border=0, flag=wx.ALIGN_CENTER_VERTICAL)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1132
        parent.AddSizer(self.ButtonSizer, 0, border=0, flag=wx.ALIGN_RIGHT)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1133
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1134
    def _init_coll_ButtonGridSizer_Growables(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1135
        parent.AddGrowableCol(2)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1136
        parent.AddGrowableRow(0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1137
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1138
    def _init_sizers(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1139
        self.MainSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=3, vgap=10)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1140
        self.ButtonGridSizer = wx.FlexGridSizer(cols=3, hgap=5, rows=1, vgap=0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1141
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1142
        self._init_coll_MainSizer_Items(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1143
        self._init_coll_MainSizer_Growables(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1144
        self._init_coll_ButtonGridSizer_Items(self.ButtonGridSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1145
        self._init_coll_ButtonGridSizer_Growables(self.ButtonGridSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1146
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1147
        self.SetSizer(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1148
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1149
    def _init_ctrls(self, prnt):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1150
        wx.Dialog.__init__(self, id=ID_BROWSELOCATIONSDIALOG, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1151
              name='BrowseLocationsDialog', parent=prnt,  
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1152
              size=wx.Size(600, 400), style=wx.DEFAULT_DIALOG_STYLE|wx.RESIZE_BORDER,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1153
              title=_('Browse Locations'))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1154
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1155
        self.staticText1 = wx.StaticText(id=ID_BROWSELOCATIONSDIALOGSTATICTEXT1,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1156
              label=_('Locations available:'), name='staticText1', parent=self,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1157
              pos=wx.Point(0, 0), size=wx.DefaultSize, style=0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1158
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1159
        if wx.Platform == '__WXMSW__':
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1160
            treestyle = wx.TR_HAS_BUTTONS|wx.TR_SINGLE|wx.SUNKEN_BORDER
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1161
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1162
            treestyle = wx.TR_HAS_BUTTONS|wx.TR_HIDE_ROOT|wx.TR_SINGLE|wx.SUNKEN_BORDER
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1163
        self.LocationsTree = wx.TreeCtrl(id=ID_BROWSELOCATIONSDIALOGLOCATIONSTREE,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1164
              name='LocationsTree', parent=self, pos=wx.Point(0, 0),
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1165
              size=wx.Size(0, 0), style=treestyle)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1166
        self.Bind(wx.EVT_TREE_ITEM_ACTIVATED, self.OnLocationsTreeItemActivated, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1167
                  id=ID_BROWSELOCATIONSDIALOGLOCATIONSTREE)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1168
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1169
        self.staticText2 = wx.StaticText(id=ID_BROWSELOCATIONSDIALOGSTATICTEXT2,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1170
              label=_('Direction:'), name='staticText2', parent=self,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1171
              pos=wx.Point(0, 0), size=wx.DefaultSize, style=0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1172
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1173
        self.DirChoice = wx.ComboBox(id=ID_BROWSELOCATIONSDIALOGDIRCHOICE,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1174
              name='DirChoice', parent=self, pos=wx.Point(0, 0),
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1175
              size=wx.DefaultSize, style=wx.CB_READONLY)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1176
        self.Bind(wx.EVT_COMBOBOX, self.OnDirChoice, id=ID_BROWSELOCATIONSDIALOGDIRCHOICE)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1177
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1178
        self.ButtonSizer = self.CreateButtonSizer(wx.OK|wx.CANCEL|wx.CENTRE)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1179
        if wx.VERSION >= (2, 5, 0):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1180
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.ButtonSizer.GetAffirmativeButton().GetId())
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1181
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1182
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.ButtonSizer.GetChildren()[0].GetSizer().GetChildren()[0].GetWindow().GetId())
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1183
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1184
        self._init_sizers()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1185
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1186
    def __init__(self, parent, var_type, locations):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1187
        self._init_ctrls(parent)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1188
        self.VarType = var_type
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1189
        self.Locations = locations
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1190
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1191
        # Define Tree item icon list
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1192
        self.TreeImageList = wx.ImageList(16, 16)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1193
        self.TreeImageDict = {}
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1194
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1195
        # Icons for items
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1196
        for imgname, itemtype in [
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1197
            ("CONFIGURATION", LOCATION_PLUGIN), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1198
            ("RESOURCE",      LOCATION_MODULE), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1199
            ("PROGRAM",       LOCATION_GROUP), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1200
            ("VAR_INPUT",     LOCATION_VAR_INPUT), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1201
            ("VAR_OUTPUT",    LOCATION_VAR_OUTPUT), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1202
            ("VAR_LOCAL",     LOCATION_VAR_MEMORY)]:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1203
            self.TreeImageDict[itemtype]=self.TreeImageList.Add(wx.Bitmap(os.path.join(CWD, 'Images', '%s.png'%imgname)))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1204
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1205
        # Assign icon list to TreeCtrls
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1206
        self.LocationsTree.SetImageList(self.TreeImageList)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1207
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1208
        # Set a options for the choice
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1209
        for option, filter in GetDirChoiceOptions():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1210
            self.DirChoice.Append(_(option))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1211
        self.DirChoice.SetStringSelection(_("All"))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1212
        self.RefreshFilter()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1213
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1214
        self.RefreshLocationsTree()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1215
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1216
    def RefreshFilter(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1217
        self.Filter = DIRCHOICE_OPTIONS_FILTER[self.DirChoice.GetStringSelection()]
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1218
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1219
    def RefreshLocationsTree(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1220
        root = self.LocationsTree.GetRootItem()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1221
        if not root.IsOk():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1222
            if wx.Platform == '__WXMSW__':
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1223
                root = self.LocationsTree.AddRoot(_('Plugins'))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1224
            else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1225
                root = self.LocationsTree.AddRoot("")
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1226
        self.GenerateLocationsTreeBranch(root, self.Locations)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1227
        self.LocationsTree.Expand(root)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1228
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1229
    def GenerateLocationsTreeBranch(self, root, locations):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1230
        to_delete = []
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1231
        if wx.VERSION >= (2, 6, 0):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1232
            item, root_cookie = self.LocationsTree.GetFirstChild(root)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1233
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1234
            item, root_cookie = self.LocationsTree.GetFirstChild(root, 0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1235
        for loc_infos in locations:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1236
            infos = loc_infos.copy()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1237
            if infos["type"] in [LOCATION_PLUGIN, LOCATION_MODULE, LOCATION_GROUP] or\
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1238
               infos["type"] in self.Filter and (infos["IEC_type"] == self.VarType or
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1239
               infos["IEC_type"] is None and LOCATION_SIZES[self.VarType] == infos["size"]):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1240
                children = [child for child in infos.pop("children")]
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1241
                if not item.IsOk():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1242
                    item = self.LocationsTree.AppendItem(root, infos["name"])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1243
                    if wx.Platform != '__WXMSW__':
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1244
                        item, root_cookie = self.LocationsTree.GetNextChild(root, root_cookie)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1245
                else:
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1246
                    self.LocationsTree.SetItemText(item, infos["name"])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1247
                self.LocationsTree.SetPyData(item, infos)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1248
                self.LocationsTree.SetItemImage(item, self.TreeImageDict[infos["type"]])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1249
                self.GenerateLocationsTreeBranch(item, children)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1250
                item, root_cookie = self.LocationsTree.GetNextChild(root, root_cookie)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1251
        while item.IsOk():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1252
            to_delete.append(item)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1253
            item, root_cookie = self.LocationsTree.GetNextChild(root, root_cookie)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1254
        for item in to_delete:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1255
            self.LocationsTree.Delete(item)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1256
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1257
    def OnLocationsTreeItemActivated(self, event):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1258
        infos = self.LocationsTree.GetPyData(event.GetItem())
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1259
        if infos["type"] not in [LOCATION_PLUGIN, LOCATION_MODULE, LOCATION_GROUP]:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1260
            wx.CallAfter(self.EndModal, wx.ID_OK)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1261
        event.Skip()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1262
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1263
    def OnDirChoice(self, event):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1264
        self.RefreshFilter()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1265
        self.RefreshLocationsTree()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1266
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1267
    def GetValues(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1268
        selected = self.LocationsTree.GetSelection()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1269
        return self.LocationsTree.GetPyData(selected)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1270
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1271
    def OnOK(self, event):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1272
        selected = self.LocationsTree.GetSelection()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1273
        var_infos = None
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1274
        if selected.IsOk():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1275
            var_infos = self.LocationsTree.GetPyData(selected)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1276
        if var_infos is None or var_infos["type"] in [LOCATION_PLUGIN, LOCATION_MODULE, LOCATION_GROUP]:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1277
            message = wx.MessageDialog(self, _("A location must be selected!"), _("Error"), wx.OK|wx.ICON_ERROR)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1278
            message.ShowModal()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1279
            message.Destroy()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1280
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1281
            self.EndModal(wx.ID_OK)