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