VariablePanel.py
author laurent
Sat, 12 Dec 2009 20:37:35 +0100
changeset 484 acef952101a5
parent 483 779a519f78f2
child 491 d22a4a95fd5e
permissions -rw-r--r--
Adding support for excluding option when not available according to IEC 61131 standard
Disabling use of complex types (array and structure) for POU interface until matiec can generate code
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     1
# -*- coding: utf-8 -*-
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     2
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     3
#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
     4
#based on the plcopen standard. 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     5
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     6
#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
     7
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     8
#See COPYING file for copyrights details.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
     9
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    10
#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
    11
#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
    12
#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
    13
#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
    14
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    15
#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
    16
#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
    17
#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
    18
#General Public License for more details.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    19
#
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    20
#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
    21
#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
    22
#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
    23
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
    24
import os
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    25
import wx, wx.grid
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    26
419
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
    27
from types import TupleType
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
    28
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    29
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
    30
from PLCControler import LOCATION_PLUGIN, LOCATION_MODULE, LOCATION_GROUP, 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
    31
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
    32
CWD = os.path.split(os.path.realpath(__file__))[0]
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    33
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    34
# Compatibility function for wx versions < 2.6
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    35
def AppendMenu(parent, help, id, kind, text):
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    36
    if wx.VERSION >= (2, 6, 0):
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    37
        parent.Append(help=help, id=id, kind=kind, text=text)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    38
    else:
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    39
        parent.Append(helpString=help, id=id, kind=kind, item=text)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    40
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    41
[TITLE, TOOLBAR, FILEMENU, EDITMENU, DISPLAYMENU, TYPESTREE, 
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    42
 INSTANCESTREE, LIBRARYTREE, SCALING
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
    43
] = range(9)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    44
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    45
#-------------------------------------------------------------------------------
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    46
#                            Variables Editor Panel
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
def GetVariableTableColnames(location):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    50
    _ = lambda x : x
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    51
    if location:
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
    52
    	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
    53
    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
    54
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    55
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
    56
    _ = lambda x : x
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    57
    options = [""]
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    58
    if constant:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    59
        options.append(_("Constant"))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    60
    if retain:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    61
        options.append(_("Retain"))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    62
    if non_retain:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    63
        options.append(_("Non-Retain"))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    64
    return options
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
    65
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
    66
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    67
def GetFilterChoiceTransfer():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    68
    _ = lambda x : x
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    69
    return {_("All"): _("All"), _("Interface"): _("Interface"), 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    70
            _("   Input"): _("Input"), _("   Output"): _("Output"), _("   InOut"): _("InOut"), 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    71
            _("   External"): _("External"), _("Variables"): _("Variables"), _("   Local"): _("Local"),
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    72
            _("   Temp"): _("Temp"), _("Global"): _("Global")}#, _("Access") : _("Access")}
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    73
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
    74
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    75
CheckOptionForClass = {"Local": lambda x: x,
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    76
                       "Temp": lambda x: "",
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    77
                       "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
    78
                       "InOut": lambda x: "",
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    79
                       "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
    80
                       "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
    81
                       "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
    82
                      }
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
    83
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    84
class VariableTable(wx.grid.PyGridTableBase):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    85
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    86
    """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    87
    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
    88
    """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    89
    def __init__(self, parent, data, colnames):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    90
        # The base class must be initialized *first*
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    91
        wx.grid.PyGridTableBase.__init__(self)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    92
        self.data = data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    93
        self.old_value = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    94
        self.colnames = colnames
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    95
        self.Errors = {}
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    96
        self.Parent = parent
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    97
        # XXX
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
    98
        # 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
    99
        # see if the table has changed size
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   100
        self._rows = self.GetNumberRows()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   101
        self._cols = self.GetNumberCols()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   102
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   103
    def GetNumberCols(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   104
        return len(self.colnames)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   105
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   106
    def GetNumberRows(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   107
        return len(self.data)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   108
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   109
    def GetColLabelValue(self, col, translate=True):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   110
        if col < len(self.colnames):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   111
            if translate:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   112
                return _(self.colnames[col])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   113
            return self.colnames[col]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   114
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   115
    def GetRowLabelValues(self, row, translate=True):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   116
        return row
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   117
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   118
    def GetValue(self, row, col):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   119
        if row < self.GetNumberRows():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   120
            if col == 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   121
                return self.data[row]["Number"]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   122
            colname = self.GetColLabelValue(col, False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   123
            value = str(self.data[row].get(colname, ""))
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   124
            if colname in ["Class", "Option"]:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   125
                return _(value)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   126
            return value
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   127
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   128
    def SetValue(self, row, col, value):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   129
        if col < len(self.colnames):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   130
            colname = self.GetColLabelValue(col, False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   131
            if colname == "Name":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   132
                self.old_value = self.data[row][colname]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   133
            elif colname == "Class":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   134
                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
   135
                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
   136
                if value == "External":
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   137
                    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
   138
            elif colname == "Option":
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   139
                value = OPTIONS_DICT[value]
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   140
            self.data[row][colname] = value
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   141
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   142
    def GetValueByName(self, row, colname):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   143
        if row < self.GetNumberRows():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   144
            return self.data[row].get(colname)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   145
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   146
    def SetValueByName(self, row, colname, value):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   147
        if row < self.GetNumberRows():
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 GetOldValue(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   151
        return self.old_value
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   152
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   153
    def ResetView(self, grid):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   154
        """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   155
        (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
   156
        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
   157
        """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   158
        grid.BeginBatch()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   159
        for current, new, delmsg, addmsg in [
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   160
            (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
   161
            (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
   162
        ]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   163
            if new < current:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   164
                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
   165
                grid.ProcessTableMessage(msg)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   166
            elif new > current:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   167
                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
   168
                grid.ProcessTableMessage(msg)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   169
                self.UpdateValues(grid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   170
        grid.EndBatch()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   171
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   172
        self._rows = self.GetNumberRows()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   173
        self._cols = self.GetNumberCols()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   174
        # update the column rendering scheme
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   175
        self._updateColAttrs(grid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   176
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   177
        # 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
   178
        grid.AdjustScrollbars()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   179
        grid.ForceRefresh()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   180
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   181
    def UpdateValues(self, grid):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   182
        """Update all displayed values"""
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   183
        # 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
   184
        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
   185
        grid.ProcessTableMessage(msg)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   186
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   187
    def _updateColAttrs(self, grid):
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
        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
   190
        appropriate renderer given the column name.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   191
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   192
        Otherwise default to the default renderer.
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   193
        """
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   194
        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
   195
            var_class = self.GetValueByName(row, "Class")
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   196
            for col in range(self.GetNumberCols()):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   197
                editor = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   198
                renderer = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   199
                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
   200
                if colname == "Option":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   201
                    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
   202
                                         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
   203
                                         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
   204
                    if len(options) > 1:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   205
                        editor = wx.grid.GridCellChoiceEditor()
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   206
                        editor.SetParameters(",".join(map(_, options)))
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   207
                    else:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   208
                        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
   209
                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
   210
                    grid.SetReadOnly(row, col, False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   211
                    if colname == "Name":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   212
                        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
   213
                            grid.SetReadOnly(row, col, True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   214
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   215
                            editor = wx.grid.GridCellTextEditor()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   216
                            renderer = wx.grid.GridCellStringRenderer()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   217
                    elif colname == "Initial Value":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   218
                        if var_class != "External":
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   219
                            editor = wx.grid.GridCellTextEditor()
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   220
                            renderer = wx.grid.GridCellStringRenderer()
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   221
                        else:
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   222
                            grid.SetReadOnly(row, col, True)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   223
                    elif colname == "Location":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   224
                        if var_class in ["Local", "Global"]:
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   225
                            editor = LocationCellEditor(self, self.Parent.Controler)
418
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
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   228
                            grid.SetReadOnly(row, col, True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   229
                    elif colname == "Class":
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   230
                        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
   231
                            grid.SetReadOnly(row, col, True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   232
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   233
                            editor = wx.grid.GridCellChoiceEditor()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   234
                            excluded = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   235
                            if self.Parent.PouIsUsed:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   236
                                excluded.extend(["Input","Output","InOut"])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   237
                            if self.Parent.IsFunctionBlockType(self.data[row]["Type"]):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   238
                                excluded.extend(["Local","Temp"])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   239
                            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
   240
                elif colname != "Documentation":
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   241
                    grid.SetReadOnly(row, col, True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   242
                
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   243
                grid.SetCellEditor(row, col, editor)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   244
                grid.SetCellRenderer(row, col, renderer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   245
                
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   246
                if row in self.Errors and self.Errors[row][0] == colname.lower():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   247
                    grid.SetCellBackgroundColour(row, col, wx.Colour(255, 255, 0))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   248
                    grid.SetCellTextColour(row, col, wx.RED)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   249
                    grid.MakeCellVisible(row, col)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   250
                else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   251
                    grid.SetCellTextColour(row, col, wx.BLACK)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   252
                    grid.SetCellBackgroundColour(row, col, wx.WHITE)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   253
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   254
    def SetData(self, data):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   255
        self.data = data
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
    def GetData(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   258
        return self.data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   259
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   260
    def GetCurrentIndex(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   261
        return self.CurrentIndex
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   262
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   263
    def SetCurrentIndex(self, index):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   264
        self.CurrentIndex = index
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   265
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   266
    def AppendRow(self, row_content):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   267
        self.data.append(row_content)
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 RemoveRow(self, row_index):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   270
        self.data.pop(row_index)
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 GetRow(self, row_index):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   273
        return self.data[row_index]
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 Empty(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   276
        self.data = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   277
        self.editors = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   278
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   279
    def AddError(self, infos):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   280
        self.Errors[infos[0]] = infos[1:]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   281
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   282
    def ClearErrors(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   283
        self.Errors = {}
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   284
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   285
class VariableDropTarget(wx.TextDropTarget):
419
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   286
    '''
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   287
    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
   288
    column of a variable row.
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   289
    
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   290
    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
   291
        ('%ID0.0.0', 'location', 'REAL')
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   292
    
8f97ed01a6a6 VariablePanel.py also depends on types.TupleType
b.taylor@willowglen.ca
parents: 418
diff changeset
   293
    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
   294
    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
   295
    '''
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   296
    def __init__(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   297
        wx.TextDropTarget.__init__(self)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   298
        self.ParentWindow = parent
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   299
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   300
    def OnDropText(self, x, y, data):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   301
        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
   302
        col = self.ParentWindow.VariablesGrid.XToCol(x)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   303
        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
   304
        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
   305
            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
   306
                return
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   307
            message = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   308
            if not self.ParentWindow.Table.GetValueByName(row, "Edit"):
427
22d16c457d87 improved English spelling & grammar
b.taylor@willowglen.ca
parents: 425
diff changeset
   309
                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
   310
            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
   311
                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
   312
            else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   313
                try:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   314
                    values = eval(data)    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   315
                except:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   316
                    message = _("Invalid value \"%s\" for location")%data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   317
                    values = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   318
                if not isinstance(values, TupleType):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   319
                    message = _("Invalid value \"%s\" for location")%data
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   320
                    values = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   321
                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
   322
                    location = values[0]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   323
                    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
   324
                    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
   325
                    message = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   326
                    if location.startswith("%"):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   327
                        if base_type != values[2]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   328
                            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
   329
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   330
                            self.ParentWindow.Table.SetValue(row, col, location)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   331
                            self.ParentWindow.Table.ResetView(self.ParentWindow.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   332
                            self.ParentWindow.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   333
                    else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   334
                        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
   335
                            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
   336
                        elif location[0] not in LOCATIONDATATYPES:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   337
                            message = _("Unrecognized data size \"%s\"")%location[0]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   338
                        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
   339
                            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
   340
                        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   341
                            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
   342
                            if dialog.ShowModal() == wx.ID_OK:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   343
                                selected = dialog.GetSelection()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   344
                                if selected == 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   345
                                    location = "%I" + location
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   346
                                elif selected == 1:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   347
                                    location = "%Q" + location
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   348
                                else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   349
                                    location = "%M" + location
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   350
                                self.ParentWindow.Table.SetValue(row, col, location)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   351
                                self.ParentWindow.Table.ResetView(self.ParentWindow.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   352
                                self.ParentWindow.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   353
                            dialog.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   354
            if message is not None:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   355
                wx.CallAfter(self.ShowMessage, message)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   356
            
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   357
    def ShowMessage(self, message):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   358
        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
   359
        message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   360
        message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   361
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   362
[ID_VARIABLEEDITORPANEL, ID_VARIABLEEDITORPANELVARIABLESGRID, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   363
 ID_VARIABLEEDITORCONTROLPANEL, ID_VARIABLEEDITORPANELRETURNTYPE, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   364
 ID_VARIABLEEDITORPANELCLASSFILTER, ID_VARIABLEEDITORPANELADDBUTTON, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   365
 ID_VARIABLEEDITORPANELDELETEBUTTON, ID_VARIABLEEDITORPANELUPBUTTON, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   366
 ID_VARIABLEEDITORPANELDOWNBUTTON, ID_VARIABLEEDITORPANELSTATICTEXT1, 
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   367
 ID_VARIABLEEDITORPANELSTATICTEXT2, ID_VARIABLEEDITORPANELSTATICTEXT3,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   368
] = [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
   369
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   370
class VariablePanel(wx.Panel):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   371
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   372
    if wx.VERSION < (2, 6, 0):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   373
        def Bind(self, event, function, id = None):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   374
            if id is not None:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   375
                event(self, id, function)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   376
            else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   377
                event(self, function)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   378
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   379
    def _init_coll_MainSizer_Items(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   380
        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
   381
        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
   382
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   383
    def _init_coll_MainSizer_Growables(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   384
        parent.AddGrowableCol(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   385
        parent.AddGrowableRow(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   386
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   387
    def _init_coll_ControlPanelSizer_Items(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   388
        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
   389
        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
   390
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   391
    def _init_coll_ControlPanelSizer_Growables(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   392
        parent.AddGrowableCol(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   393
        parent.AddGrowableRow(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   394
        parent.AddGrowableRow(1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   395
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   396
    def _init_coll_ChoicePanelSizer_Items(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   397
        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
   398
        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
   399
        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
   400
        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
   401
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   402
    def _init_coll_ButtonPanelSizer_Items(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   403
        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
   404
        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
   405
        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
   406
        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
   407
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   408
    def _init_coll_ButtonPanelSizer_Growables(self, parent):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   409
        parent.AddGrowableCol(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   410
        parent.AddGrowableCol(1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   411
        parent.AddGrowableCol(2)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   412
        parent.AddGrowableCol(3)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   413
        parent.AddGrowableRow(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   414
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   415
    def _init_sizers(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   416
        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
   417
        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
   418
        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
   419
        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
   420
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   421
        self._init_coll_MainSizer_Items(self.MainSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   422
        self._init_coll_MainSizer_Growables(self.MainSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   423
        self._init_coll_ControlPanelSizer_Items(self.ControlPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   424
        self._init_coll_ControlPanelSizer_Growables(self.ControlPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   425
        self._init_coll_ChoicePanelSizer_Items(self.ChoicePanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   426
        self._init_coll_ButtonPanelSizer_Items(self.ButtonPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   427
        self._init_coll_ButtonPanelSizer_Growables(self.ButtonPanelSizer)
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
        self.SetSizer(self.MainSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   430
        self.ControlPanel.SetSizer(self.ControlPanelSizer)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   431
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   432
    def _init_ctrls(self, prnt):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   433
        wx.Panel.__init__(self, id=ID_VARIABLEEDITORPANEL,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   434
              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
   435
              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
   436
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   437
        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
   438
              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
   439
              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
   440
        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
   441
              'Sans'))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   442
        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
   443
              False, 'Sans'))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   444
        self.VariablesGrid.SetSelectionBackground(wx.WHITE)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   445
        self.VariablesGrid.SetSelectionForeground(wx.BLACK)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   446
        if wx.VERSION >= (2, 6, 0):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   447
            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
   448
            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
   449
            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
   450
            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
   451
            #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
   452
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   453
            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
   454
            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
   455
            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
   456
            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
   457
            #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
   458
        self.VariablesGrid.SetDropTarget(VariableDropTarget(self))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   459
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   460
        self.ControlPanel = wx.ScrolledWindow(id=ID_VARIABLEEDITORCONTROLPANEL,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   461
              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
   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
        self.ControlPanel.SetScrollRate(0, 10)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   464
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   465
        self.staticText1 = wx.StaticText(id=ID_VARIABLEEDITORPANELSTATICTEXT1,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   466
              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
   467
              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
   468
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   469
        self.ReturnType = wx.ComboBox(id=ID_VARIABLEEDITORPANELRETURNTYPE,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   470
              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
   471
              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
   472
        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
   473
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   474
        self.staticText2 = wx.StaticText(id=ID_VARIABLEEDITORPANELSTATICTEXT2,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   475
              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
   476
              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
   477
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   478
        self.ClassFilter = wx.ComboBox(id=ID_VARIABLEEDITORPANELCLASSFILTER,
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   479
              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
   480
              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
   481
        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
   482
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   483
        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
   484
              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
   485
              size=wx.DefaultSize, style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   486
        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
   487
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   488
        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
   489
              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
   490
              size=wx.DefaultSize, style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   491
        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
   492
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   493
        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
   494
              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
   495
              size=wx.Size(32, 32), style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   496
        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
   497
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   498
        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
   499
              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
   500
              size=wx.Size(32, 32), style=0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   501
        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
   502
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   503
        self._init_sizers()
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
    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
   506
        self._init_ctrls(parent)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   507
        self.ParentWindow = window
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   508
        self.Controler = controler
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   509
        self.ElementType = element_type
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   510
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   511
        self.Filter = "All"
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   512
        self.FilterChoices = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   513
        self.FilterChoiceTransfer = GetFilterChoiceTransfer()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   514
        
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   515
        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
   516
                                "Initial Value" : "", "Option" : "",
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   517
                                "Documentation" : "", "Edit" : True
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   518
                            }
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   519
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   520
        if element_type in ["config", "resource"]:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   521
            self.DefaultTypes = {"All" : "Global"}
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   522
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   523
            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
   524
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   525
        if element_type in ["config", "resource"] \
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   526
        or element_type in ["program", "transition", "action"]:
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   527
            # 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
   528
            self.Table = VariableTable(self, [], GetVariableTableColnames(True))
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   529
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   530
            if element_type in ["config", "resource"]:
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   531
                self.FilterChoices = ["All", "Global"]#,"Access"]
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   532
            else:
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   533
                self.FilterChoices = ["All",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   534
                                        "Interface", "   Input", "   Output", "   InOut", "   External",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   535
                                        "Variables", "   Local", "   Temp"]#,"Access"]
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   536
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   537
            # these condense the ColAlignements list
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   538
            l = wx.ALIGN_LEFT
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   539
            c = wx.ALIGN_CENTER 
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   540
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   541
            #                      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
   542
            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
   543
            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
   544
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   545
        else:
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   546
            # 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
   547
            self.Table = VariableTable(self, [], GetVariableTableColnames(False))
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   548
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   549
            if element_type == "function":
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   550
                self.FilterChoices = ["All",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   551
                                        "Interface", "   Input", "   Output", "   InOut",
484
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   552
                                        "Variables", "   Local"]
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   553
            else:
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   554
                self.FilterChoices = ["All",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   555
                                        "Interface", "   Input", "   Output", "   InOut", "   External",
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   556
                                        "Variables", "   Local", "   Temp"]
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   557
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   558
            # these condense the ColAlignements list
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   559
            l = wx.ALIGN_LEFT
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   560
            c = wx.ALIGN_CENTER 
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   561
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   562
            #                      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
   563
            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
   564
            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
   565
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   566
        for choice in self.FilterChoices:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   567
            self.ClassFilter.Append(_(choice))
424
d19c4a6460ab add a Documentation column to the VariablePanel
b.taylor@willowglen.ca
parents: 422
diff changeset
   568
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   569
        reverse_transfer = {}
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   570
        for filter, choice in self.FilterChoiceTransfer.items():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   571
            reverse_transfer[choice] = filter
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   572
        self.ClassFilter.SetStringSelection(_(reverse_transfer[self.Filter]))
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   573
        self.RefreshTypeList()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   574
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   575
        if element_type == "function":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   576
            for base_type in self.Controler.GetBaseTypes():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   577
                self.ReturnType.Append(base_type)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   578
            self.ReturnType.Enable(True)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   579
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   580
            self.ReturnType.Enable(False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   581
            self.staticText1.Hide()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   582
            self.ReturnType.Hide()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   583
            
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   584
        self.VariablesGrid.SetTable(self.Table)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   585
        self.VariablesGrid.SetRowLabelSize(0)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   586
        for col in range(self.Table.GetNumberCols()):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   587
            attr = wx.grid.GridCellAttr()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   588
            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
   589
            self.VariablesGrid.SetColAttr(col, attr)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   590
            self.VariablesGrid.SetColMinimalWidth(col, self.ColSizes[col])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   591
            self.VariablesGrid.AutoSizeColumn(col, False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   592
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   593
    def SetTagName(self, tagname):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   594
        self.TagName = tagname
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   595
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   596
    def IsFunctionBlockType(self, name):
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   597
        bodytype = self.Controler.GetEditedElementBodyType(self.TagName)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   598
        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
   599
        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
   600
            return False
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   601
        else:
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   602
            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
   603
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   604
    def RefreshView(self):
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   605
        self.PouNames = self.Controler.GetProjectPouNames()
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   606
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   607
        words = self.TagName.split("::")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   608
        if self.ElementType == "config":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   609
            self.PouIsUsed = False
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   610
            returnType = None
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   611
            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
   612
        elif self.ElementType == "resource":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   613
            self.PouIsUsed = False
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   614
            returnType = None
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   615
            self.Values = self.Controler.GetConfigurationResourceGlobalVars(words[1], words[2])
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   616
        else:
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   617
            self.PouIsUsed = self.Controler.PouIsUsed(words[1])
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   618
            returnType = self.Controler.GetEditedElementInterfaceReturnType(self.TagName)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   619
            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
   620
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   621
        if returnType and self.ReturnType.IsEnabled():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   622
            self.ReturnType.SetStringSelection(returnType)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   623
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   624
        self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   625
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   626
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   627
    def OnReturnTypeChanged(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   628
        words = self.TagName.split("::")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   629
        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
   630
        self.Controler.BufferProject()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   631
        self.ParentWindow.RefreshEditor(variablepanel = False)
449
19720ee1051c Bug while trying to refresh InstancesTree fixed
laurent
parents: 446
diff changeset
   632
        self.ParentWindow._Refresh(TITLE, EDITMENU, INSTANCESTREE, LIBRARYTREE)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   633
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   634
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   635
    def OnClassFilter(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   636
        self.Filter = self.FilterChoiceTransfer[self.ClassFilter.GetStringSelection()]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   637
        self.RefreshTypeList()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   638
        self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   639
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   640
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   641
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   642
    def RefreshTypeList(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   643
        if self.Filter == "All":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   644
            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
   645
        elif self.Filter == "Interface":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   646
            self.ClassList = ["Input","Output","InOut","External"]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   647
        elif self.Filter == "Variables":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   648
            self.ClassList = ["Local","Temp"]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   649
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   650
            self.ClassList = [self.Filter]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   651
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   652
    def RefreshButtons(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   653
        if getattr(self, "Table", None):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   654
            table_length = len(self.Table.data)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   655
            row_class = None
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   656
            row_edit = True
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   657
            if table_length > 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   658
                row = self.VariablesGrid.GetGridCursorRow()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   659
                row_edit = self.Table.GetValueByName(row, "Edit")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   660
                if self.PouIsUsed:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   661
                    row_class = self.Table.GetValueByName(row, "Class")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   662
            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
   663
            self.DeleteButton.Enable(table_length > 0 and row_edit and row_class not in ["Input", "Output", "InOut"])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   664
            self.UpButton.Enable(table_length > 0 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   665
            self.DownButton.Enable(table_length > 0 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   666
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   667
    def OnAddButton(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   668
        new_row = self.DefaultValue.copy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   669
        if self.Filter in self.DefaultTypes:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   670
            new_row["Class"] = self.DefaultTypes[self.Filter]
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   671
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   672
            new_row["Class"] = self.Filter
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   673
        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
   674
            row_index = self.VariablesGrid.GetGridCursorRow() + 1
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   675
            self.Values.insert(row_index, new_row)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   676
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   677
            row_index = -1
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   678
            self.Values.append(new_row)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   679
        self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   680
        self.RefreshValues(row_index)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   681
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   682
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   683
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   684
    def OnDeleteButton(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   685
        row = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   686
        self.Values.remove(row)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   687
        self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   688
        self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   689
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   690
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   691
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   692
    def OnUpButton(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   693
        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), -1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   694
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   695
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   696
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   697
    def OnDownButton(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   698
        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), 1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   699
        self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   700
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   701
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   702
    def OnVariablesGridCellChange(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   703
        row, col = event.GetRow(), event.GetCol()
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   704
        colname = self.Table.GetColLabelValue(col, False)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   705
        value = self.Table.GetValue(row, col)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   706
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   707
        if colname == "Name" and value != "":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   708
            if not TestIdentifier(value):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   709
                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
   710
                message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   711
                message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   712
                event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   713
            elif value.upper() in IEC_KEYWORDS:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   714
                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
   715
                message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   716
                message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   717
                event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   718
            elif value.upper() in self.PouNames:
446
0dd1a5f2a7a1 Update internationalization
laurent
parents: 443
diff changeset
   719
                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
   720
                message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   721
                message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   722
                event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   723
            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
   724
                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
   725
                message.ShowModal()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   726
                message.Destroy()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   727
                event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   728
            else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   729
                self.SaveValues(False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   730
                old_value = self.Table.GetOldValue()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   731
                if old_value != "":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   732
                    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
   733
                self.Controler.BufferProject()
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   734
                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
   735
                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
   736
                event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   737
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   738
            self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   739
            if colname == "Class":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   740
                self.Table.ResetView(self.VariablesGrid)
483
779a519f78f2 Replace Retain and Constant column in VariablePanel by Option and add the option Non-Retain
laurent
parents: 449
diff changeset
   741
            self.ParentWindow._Refresh(TITLE, FILEMENU, EDITMENU)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   742
            event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   743
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   744
    def OnVariablesGridEditorShown(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   745
        row, col = event.GetRow(), event.GetCol() 
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   746
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   747
        label_value = self.Table.GetColLabelValue(col)
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   748
        if label_value == "Type":
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   749
            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
   750
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   751
            # 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
   752
            base_menu = wx.Menu(title='')
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   753
            for base_type in self.Controler.GetBaseTypes():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   754
                new_id = wx.NewId()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   755
                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
   756
                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
   757
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   758
            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
   759
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   760
            # 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
   761
            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
   762
            
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   763
            # TODO : remove complextypes argument when matiec can manage complex types in pou interface
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   764
            datatypes = self.Controler.GetDataTypes(basetypes = False, 
acef952101a5 Adding support for excluding option when not available according to IEC 61131 standard
laurent
parents: 483
diff changeset
   765
                                                    complextypes = self.Table.GetValueByName(row, "Class") not in ["Input", "Ouput", "InOut"])
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   766
            for datatype in datatypes:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   767
                new_id = wx.NewId()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   768
                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
   769
                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
   770
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   771
            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
   772
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   773
            # build a submenu containing function block types
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   774
            bodytype = self.Controler.GetEditedElementBodyType(self.TagName)
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   775
            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
   776
            classtype = self.Table.GetValueByName(row, "Class")
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   777
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   778
            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
   779
            poutype != "function" and bodytype in ["ST", "IL"]:
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   780
                functionblock_menu = wx.Menu(title='')
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   781
                fbtypes = self.Controler.GetFunctionBlockTypes(self.TagName)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   782
                for functionblock_type in fbtypes:
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   783
                    new_id = wx.NewId()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   784
                    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
   785
                    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
   786
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   787
                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
   788
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   789
            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
   790
            corner_x = rect.x + rect.width
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   791
            corner_y = rect.y + self.VariablesGrid.GetColLabelSize()
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
            # pop up this new menu
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   794
            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
   795
            event.Veto()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   796
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   797
            event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   798
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   799
    def GetVariableTypeFunction(self, base_type):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   800
        def VariableTypeFunction(event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   801
            row = self.VariablesGrid.GetGridCursorRow()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   802
            self.Table.SetValueByName(row, "Type", base_type)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   803
            self.Table.ResetView(self.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   804
            self.SaveValues(False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   805
            self.ParentWindow.RefreshEditor(variablepanel = False)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   806
            self.Controler.BufferProject()
440
e183bffc05f0 Changes from bct merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 436
diff changeset
   807
            self.ParentWindow._Refresh(TITLE, EDITMENU, INSTANCESTREE, LIBRARYTREE)
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   808
        return VariableTypeFunction
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   809
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   810
    def OnVariablesGridCellLeftClick(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   811
        row = event.GetRow()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   812
        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
   813
            row = event.GetRow()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   814
            var_name = self.Table.GetValueByName(row, "Name")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   815
            var_class = self.Table.GetValueByName(row, "Class")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   816
            var_type = self.Table.GetValueByName(row, "Type")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   817
            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
   818
            dragSource = wx.DropSource(self.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   819
            dragSource.SetData(data)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   820
            dragSource.DoDragDrop()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   821
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   822
    
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   823
    def OnVariablesGridSelectCell(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   824
        wx.CallAfter(self.RefreshButtons)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   825
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   826
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   827
    def OnChar(self, event):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   828
        keycode = event.GetKeyCode()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   829
        if keycode == wx.WXK_DELETE:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   830
            row = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   831
            self.Values.remove(row)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   832
            self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   833
            self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   834
            self.RefreshButtons()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   835
        event.Skip()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   836
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   837
    def MoveValue(self, value_index, move):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   838
        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
   839
        if new_index != value_index:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   840
            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
   841
            self.SaveValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   842
            self.RefreshValues()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   843
            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
   844
        
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   845
    def RefreshValues(self, select=0):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   846
        if len(self.Table.data) > 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   847
            self.VariablesGrid.SetGridCursor(0, 1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   848
        data = []
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   849
        for num, variable in enumerate(self.Values):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   850
            if variable["Class"] in self.ClassList:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   851
                variable["Number"] = num + 1
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   852
                data.append(variable)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   853
        self.Table.SetData(data)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   854
        if len(self.Table.data) > 0:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   855
            if select == -1:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   856
                select = len(self.Table.data) - 1
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   857
            self.VariablesGrid.SetGridCursor(select, 1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   858
            self.VariablesGrid.MakeCellVisible(select, 1)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   859
        self.Table.ResetView(self.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   860
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   861
    def SaveValues(self, buffer = True):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   862
        words = self.TagName.split("::")
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   863
        if self.ElementType == "config":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   864
            self.Controler.SetConfigurationGlobalVars(words[1], self.Values)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   865
        elif self.ElementType == "resource":
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   866
            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
   867
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   868
            if self.ReturnType.IsEnabled():
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   869
                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
   870
            self.Controler.SetPouInterfaceVars(words[1], self.Values)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   871
        if buffer:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   872
            self.Controler.BufferProject()
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   873
            self.ParentWindow._Refresh(TITLE, EDITMENU, INSTANCESTREE, LIBRARYTREE)            
418
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   874
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   875
    def AddVariableError(self, infos):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   876
        if isinstance(infos[0], TupleType):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   877
            for i in xrange(*infos[0]):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   878
                self.Table.AddError((i,) + infos[1:])
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   879
        else:
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   880
            self.Table.AddError(infos)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   881
        self.Table.ResetView(self.VariablesGrid)
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   882
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   883
    def ClearErrors(self):
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   884
        self.Table.ClearErrors()
a06221a0930b split the variable editor panel into its own file
b.taylor@willowglen.ca
parents:
diff changeset
   885
        self.Table.ResetView(self.VariablesGrid)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   886
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   887
class LocationCellControl(wx.PyControl):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   888
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   889
    def _init_coll_MainSizer_Items(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   890
        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
   891
        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
   892
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   893
    def _init_coll_MainSizer_Growables(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   894
        parent.AddGrowableCol(0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   895
        parent.AddGrowableRow(0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   896
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   897
    def _init_sizers(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   898
        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
   899
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   900
        self._init_coll_MainSizer_Items(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   901
        self._init_coll_MainSizer_Growables(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   902
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   903
        self.SetSizer(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   904
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   905
    def _init_ctrls(self, prnt):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   906
        wx.Control.__init__(self, id=-1, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   907
              name='LocationCellControl', parent=prnt,  
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   908
              size=wx.DefaultSize, style=0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   909
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   910
        # create location text control
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   911
        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
   912
              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
   913
        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
   914
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   915
        # create browse button
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   916
        self.BrowseButton = wx.Button(id=-1, label='...', 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   917
              name='staticText1', parent=self, pos=wx.Point(0, 0), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   918
              size=wx.Size(30, 0), style=0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   919
        self.BrowseButton.Bind(wx.EVT_BUTTON, self.OnBrowseButtonClick)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   920
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   921
        self.Bind(wx.EVT_SIZE, self.OnSize)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   922
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   923
        self._init_sizers()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   924
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   925
    '''
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   926
    Custom cell editor control with a text box and a button that launches
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   927
    the BrowseVariableLocationsDialog.
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   928
    '''
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   929
    def __init__(self, parent, locations):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   930
        self._init_ctrls(parent)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   931
        self.Locations = locations
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   932
        self.VarType = None
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   933
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   934
    def SetVarType(self, vartype):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   935
        self.VarType = vartype
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   936
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   937
    def SetValue(self, value):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   938
        self.Location.SetValue(value)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   939
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   940
    def GetValue(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   941
        return self.Location.GetValue()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   942
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   943
    def OnSize(self, event):
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
   944
        self.Layout()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   945
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   946
    def OnBrowseButtonClick(self, event):
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   947
        # pop up the location browser dialog
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   948
        dialog = BrowseLocationsDialog(self, self.VarType, self.Locations)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   949
        if dialog.ShowModal() == wx.ID_OK:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   950
            infos = dialog.GetValues()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   951
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   952
            # set the location
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   953
            self.Location.SetValue(infos["location"])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   954
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   955
        dialog.Destroy()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   956
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   957
        self.Location.SetFocus()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   958
443
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   959
    def OnLocationChar(self, event):
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   960
        keycode = event.GetKeyCode()
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   961
        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
   962
            self.Parent.Parent.ProcessEvent(event)
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   963
            self.Parent.Parent.SetFocus()
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   964
        else:
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   965
            event.Skip()
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   966
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   967
    def SetInsertionPoint(self, i):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   968
        self.Location.SetInsertionPoint(i)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   969
    
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   970
    def SetFocus(self):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   971
        self.Location.SetFocus()
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   972
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   973
class LocationCellEditor(wx.grid.PyGridCellEditor):
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   974
    '''
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   975
    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
   976
    '''
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   977
    def __init__(self, table, controler):
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   978
        wx.grid.PyGridCellEditor.__init__(self)
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   979
        self.Table = table
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   980
        self.Controler = controler
443
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   981
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   982
    def __del__(self):
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   983
        self.CellControl = None
5f7d5d1a6f99 Add support for leaving LocationControl when RETURN or TAB pressed
laurent
parents: 440
diff changeset
   984
    
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   985
    def Create(self, parent, id, evt_handler):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   986
        locations = self.Controler.GetVariableLocationTree()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   987
        if len(locations) > 0:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   988
            self.CellControl = LocationCellControl(parent, locations)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   989
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   990
            self.CellControl = wx.TextCtrl(parent, -1)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   991
        self.SetControl(self.CellControl)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   992
        if evt_handler:
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   993
            self.CellControl.PushEventHandler(evt_handler)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   994
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
   995
    def BeginEdit(self, row, col, grid):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   996
        self.CellControl.SetValue(self.Table.GetValueByName(row, 'Location'))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   997
        if isinstance(self.CellControl, LocationCellControl):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
   998
            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
   999
        self.CellControl.SetFocus()
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
    def EndEdit(self, row, col, grid):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1002
        loc = self.CellControl.GetValue()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1003
        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
  1004
        if loc != old_loc:
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1005
            self.Table.SetValueByName(row, 'Location', loc)
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1006
            return True
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1007
        return False
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1008
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1009
    def SetSize(self, rect):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1010
        self.CellControl.SetDimensions(rect.x + 1, rect.y,
431
c1c92d068ac5 Changes merged
'Laurent Bessard <laurent.bessard@lolitech.fr>'
parents: 427
diff changeset
  1011
                                        rect.width, rect.height,
422
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1012
                                        wx.SIZE_ALLOW_MINUS_ONE)
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1013
31c3dc45cfab introduced BrowseVariableLocationsDialog and the GridCellEditor that launches it.
b.taylor@willowglen.ca
parents: 419
diff changeset
  1014
    def Clone(self):
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1015
        return LocationCellEditor(self.Table, self.Locations)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1016
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1017
def GetDirChoiceOptions():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1018
    _ = lambda x : x
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1019
    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
  1020
            (_("Input"), [LOCATION_VAR_INPUT]), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1021
            (_("Output"), [LOCATION_VAR_OUTPUT]), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1022
            (_("Memory"), [LOCATION_VAR_MEMORY])]
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1023
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
  1024
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1025
# turn LOCATIONDATATYPES inside-out
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1026
LOCATION_SIZES = {}
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1027
for size, types in LOCATIONDATATYPES.iteritems():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1028
    for type in types:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1029
        LOCATION_SIZES[type] = size
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1030
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1031
[ID_BROWSELOCATIONSDIALOG, ID_BROWSELOCATIONSDIALOGLOCATIONSTREE, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1032
 ID_BROWSELOCATIONSDIALOGDIRCHOICE, ID_BROWSELOCATIONSDIALOGSTATICTEXT1, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1033
 ID_BROWSELOCATIONSDIALOGSTATICTEXT2, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1034
] = [wx.NewId() for _init_ctrls in range(5)]
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1035
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1036
class BrowseLocationsDialog(wx.Dialog):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1037
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1038
    if wx.VERSION < (2, 6, 0):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1039
        def Bind(self, event, function, id = None):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1040
            if id is not None:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1041
                event(self, id, function)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1042
            else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1043
                event(self, function)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1044
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1045
    def _init_coll_MainSizer_Items(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1046
        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
  1047
        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
  1048
        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
  1049
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1050
    def _init_coll_MainSizer_Growables(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1051
        parent.AddGrowableCol(0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1052
        parent.AddGrowableRow(1)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1053
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1054
    def _init_coll_ButtonGridSizer_Items(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1055
        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
  1056
        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
  1057
        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
  1058
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1059
    def _init_coll_ButtonGridSizer_Growables(self, parent):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1060
        parent.AddGrowableCol(2)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1061
        parent.AddGrowableRow(0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1062
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1063
    def _init_sizers(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1064
        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
  1065
        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
  1066
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1067
        self._init_coll_MainSizer_Items(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1068
        self._init_coll_MainSizer_Growables(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1069
        self._init_coll_ButtonGridSizer_Items(self.ButtonGridSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1070
        self._init_coll_ButtonGridSizer_Growables(self.ButtonGridSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1071
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1072
        self.SetSizer(self.MainSizer)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1073
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1074
    def _init_ctrls(self, prnt):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1075
        wx.Dialog.__init__(self, id=ID_BROWSELOCATIONSDIALOG, 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1076
              name='BrowseLocationsDialog', parent=prnt,  
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1077
              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
  1078
              title=_('Browse Locations'))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1079
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1080
        self.staticText1 = wx.StaticText(id=ID_BROWSELOCATIONSDIALOGSTATICTEXT1,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1081
              label=_('Locations available:'), name='staticText1', parent=self,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1082
              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
  1083
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1084
        if wx.Platform == '__WXMSW__':
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1085
            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
  1086
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1087
            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
  1088
        self.LocationsTree = wx.TreeCtrl(id=ID_BROWSELOCATIONSDIALOGLOCATIONSTREE,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1089
              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
  1090
              size=wx.Size(0, 0), style=treestyle)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1091
        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
  1092
                  id=ID_BROWSELOCATIONSDIALOGLOCATIONSTREE)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1093
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1094
        self.staticText2 = wx.StaticText(id=ID_BROWSELOCATIONSDIALOGSTATICTEXT2,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1095
              label=_('Direction:'), name='staticText2', parent=self,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1096
              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
  1097
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1098
        self.DirChoice = wx.ComboBox(id=ID_BROWSELOCATIONSDIALOGDIRCHOICE,
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1099
              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
  1100
              size=wx.DefaultSize, style=wx.CB_READONLY)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1101
        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
  1102
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1103
        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
  1104
        if wx.VERSION >= (2, 5, 0):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1105
            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
  1106
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1107
            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
  1108
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1109
        self._init_sizers()
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
    def __init__(self, parent, var_type, locations):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1112
        self._init_ctrls(parent)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1113
        self.VarType = var_type
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1114
        self.Locations = locations
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1115
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1116
        # Define Tree item icon list
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1117
        self.TreeImageList = wx.ImageList(16, 16)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1118
        self.TreeImageDict = {}
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
        # Icons for items
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1121
        for imgname, itemtype in [
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1122
            ("CONFIGURATION", LOCATION_PLUGIN), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1123
            ("RESOURCE",      LOCATION_MODULE), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1124
            ("PROGRAM",       LOCATION_GROUP), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1125
            ("VAR_INPUT",     LOCATION_VAR_INPUT), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1126
            ("VAR_OUTPUT",    LOCATION_VAR_OUTPUT), 
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1127
            ("VAR_LOCAL",     LOCATION_VAR_MEMORY)]:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1128
            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
  1129
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1130
        # Assign icon list to TreeCtrls
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1131
        self.LocationsTree.SetImageList(self.TreeImageList)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1132
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1133
        # Set a options for the choice
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1134
        for option, filter in GetDirChoiceOptions():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1135
            self.DirChoice.Append(_(option))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1136
        self.DirChoice.SetStringSelection(_("All"))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1137
        self.RefreshFilter()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1138
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1139
        self.RefreshLocationsTree()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1140
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1141
    def RefreshFilter(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1142
        self.Filter = DIRCHOICE_OPTIONS_FILTER[self.DirChoice.GetStringSelection()]
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1143
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1144
    def RefreshLocationsTree(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1145
        root = self.LocationsTree.GetRootItem()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1146
        if not root.IsOk():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1147
            if wx.Platform == '__WXMSW__':
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1148
                root = self.LocationsTree.AddRoot(_('Plugins'))
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1149
            else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1150
                root = self.LocationsTree.AddRoot("")
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1151
        self.GenerateLocationsTreeBranch(root, self.Locations)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1152
        self.LocationsTree.Expand(root)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1153
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1154
    def GenerateLocationsTreeBranch(self, root, locations):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1155
        to_delete = []
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1156
        if wx.VERSION >= (2, 6, 0):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1157
            item, root_cookie = self.LocationsTree.GetFirstChild(root)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1158
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1159
            item, root_cookie = self.LocationsTree.GetFirstChild(root, 0)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1160
        for loc_infos in locations:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1161
            infos = loc_infos.copy()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1162
            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
  1163
               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
  1164
               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
  1165
                children = [child for child in infos.pop("children")]
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1166
                if not item.IsOk():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1167
                    item = self.LocationsTree.AppendItem(root, infos["name"])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1168
                    if wx.Platform != '__WXMSW__':
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1169
                        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
  1170
                else:
436
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1171
                    self.LocationsTree.SetItemText(item, infos["name"])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1172
                self.LocationsTree.SetPyData(item, infos)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1173
                self.LocationsTree.SetItemImage(item, self.TreeImageDict[infos["type"]])
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1174
                self.GenerateLocationsTreeBranch(item, children)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1175
                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
  1176
        while item.IsOk():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1177
            to_delete.append(item)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1178
            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
  1179
        for item in to_delete:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1180
            self.LocationsTree.Delete(item)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1181
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1182
    def OnLocationsTreeItemActivated(self, event):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1183
        infos = self.LocationsTree.GetPyData(event.GetItem())
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1184
        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
  1185
            wx.CallAfter(self.EndModal, wx.ID_OK)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1186
        event.Skip()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1187
    
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1188
    def OnDirChoice(self, event):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1189
        self.RefreshFilter()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1190
        self.RefreshLocationsTree()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1191
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1192
    def GetValues(self):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1193
        selected = self.LocationsTree.GetSelection()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1194
        return self.LocationsTree.GetPyData(selected)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1195
        
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1196
    def OnOK(self, event):
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1197
        selected = self.LocationsTree.GetSelection()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1198
        var_infos = None
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1199
        if selected.IsOk():
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1200
            var_infos = self.LocationsTree.GetPyData(selected)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1201
        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
  1202
            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
  1203
            message.ShowModal()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1204
            message.Destroy()
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1205
        else:
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1206
            self.EndModal(wx.ID_OK)
f3bb091f803f Fix BrowseVariableDialog to be used in PLCOpenEditor without Beremiz plugins
laurent
parents: 431
diff changeset
  1207