Dialogs.py
author lbessard
Thu, 26 Jul 2007 17:23:21 +0200
changeset 56 7187e1c00975
parent 45 42637f721b5b
child 58 39cd981ff242
permissions -rw-r--r--
Adding support for Undo/Redo and Unsaved File On Close detection
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     1
#!/usr/bin/env python
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     3
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     4
#This file is part of PLCOpenEditor, a library implementing an IEC 61131-3 editor
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     5
#based on the plcopen standard. 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     6
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     7
#Copyright (C): Edouard TISSERANT and Laurent BESSARD
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     8
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     9
#See COPYING file for copyrights details.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    10
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    11
#This library is free software; you can redistribute it and/or
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    12
#modify it under the terms of the GNU General Public
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    13
#License as published by the Free Software Foundation; either
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    14
#version 2.1 of the License, or (at your option) any later version.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    15
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    16
#This library is distributed in the hope that it will be useful,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    17
#but WITHOUT ANY WARRANTY; without even the implied warranty of
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    18
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    19
#Lesser General Public License for more details.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    20
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    21
#You should have received a copy of the GNU General Public
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    22
#License along with this library; if not, write to the Free Software
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    23
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    24
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    25
from wxPython.wx import *
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    26
from wxPython.grid import *
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    27
import wx
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    28
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
    29
from graphics import *
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    30
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    31
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    32
#                          Create New Block Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    33
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    34
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    35
[wxID_BLOCKPROPERTIESDIALOG, wxID_BLOCKPROPERTIESDIALOGMAINPANEL, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    36
 wxID_BLOCKPROPERTIESDIALOGNAME, wxID_BLOCKPROPERTIESDIALOGTYPETREE, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    37
 wxID_BLOCKPROPERTIESDIALOGTYPEDESC, wxID_BLOCKPROPERTIESDIALOGINPUTS, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    38
 wxID_BLOCKPROPERTIESDIALOGPREVIEW, wxID_BLOCKPROPERTIESDIALOGSTATICTEXT1, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    39
 wxID_BLOCKPROPERTIESDIALOGSTATICTEXT2, wxID_BLOCKPROPERTIESDIALOGSTATICTEXT3, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    40
 wxID_BLOCKPROPERTIESDIALOGSTATICTEXT4, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    41
] = [wx.NewId() for _init_ctrls in range(11)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    42
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    43
[CATEGORY, BLOCK] = range(2)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    44
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    45
class BlockPropertiesDialog(wx.Dialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    46
    def _init_coll_flexGridSizer1_Items(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    47
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    48
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    49
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    50
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    51
    def _init_sizers(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    52
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    53
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    54
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    55
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    56
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    57
        self.SetSizer(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    58
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    59
    def _init_ctrls(self, prnt):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    60
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    61
        wx.Dialog.__init__(self, id=wxID_BLOCKPROPERTIESDIALOG,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    62
              name='BlockPropertiesDialog', parent=prnt, pos=wx.Point(376, 223),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    63
              size=wx.Size(600, 360), style=wx.DEFAULT_DIALOG_STYLE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    64
              title='Block Properties')
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    65
        self.SetClientSize(wx.Size(600, 360))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    66
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    67
        self.MainPanel = wx.Panel(id=wxID_BLOCKPROPERTIESDIALOGMAINPANEL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    68
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    69
              size=wx.Size(600, 320), style=wx.TAB_TRAVERSAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    70
        self.MainPanel.SetAutoLayout(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    71
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    72
        self.staticbox1 = wx.StaticBox(id=wxID_BLOCKPROPERTIESDIALOGSTATICTEXT1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    73
              label='Type:', name='staticBox1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    74
              pos=wx.Point(24, 24), size=wx.Size(245, 280), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    75
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    76
        self.staticText2 = wx.StaticText(id=wxID_BLOCKPROPERTIESDIALOGSTATICTEXT2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    77
              label='Name:', name='staticText2', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    78
              pos=wx.Point(274, 24), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    79
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    80
        self.staticText3 = wx.StaticText(id=wxID_BLOCKPROPERTIESDIALOGSTATICTEXT2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    81
              label='Inputs:', name='staticText4', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    82
              pos=wx.Point(424, 24), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    83
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    84
        self.staticText4 = wx.StaticText(id=wxID_BLOCKPROPERTIESDIALOGSTATICTEXT4,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    85
              label='Preview:', name='staticText4', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    86
              pos=wx.Point(274, 80), size=wx.Size(100, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    87
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    88
        self.TypeTree = wx.TreeCtrl(id=wxID_BLOCKPROPERTIESDIALOGTYPETREE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    89
              name='TypeTree', parent=self.MainPanel, pos=wx.Point(34, 44),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    90
              size=wx.Size(225, 180), style=wx.TR_HAS_BUTTONS|wx.TR_HIDE_ROOT|wx.TR_SINGLE|wx.SUNKEN_BORDER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    91
        EVT_TREE_SEL_CHANGED(self, wxID_BLOCKPROPERTIESDIALOGTYPETREE, self.OnTypeTreeItemSelected)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    92
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    93
        self.TypeDesc = wx.TextCtrl(id=wxID_BLOCKPROPERTIESDIALOGTYPEDESC,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    94
              name='TypeDesc', parent=self.MainPanel, pos=wx.Point(34, 230),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    95
              size=wx.Size(225, 65), style=wx.TE_READONLY|wx.TE_MULTILINE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    96
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    97
        self.Name = wx.TextCtrl(id=wxID_BLOCKPROPERTIESDIALOGNAME, value='',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    98
              name='Name', parent=self.MainPanel, pos=wx.Point(274, 48),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    99
              size=wx.Size(145, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   100
        EVT_TEXT(self, wxID_BLOCKPROPERTIESDIALOGNAME, self.OnNameChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   101
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   102
        self.Inputs = wx.SpinCtrl(id=wxID_BLOCKPROPERTIESDIALOGINPUTS,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   103
              name='Inputs', parent=self.MainPanel, pos=wx.Point(424, 48),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   104
              size=wx.Size(145, 24), style=wxSP_ARROW_KEYS, min=2, max=20)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   105
        EVT_SPINCTRL(self, wxID_BLOCKPROPERTIESDIALOGINPUTS, self.OnInputsChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   106
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   107
        self.Preview = wx.Panel(id=wxID_BLOCKPROPERTIESDIALOGPREVIEW,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   108
              name='Preview', parent=self.MainPanel, pos=wx.Point(274, 104),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   109
              size=wx.Size(300, 200), style=wx.TAB_TRAVERSAL|wx.SIMPLE_BORDER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   110
        self.Preview.SetBackgroundColour(wxColour(255,255,255))
42
4a8400732001 Adding optimization on redrawing
lbessard
parents: 28
diff changeset
   111
        setattr(self.Preview, "GetDrawingMode", lambda:FREEDRAWING_MODE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   112
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   113
        self._init_sizers()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   114
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   115
    def __init__(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   116
        self._init_ctrls(parent)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   117
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   118
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   119
        self.Name.SetValue("")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   120
        self.Name.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   121
        self.Inputs.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   122
        self.Block = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   123
        self.MinBlockSize = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   124
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   125
        EVT_PAINT(self, self.OnPaint)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   126
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   127
    
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   128
    def FindTreeItem(self, root, name, inputs = None):
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   129
        if root.IsOk():
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   130
            pydata = self.TypeTree.GetPyData(root)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   131
            if inputs and "inputs" in pydata:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   132
                same_inputs = pydata["inputs"] == inputs
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   133
            else:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   134
                same_inputs = True
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   135
            if self.TypeTree.GetItemText(root) == name and same_inputs:
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   136
                return root
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   137
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   138
                item, root_cookie = self.TypeTree.GetFirstChild(root)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   139
                while item.IsOk():
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   140
                    result = self.FindTreeItem(item, name, inputs)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   141
                    if result:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   142
                        return result
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   143
                    item, root_cookie = self.TypeTree.GetNextChild(root, root_cookie)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   144
        return None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   145
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   146
    def OnOK(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   147
        error = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   148
        selected = self.TypeTree.GetSelection()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   149
        if not selected.IsOk() or self.TypeTree.GetItemParent(selected) == self.TypeTree.GetRootItem() or selected == self.TypeTree.GetRootItem():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   150
            message = wxMessageDialog(self, "Form isn't complete. Valid block type must be selected!", "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   151
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   152
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   153
        elif self.Name.IsEnabled() and self.Name.GetValue() == "":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   154
            message = wxMessageDialog(self, "Form isn't complete. Name must be filled!", "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   155
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   156
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   157
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   158
            self.EndModal(wxID_OK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   159
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   160
    def SetBlockList(self, blocktypes):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   161
        root = self.TypeTree.AddRoot("")
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   162
        self.TypeTree.SetPyData(root, {"type" : CATEGORY})
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   163
        for category in blocktypes:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   164
            category_item = self.TypeTree.AppendItem(root, category["name"])
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   165
            self.TypeTree.SetPyData(category_item, {"type" : CATEGORY})
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   166
            for blocktype in category["list"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   167
                blocktype_item = self.TypeTree.AppendItem(category_item, blocktype["name"])
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   168
                self.TypeTree.SetPyData(blocktype_item, {"type" : BLOCK, "inputs" : tuple([type for name, type, modifier in blocktype["inputs"]])})
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   169
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   170
    def SetMinBlockSize(self, size):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   171
        self.MinBlockSize = size
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   172
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   173
    def SetValues(self, values):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   174
        for name, value in values.items():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   175
            if name == "type":
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   176
                inputs = None
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   177
                if "inputs" in values:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   178
                    inputs = values["inputs"]
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   179
                item = self.FindTreeItem(self.TypeTree.GetRootItem(), value, inputs)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   180
                if item:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   181
                    self.TypeTree.SelectItem(item)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   182
            elif name == "name":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   183
                self.Name.SetValue(value)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   184
            elif name == "extension":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   185
                self.Inputs.SetValue(value)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   186
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   187
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   188
    def GetValues(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   189
        values = {}
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   190
        item = self.TypeTree.GetSelection()
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   191
        values["type"] = self.TypeTree.GetItemText(item)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   192
        values["inputs"] = self.TypeTree.GetPyData(item)["inputs"]
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   193
        if self.Name.GetValue() != "":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   194
            values["name"] = self.Name.GetValue()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   195
        values["width"], values["height"] = self.Block.GetSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   196
        values["extension"] = self.Inputs.GetValue()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   197
        return values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   198
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   199
    def OnTypeTreeItemSelected(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   200
        self.Name.SetValue("")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   201
        selected = event.GetItem()
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   202
        pydata = self.TypeTree.GetPyData(selected)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   203
        if pydata["type"] != CATEGORY:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   204
            blocktype = GetBlockType(self.TypeTree.GetItemText(selected), pydata["inputs"])
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   205
            if blocktype:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   206
                self.Inputs.SetValue(len(blocktype["inputs"]))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   207
                self.Inputs.Enable(blocktype["extensible"])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   208
                self.Name.Enable(blocktype["type"] != "function")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   209
                self.TypeDesc.SetValue(blocktype["comment"])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   210
                wxCallAfter(self.RefreshPreview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   211
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   212
                self.Name.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   213
                self.Inputs.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   214
                self.Inputs.SetValue(2)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   215
                self.TypeDesc.SetValue("")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   216
                wxCallAfter(self.ErasePreview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   217
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   218
            self.Name.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   219
            self.Inputs.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   220
            self.Inputs.SetValue(2)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   221
            self.TypeDesc.SetValue("")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   222
            wxCallAfter(self.ErasePreview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   223
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   224
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   225
    def OnNameChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   226
        if self.Name.IsEnabled():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   227
            self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   228
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   229
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   230
    def OnInputsChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   231
        if self.Inputs.IsEnabled():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   232
            self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   233
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   234
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   235
    def ErasePreview(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   236
        dc = wxClientDC(self.Preview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   237
        dc.Clear()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   238
        self.Block = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   239
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   240
    def RefreshPreview(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   241
        dc = wxClientDC(self.Preview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   242
        dc.Clear()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   243
        item = self.TypeTree.GetSelection()
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   244
        pydata = self.TypeTree.GetPyData(item)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   245
        if pydata["type"] == CATEGORY:
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   246
            self.Block = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   247
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   248
            blocktype = self.TypeTree.GetItemText(item)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   249
            if blocktype:
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   250
                self.Block = FBD_Block(self.Preview, blocktype, self.Name.GetValue(), extension = self.Inputs.GetValue(), inputs = pydata["inputs"])
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   251
                width, height = self.MinBlockSize
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   252
                min_width, min_height = self.Block.GetMinSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   253
                width, height = max(min_width, width), max(min_height, height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   254
                self.Block.SetSize(width, height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   255
                clientsize = self.Preview.GetClientSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   256
                x = (clientsize.width - width) / 2
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   257
                y = (clientsize.height - height) / 2
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   258
                self.Block.SetPosition(x, y)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   259
                self.Block.Draw(dc)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   260
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   261
                self.Block = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   262
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   263
    def OnPaint(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   264
        if self.Block:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   265
            self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   266
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   267
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   268
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   269
#                          Create New Variable Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   270
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   271
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   272
[wxID_VARIABLEPROPERTIESDIALOG, wxID_VARIABLEPROPERTIESDIALOGMAINPANEL, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   273
 wxID_VARIABLEPROPERTIESDIALOGNAME, wxID_VARIABLEPROPERTIESDIALOGCLASS, 
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   274
 wxID_VARIABLEPROPERTIESDIALOGPREVIEW, wxID_VARIABLEPROPERTIESDIALOGEXPRESSION,
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   275
 wxID_VARIABLEPROPERTIESDIALOGSTATICTEXT1, wxID_VARIABLEPROPERTIESDIALOGSTATICTEXT2,
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   276
 wxID_VARIABLEPROPERTIESDIALOGSTATICTEXT3, wxID_VARIABLEPROPERTIESDIALOGSTATICTEXT4,
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   277
] = [wx.NewId() for _init_ctrls in range(10)]
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   278
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   279
class VariablePropertiesDialog(wx.Dialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   280
    def _init_coll_flexGridSizer1_Items(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   281
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   282
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   283
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   284
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   285
    def _init_sizers(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   286
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   287
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   288
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   289
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   290
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   291
        self.SetSizer(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   292
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   293
    def _init_ctrls(self, prnt):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   294
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   295
        wx.Dialog.__init__(self, id=wxID_VARIABLEPROPERTIESDIALOG,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   296
              name='VariablePropertiesDialog', parent=prnt, pos=wx.Point(376, 223),
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   297
              size=wx.Size(400, 380), style=wx.DEFAULT_DIALOG_STYLE,
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   298
              title='Variable Properties')
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   299
        self.SetClientSize(wx.Size(400, 380))
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   300
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   301
        self.MainPanel = wx.Panel(id=wxID_VARIABLEPROPERTIESDIALOGMAINPANEL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   302
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   303
              size=wx.Size(400, 280), style=wx.TAB_TRAVERSAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   304
        self.MainPanel.SetAutoLayout(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   305
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   306
        self.staticText1 = wx.StaticText(id=wxID_VARIABLEPROPERTIESDIALOGSTATICTEXT1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   307
              label='Class:', name='staticText1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   308
              pos=wx.Point(24, 24), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   309
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   310
        self.staticText2 = wx.StaticText(id=wxID_VARIABLEPROPERTIESDIALOGSTATICTEXT2,
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   311
              label='Expression:', name='staticText2', parent=self.MainPanel,
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   312
              pos=wx.Point(24, 90), size=wx.Size(100, 17), style=0)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   313
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   314
        self.staticText3 = wx.StaticText(id=wxID_VARIABLEPROPERTIESDIALOGSTATICTEXT3,
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   315
              label='Name:', name='staticText3', parent=self.MainPanel,
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   316
              pos=wx.Point(204, 24), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   317
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   318
        self.staticText4 = wx.StaticText(id=wxID_VARIABLEPROPERTIESDIALOGSTATICTEXT4,
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   319
              label='Preview:', name='staticText4', parent=self.MainPanel,
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   320
              pos=wx.Point(24, 144), size=wx.Size(100, 17), style=0)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   321
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   322
        self.Class = wx.Choice(id=wxID_VARIABLEPROPERTIESDIALOGCLASS,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   323
              name='Class', parent=self.MainPanel, pos=wx.Point(24, 48),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   324
              size=wx.Size(145, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   325
        EVT_CHOICE(self, wxID_VARIABLEPROPERTIESDIALOGCLASS, self.OnClassChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   326
        
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   327
        self.Name = wx.ListBox(id=wxID_VARIABLEPROPERTIESDIALOGNAME,
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   328
              name='Name', parent=self.MainPanel, pos=wx.Point(204, 48),
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   329
              size=wx.Size(145, 90), style=wx.LB_SINGLE)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   330
        EVT_LISTBOX(self, wxID_VARIABLEPROPERTIESDIALOGNAME, self.OnNameChanged)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   331
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   332
        self.Expression = wx.TextCtrl(id=wxID_VARIABLEPROPERTIESDIALOGEXPRESSION,
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   333
              name='Expression', parent=self.MainPanel, pos=wx.Point(24, 114),
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   334
              size=wx.Size(145, 24), style=0)
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   335
        EVT_TEXT(self, wxID_VARIABLEPROPERTIESDIALOGEXPRESSION, self.OnExpressionChanged)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   336
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   337
        self.Preview = wx.Panel(id=wxID_VARIABLEPROPERTIESDIALOGPREVIEW,
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   338
              name='Preview', parent=self.MainPanel, pos=wx.Point(24, 170),
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   339
              size=wx.Size(350, 150), style=wx.TAB_TRAVERSAL|wx.SIMPLE_BORDER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   340
        self.Preview.SetBackgroundColour(wxColour(255,255,255))
42
4a8400732001 Adding optimization on redrawing
lbessard
parents: 28
diff changeset
   341
        setattr(self.Preview, "GetDrawingMode", lambda:FREEDRAWING_MODE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   342
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   343
        self._init_sizers()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   344
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   345
    def __init__(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   346
        self._init_ctrls(parent)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   347
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   348
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   349
        self.Variable = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   350
        self.VarList = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   351
        self.MinVariableSize = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   352
        self.RefreshNameList()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   353
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   354
        for choice in ["Input", "Output", "InOut"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   355
            self.Class.Append(choice)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   356
        self.Class.SetStringSelection("Input")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   357
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   358
        EVT_PAINT(self, self.OnPaint)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   359
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   360
    def RefreshNameList(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   361
        selected = self.Name.GetStringSelection()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   362
        self.Name.Clear()
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   363
        self.Name.Append("")
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   364
        for name, var_type, value_type in self.VarList:
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   365
            if var_type in ["Local","Temp","Global","External"]:
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   366
                self.Name.Append(name)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   367
            elif var_type == "Input" and self.Class.GetStringSelection() == "Input":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   368
                self.Name.Append(name)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   369
            elif var_type == "Output" and self.Class.GetStringSelection() == "Output":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   370
                self.Name.Append(name)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   371
            elif var_type == "InOut" and self.Class.GetStringSelection() == "InOut":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   372
                self.Name.Append(name)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   373
        if self.Name.FindString(selected) != wxNOT_FOUND:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   374
            self.Name.SetStringSelection(selected)
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   375
        else:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   376
            self.Name.SetStringSelection("")
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   377
        self.Name.Enable(self.Name.GetCount() > 0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   378
            
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   379
    def SetMinVariableSize(self, size):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   380
        self.MinVariableSize = size
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   381
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   382
    def SetVariables(self, vars):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   383
        self.VarList = vars
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   384
        self.RefreshNameList()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   385
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   386
    def SetValues(self, values):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   387
        value_type = values.get("type", None)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   388
        value_name = values.get("name", None)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   389
        if value_type:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   390
            if value_type == INPUT:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   391
                self.Class.SetStringSelection("Input")
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   392
            if value_type == OUTPUT:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   393
                self.Class.SetStringSelection("Output")
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   394
            if value_type == INOUT:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   395
                self.Class.SetStringSelection("InOut")
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   396
            self.RefreshNameList()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   397
        if value_name:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   398
            if self.Name.FindString(value_name) != wxNOT_FOUND:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   399
                self.Name.SetStringSelection(value_name)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   400
                self.Expression.Enable(False)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   401
            else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   402
                self.Expression.SetValue(value_name)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 45
diff changeset
   403
                self.Name.Enable(False)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   404
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   405
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   406
    def GetValues(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   407
        values = {}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   408
        classtype = self.Class.GetStringSelection()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   409
        if classtype == "Input":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   410
            values["type"] = INPUT
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   411
        elif classtype == "Output":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   412
            values["type"] = OUTPUT
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   413
        elif classtype == "InOut":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   414
            values["type"] = INOUT
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   415
        expression = self.Expression.GetValue()
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   416
        if self.Expression.IsEnabled() and expression != "":
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   417
            values["name"] = expression
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   418
        else:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   419
            values["name"] = self.Name.GetStringSelection()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   420
        values["value_type"] = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   421
        for var_name, var_type, value_type in self.VarList:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   422
            if var_name == values["name"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   423
                values["value_type"] = value_type
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   424
        values["width"], values["height"] = self.Variable.GetSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   425
        return values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   426
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   427
    def OnClassChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   428
        self.RefreshNameList()
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   429
        if self.Class.GetStringSelection() == "Input":
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   430
            self.Expression.Enable(True)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   431
        else:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   432
            self.Expression.Enable(False)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   433
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   434
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   435
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   436
    def OnNameChanged(self, event):
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   437
        if self.Name.GetStringSelection() != "":
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   438
            self.Expression.Enable(False)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   439
        elif self.Class.GetStringSelection() == "Input":
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   440
            self.Expression.Enable(True)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   441
        self.RefreshPreview()
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   442
        event.Skip()
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   443
    
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   444
    def OnExpressionChanged(self, event):
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   445
        if self.Expression.GetValue() != "":
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   446
            self.Name.Enable(False)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   447
        else:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   448
            self.Name.Enable(True)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   449
        self.RefreshPreview()
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   450
        event.Skip()
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   451
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   452
    def RefreshPreview(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   453
        dc = wxClientDC(self.Preview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   454
        dc.Clear()
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   455
        expression = self.Expression.GetValue()
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   456
        if self.Expression.IsEnabled() and expression != "":
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   457
            name = expression
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   458
        else:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   459
            name = self.Name.GetStringSelection()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   460
        type = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   461
        for var_name, var_type, value_type in self.VarList:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   462
            if var_name == name:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   463
                type = value_type
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   464
        classtype = self.Class.GetStringSelection()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   465
        if classtype == "Input":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   466
            self.Variable = FBD_Variable(self.Preview, INPUT, name, type)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   467
        elif classtype == "Output":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   468
            self.Variable = FBD_Variable(self.Preview, OUTPUT, name, type)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   469
        elif classtype == "InOut":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   470
            self.Variable = FBD_Variable(self.Preview, INOUT, name, type)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   471
        width, height = self.MinVariableSize
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   472
        min_width, min_height = self.Variable.GetMinSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   473
        width, height = max(min_width, width), max(min_height, height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   474
        self.Variable.SetSize(width, height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   475
        clientsize = self.Preview.GetClientSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   476
        x = (clientsize.width - width) / 2
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   477
        y = (clientsize.height - height) / 2
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   478
        self.Variable.SetPosition(x, y)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   479
        self.Variable.Draw(dc)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   480
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   481
    def OnPaint(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   482
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   483
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   484
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   485
#                          Create New Connection Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   486
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   487
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   488
[wxID_CONNECTIONPROPERTIESDIALOG, wxID_CONNECTIONPROPERTIESDIALOGMAINPANEL, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   489
 wxID_CONNECTIONPROPERTIESDIALOGNAME, wxID_CONNECTIONPROPERTIESDIALOGRADIOBUTTON1, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   490
 wxID_CONNECTIONPROPERTIESDIALOGRADIOBUTTON2, wxID_CONNECTIONPROPERTIESDIALOGPREVIEW,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   491
 wxID_CONNECTIONPROPERTIESDIALOGSTATICTEXT1, wxID_CONNECTIONPROPERTIESDIALOGSTATICTEXT2, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   492
 wxID_CONNECTIONPROPERTIESDIALOGSTATICTEXT3, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   493
] = [wx.NewId() for _init_ctrls in range(9)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   494
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   495
class ConnectionPropertiesDialog(wx.Dialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   496
    def _init_coll_flexGridSizer1_Items(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   497
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   498
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   499
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   500
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   501
    def _init_sizers(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   502
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   503
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   504
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   505
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   506
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   507
        self.SetSizer(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   508
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   509
    def _init_ctrls(self, prnt):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   510
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   511
        wx.Dialog.__init__(self, id=wxID_CONNECTIONPROPERTIESDIALOG,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   512
              name='ConnectionPropertiesDialog', parent=prnt, pos=wx.Point(376, 223),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   513
              size=wx.Size(350, 220), style=wx.DEFAULT_DIALOG_STYLE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   514
              title='Connection Properties')
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   515
        self.SetClientSize(wx.Size(350, 220))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   516
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   517
        self.MainPanel = wx.Panel(id=wxID_CONNECTIONPROPERTIESDIALOGMAINPANEL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   518
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   519
              size=wx.Size(340, 360), style=wx.TAB_TRAVERSAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   520
        self.MainPanel.SetAutoLayout(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   521
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   522
        self.staticText1 = wx.StaticText(id=wxID_CONNECTIONPROPERTIESDIALOGSTATICTEXT1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   523
              label='Type:', name='staticText1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   524
              pos=wx.Point(24, 24), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   525
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   526
        self.staticText2 = wx.StaticText(id=wxID_CONNECTIONPROPERTIESDIALOGSTATICTEXT2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   527
              label='Name:', name='staticText2', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   528
              pos=wx.Point(24, 104), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   529
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   530
        self.staticText3 = wx.StaticText(id=wxID_CONNECTIONPROPERTIESDIALOGSTATICTEXT3,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   531
              label='Preview:', name='staticText3', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   532
              pos=wx.Point(174, 24), size=wx.Size(100, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   533
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   534
        self.radioButton1 = wx.RadioButton(id=wxID_CONNECTIONPROPERTIESDIALOGRADIOBUTTON1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   535
              label='Connector', name='radioButton1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   536
              pos=wx.Point(24, 48), size=wx.Size(114, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   537
        EVT_RADIOBUTTON(self, wxID_CONNECTIONPROPERTIESDIALOGRADIOBUTTON1, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   538
        self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   539
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   540
        self.radioButton2 = wx.RadioButton(id=wxID_CONNECTIONPROPERTIESDIALOGRADIOBUTTON2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   541
              label='Continuation', name='radioButton2', parent=self.MainPanel, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   542
              pos=wx.Point(24, 72), size=wx.Size(128, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   543
        EVT_RADIOBUTTON(self, wxID_CONNECTIONPROPERTIESDIALOGRADIOBUTTON2, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   544
        self.radioButton2.SetValue(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   545
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   546
        self.Name = wx.TextCtrl(id=wxID_CONNECTIONPROPERTIESDIALOGNAME,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   547
              name='Name', parent=self.MainPanel, pos=wx.Point(24, 130),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   548
              size=wx.Size(145, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   549
        EVT_TEXT(self, wxID_CONNECTIONPROPERTIESDIALOGNAME, self.OnNameChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   550
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   551
        self.Preview = wx.Panel(id=wxID_CONNECTIONPROPERTIESDIALOGPREVIEW,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   552
              name='Preview', parent=self.MainPanel, pos=wx.Point(174, 48),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   553
              size=wx.Size(150, 100), style=wx.TAB_TRAVERSAL|wx.SIMPLE_BORDER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   554
        self.Preview.SetBackgroundColour(wxColour(255,255,255))
42
4a8400732001 Adding optimization on redrawing
lbessard
parents: 28
diff changeset
   555
        setattr(self.Preview, "GetDrawingMode", lambda:FREEDRAWING_MODE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   556
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   557
        self._init_sizers()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   558
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   559
    def __init__(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   560
        self._init_ctrls(parent)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   561
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   562
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   563
        self.Connection = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   564
        self.MinConnectionSize = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   565
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   566
        EVT_PAINT(self, self.OnPaint)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   567
            
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   568
    def SetMinConnectionSize(self, size):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   569
        self.MinConnectionSize = size
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   570
    
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   571
    def SetValues(self, values):
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   572
        for name, value in values.items():
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   573
            if name == "type":
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   574
                if value == CONNECTOR:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   575
                    self.radioButton1.SetValue(True)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   576
                elif value == CONTINUATION:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   577
                    self.radioButton2.SetValue(True)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   578
            elif name == "name":
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   579
                self.Name.SetValue(value)
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   580
        self.RefreshPreview()
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   581
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   582
    def GetValues(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   583
        values = {}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   584
        if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   585
            values["type"] = CONNECTOR
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   586
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   587
            values["type"] = CONTINUATION
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   588
        values["name"] = self.Name.GetValue()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   589
        values["width"], values["height"] = self.Connection.GetSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   590
        return values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   591
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   592
    def OnTypeChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   593
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   594
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   595
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   596
    def OnNameChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   597
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   598
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   599
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   600
    def RefreshPreview(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   601
        dc = wxClientDC(self.Preview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   602
        dc.Clear()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   603
        if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   604
            self.Connection = FBD_Connector(self.Preview, CONNECTOR, self.Name.GetValue())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   605
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   606
            self.Connection = FBD_Connector(self.Preview, CONTINUATION, self.Name.GetValue())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   607
        width, height = self.MinConnectionSize
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   608
        min_width, min_height = self.Connection.GetMinSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   609
        width, height = max(min_width, width), max(min_height, height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   610
        self.Connection.SetSize(width, height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   611
        clientsize = self.Preview.GetClientSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   612
        x = (clientsize.width - width) / 2
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   613
        y = (clientsize.height - height) / 2
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   614
        self.Connection.SetPosition(x, y)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   615
        self.Connection.Draw(dc)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   616
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   617
    def OnPaint(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   618
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   619
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   620
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   621
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   622
#                        Edit Ladder Element Properties Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   623
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   624
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   625
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   626
[wxID_LDELEMENTDIALOG, wxID_LDELEMENTDIALOGMAINPANEL, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   627
 wxID_LDELEMENTDIALOGNAME, wxID_LDELEMENTDIALOGRADIOBUTTON1, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   628
 wxID_LDELEMENTDIALOGRADIOBUTTON2, wxID_LDELEMENTDIALOGRADIOBUTTON3,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   629
 wxID_LDELEMENTDIALOGRADIOBUTTON4, wxID_LDELEMENTDIALOGPREVIEW,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   630
 wxID_LDELEMENTDIALOGSTATICTEXT1, wxID_LDELEMENTDIALOGSTATICTEXT2, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   631
 wxID_LDELEMENTDIALOGSTATICTEXT3, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   632
] = [wx.NewId() for _init_ctrls in range(11)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   633
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   634
class LDElementDialog(wx.Dialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   635
    def _init_coll_flexGridSizer1_Items(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   636
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   637
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   638
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   639
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   640
    def _init_sizers(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   641
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   642
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   643
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   644
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   645
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   646
        self.SetSizer(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   647
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   648
    def _init_ctrls(self, prnt, title, labels):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   649
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   650
        wx.Dialog.__init__(self, id=wxID_LDELEMENTDIALOG,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   651
              name='VariablePropertiesDialog', parent=prnt, pos=wx.Point(376, 223),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   652
              size=wx.Size(350, 260), style=wx.DEFAULT_DIALOG_STYLE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   653
              title=title)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   654
        self.SetClientSize(wx.Size(350, 260))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   655
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   656
        self.MainPanel = wx.Panel(id=wxID_LDELEMENTDIALOGMAINPANEL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   657
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   658
              size=wx.Size(340, 200), style=wx.TAB_TRAVERSAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   659
        self.MainPanel.SetAutoLayout(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   660
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   661
        self.staticText1 = wx.StaticText(id=wxID_LDELEMENTDIALOGSTATICTEXT1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   662
              label='Modifier:', name='staticText1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   663
              pos=wx.Point(24, 24), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   664
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   665
        self.staticText2 = wx.StaticText(id=wxID_LDELEMENTDIALOGSTATICTEXT2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   666
              label='Name:', name='staticText2', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   667
              pos=wx.Point(24, 150), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   668
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   669
        self.staticText3 = wx.StaticText(id=wxID_LDELEMENTDIALOGSTATICTEXT3,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   670
              label='Preview:', name='staticText3', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   671
              pos=wx.Point(174, 24), size=wx.Size(100, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   672
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   673
        self.radioButton1 = wx.RadioButton(id=wxID_LDELEMENTDIALOGRADIOBUTTON1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   674
              label=labels[0], name='radioButton1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   675
              pos=wx.Point(24, 48), size=wx.Size(114, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   676
        EVT_RADIOBUTTON(self, wxID_LDELEMENTDIALOGRADIOBUTTON1, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   677
        self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   678
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   679
        self.radioButton2 = wx.RadioButton(id=wxID_LDELEMENTDIALOGRADIOBUTTON2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   680
              label=labels[1], name='radioButton2', parent=self.MainPanel, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   681
              pos=wx.Point(24, 72), size=wx.Size(128, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   682
        EVT_RADIOBUTTON(self, wxID_LDELEMENTDIALOGRADIOBUTTON2, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   683
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   684
        self.radioButton3 = wx.RadioButton(id=wxID_LDELEMENTDIALOGRADIOBUTTON3,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   685
              label=labels[2], name='radioButton3', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   686
              pos=wx.Point(24, 96), size=wx.Size(114, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   687
        EVT_RADIOBUTTON(self, wxID_LDELEMENTDIALOGRADIOBUTTON3, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   688
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   689
        self.radioButton4 = wx.RadioButton(id=wxID_LDELEMENTDIALOGRADIOBUTTON4,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   690
              label=labels[3], name='radioButton4', parent=self.MainPanel, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   691
              pos=wx.Point(24, 120), size=wx.Size(128, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   692
        EVT_RADIOBUTTON(self, wxID_LDELEMENTDIALOGRADIOBUTTON4, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   693
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   694
        self.Name = wx.Choice(id=wxID_LDELEMENTDIALOGNAME,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   695
              name='Name', parent=self.MainPanel, pos=wx.Point(24, 174),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   696
              size=wx.Size(145, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   697
        EVT_CHOICE(self, wxID_LDELEMENTDIALOGNAME, self.OnNameChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   698
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   699
        self.Preview = wx.Panel(id=wxID_LDELEMENTDIALOGPREVIEW,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   700
              name='Preview', parent=self.MainPanel, pos=wx.Point(174, 48),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   701
              size=wx.Size(150, 150), style=wx.TAB_TRAVERSAL|wx.SIMPLE_BORDER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   702
        self.Preview.SetBackgroundColour(wxColour(255,255,255))
42
4a8400732001 Adding optimization on redrawing
lbessard
parents: 28
diff changeset
   703
        setattr(self.Preview, "GetDrawingMode", lambda:FREEDRAWING_MODE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   704
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   705
        self._init_sizers()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   706
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   707
    def __init__(self, parent, type):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   708
        self.Type = type
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   709
        if type == "contact":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   710
            self._init_ctrls(parent, "Edit Contact Values", ['Normal','Negate','Rising Edge','Falling Edge'])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   711
            self.Element = LD_Contact(self.Preview, CONTACT_NORMAL, "")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   712
        elif type == "coil":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   713
            self._init_ctrls(parent, "Edit Coil Values", ['Normal','Negate','Set','Reset'])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   714
            self.Element = LD_Coil(self.Preview, COIL_NORMAL, "")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   715
        self.Element.SetPosition((150 - LD_ELEMENT_SIZE[0]) / 2, (150 - LD_ELEMENT_SIZE[1]) / 2)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   716
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   717
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   718
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   719
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   720
        EVT_PAINT(self, self.OnPaint)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   721
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   722
    def SetElementSize(self, size):
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   723
        min_width, min_height = self.Element.GetMinSize()
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   724
        width, height = max(min_width, size[0]), max(min_height, size[1])
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   725
        self.Element.SetSize(width, height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   726
        self.Element.SetPosition((150 - width) / 2, (150 - height) / 2)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   727
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   728
    def SetVariables(self, vars):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   729
        self.Name.Clear()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   730
        for name in vars:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   731
            self.Name.Append(name)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   732
        self.Name.Enable(self.Name.GetCount() > 0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   733
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   734
    def SetValues(self, values):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   735
        for name, value in values.items():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   736
            if name == "name":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   737
                self.Element.SetName(value)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   738
                self.Name.SetStringSelection(value)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   739
            elif name == "type":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   740
                self.Element.SetType(value)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   741
                if self.Type == "contact":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   742
                    if value == CONTACT_NORMAL:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   743
                        self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   744
                    elif value == CONTACT_REVERSE:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   745
                        self.radioButton2.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   746
                    elif value == CONTACT_RISING:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   747
                        self.radioButton3.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   748
                    elif value == CONTACT_FALLING:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   749
                        self.radioButton4.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   750
                elif self.Type == "coil":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   751
                    if value == COIL_NORMAL:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   752
                        self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   753
                    elif value == COIL_REVERSE:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   754
                        self.radioButton2.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   755
                    elif value == COIL_SET:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   756
                        self.radioButton3.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   757
                    elif value == COIL_RESET:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   758
                        self.radioButton4.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   759
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   760
    def GetValues(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   761
        values = {}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   762
        values["name"] = self.Element.GetName()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   763
        values["type"] = self.Element.GetType()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   764
        values["width"], values["height"] = self.Element.GetSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   765
        return values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   766
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   767
    def OnTypeChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   768
        if self.Type == "contact":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   769
            if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   770
                self.Element.SetType(CONTACT_NORMAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   771
            elif self.radioButton2.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   772
                self.Element.SetType(CONTACT_REVERSE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   773
            elif self.radioButton3.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   774
                self.Element.SetType(CONTACT_RISING)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   775
            elif self.radioButton4.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   776
                self.Element.SetType(CONTACT_FALLING)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   777
        elif self.Type == "coil":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   778
            if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   779
                self.Element.SetType(COIL_NORMAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   780
            elif self.radioButton2.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   781
                self.Element.SetType(COIL_REVERSE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   782
            elif self.radioButton3.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   783
                self.Element.SetType(COIL_SET)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   784
            elif self.radioButton4.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   785
                self.Element.SetType(COIL_RESET)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   786
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   787
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   788
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   789
    def OnNameChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   790
        self.Element.SetName(self.Name.GetStringSelection())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   791
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   792
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   793
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   794
    def RefreshPreview(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   795
        dc = wxClientDC(self.Preview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   796
        dc.Clear()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   797
        self.Element.Draw(dc)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   798
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   799
    def OnPaint(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   800
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   801
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   802
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   803
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   804
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   805
#                      Edit Ladder Power Rail Properties Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   806
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   807
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   808
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   809
[wxID_LDPOWERRAILDIALOG, wxID_LDPOWERRAILDIALOGMAINPANEL, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   810
 wxID_LDPOWERRAILDIALOGTYPE, wxID_LDPOWERRAILDIALOGRADIOBUTTON1, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   811
 wxID_LDPOWERRAILDIALOGRADIOBUTTON2, wxID_LDPOWERRAILDIALOGPREVIEW,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   812
 wxID_LDPOWERRAILDIALOGSTATICTEXT1, wxID_LDPOWERRAILDIALOGSTATICTEXT2, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   813
 wxID_LDPOWERRAILDIALOGSTATICTEXT3, wxID_LDPOWERRAILDIALOGPINNUMBER,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   814
] = [wx.NewId() for _init_ctrls in range(10)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   815
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   816
class LDPowerRailDialog(wx.Dialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   817
    def _init_coll_flexGridSizer1_Items(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   818
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   819
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   820
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   821
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   822
    def _init_sizers(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   823
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   824
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   825
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   826
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   827
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   828
        self.SetSizer(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   829
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   830
    def _init_ctrls(self, prnt):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   831
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   832
        wx.Dialog.__init__(self, id=wxID_LDPOWERRAILDIALOG,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   833
              name='PowerRailDialog', parent=prnt, pos=wx.Point(376, 223),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   834
              size=wx.Size(350, 260), style=wx.DEFAULT_DIALOG_STYLE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   835
              title='Power Rail Properties')
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   836
        self.SetClientSize(wx.Size(350, 260))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   837
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   838
        self.MainPanel = wx.Panel(id=wxID_LDPOWERRAILDIALOGMAINPANEL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   839
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   840
              size=wx.Size(340, 200), style=wx.TAB_TRAVERSAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   841
        self.MainPanel.SetAutoLayout(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   842
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   843
        self.staticText1 = wx.StaticText(id=wxID_LDPOWERRAILDIALOGSTATICTEXT1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   844
              label='Type:', name='staticText1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   845
              pos=wx.Point(24, 24), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   846
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   847
        self.staticText2 = wx.StaticText(id=wxID_LDPOWERRAILDIALOGSTATICTEXT2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   848
              label='Pin number:', name='staticText2', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   849
              pos=wx.Point(24, 100), size=wx.Size(70, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   850
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   851
        self.staticText3 = wx.StaticText(id=wxID_LDPOWERRAILDIALOGSTATICTEXT3,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   852
              label='Preview:', name='staticText3', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   853
              pos=wx.Point(174, 24), size=wx.Size(100, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   854
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   855
        self.radioButton1 = wx.RadioButton(id=wxID_LDPOWERRAILDIALOGRADIOBUTTON1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   856
              label='Left PowerRail', name='radioButton1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   857
              pos=wx.Point(24, 48), size=wx.Size(114, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   858
        EVT_RADIOBUTTON(self, wxID_LDPOWERRAILDIALOGRADIOBUTTON1, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   859
        self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   860
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   861
        self.radioButton2 = wx.RadioButton(id=wxID_LDPOWERRAILDIALOGRADIOBUTTON2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   862
              label='Right PowerRail', name='radioButton2', parent=self.MainPanel, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   863
              pos=wx.Point(24, 72), size=wx.Size(128, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   864
        EVT_RADIOBUTTON(self, wxID_LDPOWERRAILDIALOGRADIOBUTTON2, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   865
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   866
        self.PinNumber = wx.SpinCtrl(id=wxID_LDPOWERRAILDIALOGPINNUMBER,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   867
              name='PinNumber', parent=self.MainPanel, pos=wx.Point(24, 124),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   868
              size=wx.Size(145, 24), style=wxSP_ARROW_KEYS, min=1, max=20)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   869
        EVT_SPINCTRL(self, wxID_LDPOWERRAILDIALOGPINNUMBER, self.OnPinNumberChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   870
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   871
        self.Preview = wx.Panel(id=wxID_LDPOWERRAILDIALOGPREVIEW,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   872
              name='Preview', parent=self.MainPanel, pos=wx.Point(174, 48),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   873
              size=wx.Size(150, 150), style=wx.TAB_TRAVERSAL|wx.SIMPLE_BORDER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   874
        self.Preview.SetBackgroundColour(wxColour(255,255,255))
42
4a8400732001 Adding optimization on redrawing
lbessard
parents: 28
diff changeset
   875
        setattr(self.Preview, "GetDrawingMode", lambda:FREEDRAWING_MODE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   876
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   877
        self._init_sizers()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   878
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   879
    def __init__(self, parent, type = LEFTRAIL, number = 1):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   880
        self._init_ctrls(parent)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   881
        self.Type = type
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   882
        if type == LEFTRAIL:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   883
            self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   884
        elif type == RIGHTRAIL:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   885
            self.radioButton2.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   886
        self.PinNumber.SetValue(number)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   887
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   888
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   889
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   890
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   891
        self.PowerRailMinSize = (0, 0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   892
        self.PowerRail = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   893
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   894
        EVT_PAINT(self, self.OnPaint)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   895
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   896
    def SetMinSize(self, size):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   897
        self.PowerRailMinSize = size
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
   898
        self.RefreshPreview()    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   899
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   900
    def GetValues(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   901
        values = {}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   902
        values["type"] = self.Type
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   903
        values["number"] = self.PinNumber.GetValue()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   904
        values["width"], values["height"] = self.PowerRail.GetSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   905
        return values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   906
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   907
    def OnTypeChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   908
        if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   909
            self.Type = LEFTRAIL
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   910
        elif self.radioButton2.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   911
            self.Type = RIGHTRAIL
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   912
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   913
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   914
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   915
    def OnPinNumberChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   916
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   917
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   918
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   919
    def RefreshPreview(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   920
        dc = wxClientDC(self.Preview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   921
        dc.Clear()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   922
        self.PowerRail = LD_PowerRail(self.Preview, self.Type, connectors = [True for i in xrange(self.PinNumber.GetValue())])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   923
        min_width, min_height = self.PowerRail.GetMinSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   924
        width, height = max(min_width, self.PowerRailMinSize[0]), max(min_height, self.PowerRailMinSize[1])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   925
        self.PowerRail.SetSize(width, height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   926
        self.PowerRail.RefreshConnectors()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   927
        self.PowerRail.SetPosition((150 - width) / 2, (150 - height) / 2)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   928
        self.PowerRail.Draw(dc)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   929
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   930
    def OnPaint(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   931
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   932
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   933
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   934
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   935
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   936
#                          Edit Transition Content Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   937
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   938
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   939
[wxID_TRANSITIONCONTENTDIALOG, wxID_TRANSITIONCONTENTDIALOGMAINPANEL, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   940
 wxID_TRANSITIONCONTENTDIALOGREFERENCE, wxID_TRANSITIONCONTENTDIALOGINLINE, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   941
 wxID_TRANSITIONCONTENTDIALOGRADIOBUTTON1, wxID_TRANSITIONCONTENTDIALOGRADIOBUTTON2, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   942
] = [wx.NewId() for _init_ctrls in range(6)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   943
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   944
class TransitionContentDialog(wx.Dialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   945
    def _init_coll_flexGridSizer1_Items(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   946
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   947
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   948
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   949
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   950
    def _init_sizers(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   951
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   952
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   953
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   954
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   955
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   956
        self.SetSizer(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   957
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   958
    def _init_ctrls(self, prnt):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   959
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   960
        wx.Dialog.__init__(self, id=wxID_TRANSITIONCONTENTDIALOG,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   961
              name='ProjectDialog', parent=prnt, pos=wx.Point(376, 223),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   962
              size=wx.Size(300, 200), style=wx.DEFAULT_DIALOG_STYLE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   963
              title='Edit transition')
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   964
        self.SetClientSize(wx.Size(300, 200))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   965
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   966
        self.MainPanel = wx.Panel(id=wxID_TRANSITIONCONTENTDIALOGMAINPANEL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   967
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   968
              size=wx.Size(300, 200), style=wx.TAB_TRAVERSAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   969
        self.MainPanel.SetAutoLayout(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   970
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   971
        self.radioButton1 = wx.RadioButton(id=wxID_TRANSITIONCONTENTDIALOGRADIOBUTTON1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   972
              label='Reference', name='radioButton1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   973
              pos=wx.Point(24, 24), size=wx.Size(114, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   974
        EVT_RADIOBUTTON(self, wxID_TRANSITIONCONTENTDIALOGRADIOBUTTON1, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   975
        self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   976
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   977
        self.Reference = wx.Choice(id=wxID_TRANSITIONCONTENTDIALOGREFERENCE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   978
              name='Reference', parent=self.MainPanel, pos=wx.Point(48, 48), 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   979
              size=wx.Size(200, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   980
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   981
        self.radioButton2 = wx.RadioButton(id=wxID_TRANSITIONCONTENTDIALOGRADIOBUTTON2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   982
              label='Inline', name='radioButton2', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   983
              pos=wx.Point(24, 72), size=wx.Size(114, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   984
        EVT_RADIOBUTTON(self, wxID_TRANSITIONCONTENTDIALOGRADIOBUTTON2, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   985
        self.radioButton2.SetValue(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   986
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   987
        self.Inline = wx.TextCtrl(id=wxID_TRANSITIONCONTENTDIALOGINLINE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   988
              name='Inline', parent=self.MainPanel, pos=wx.Point(48, 96),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   989
              size=wx.Size(200, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   990
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   991
        self._init_sizers()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   992
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   993
    def __init__(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   994
        self._init_ctrls(parent)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   995
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   996
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   997
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   998
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   999
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1000
    def OnOK(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1001
        error = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1002
        if self.radioButton1.GetValue() and self.Reference.GetStringSelection() == "":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1003
            error.append("Reference")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1004
        if self.radioButton2.GetValue() and self.Inline.GetValue() == "":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1005
            error.append("Inline")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1006
        if len(error) > 0:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1007
            text = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1008
            for i, item in enumerate(error):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1009
                if i == 0:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1010
                    text += item
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1011
                elif i == len(error) - 1:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1012
                    text += " and %s"%item
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1013
                else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1014
                    text += ", %s"%item 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1015
            message = wxMessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1016
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1017
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1018
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1019
            self.EndModal(wxID_OK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1020
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1021
    def OnTypeChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1022
        if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1023
            self.Reference.Enable(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1024
            self.Inline.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1025
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1026
            self.Reference.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1027
            self.Inline.Enable(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1028
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1029
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1030
    def SetTransitions(self, transitions):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1031
        for transition in transitions:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1032
            self.Reference.Append(transition)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1033
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1034
    def SetValues(self, values):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1035
        if values["type"] == "reference":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1036
            self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1037
            self.radioButton2.SetValue(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1038
            self.Reference.Enable(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1039
            self.Inline.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1040
            self.Reference.SetStringSelection(values["value"])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1041
        elif values["type"] == "inline":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1042
            self.radioButton1.SetValue(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1043
            self.radioButton2.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1044
            self.Reference.Enable(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1045
            self.Inline.Enable(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1046
            self.Inline.SetValue(values["value"])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1047
                
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1048
    def GetValues(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1049
        values = {}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1050
        if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1051
            values["type"] = "reference"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1052
            values["value"] = self.Reference.GetStringSelection()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1053
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1054
            values["type"] = "inline"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1055
            values["value"] = self.Inline.GetValue()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1056
        return values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1057
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1058
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1059
#                         Create New Divergence Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1060
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1061
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1062
[wxID_DIVERGENCECREATEDIALOG, wxID_DIVERGENCECREATEDIALOGMAINPANEL, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1063
 wxID_DIVERGENCECREATEDIALOGRADIOBUTTON1, wxID_DIVERGENCECREATEDIALOGRADIOBUTTON2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1064
 wxID_DIVERGENCECREATEDIALOGRADIOBUTTON3, wxID_DIVERGENCECREATEDIALOGRADIOBUTTON4, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1065
 wxID_DIVERGENCECREATEDIALOGSEQUENCES, wxID_DIVERGENCECREATEDIALOGPREVIEW, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1066
 wxID_DIVERGENCECREATEDIALOGSTATICTEXT1, wxID_DIVERGENCECREATEDIALOGSTATICTEXT2, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1067
 wxID_DIVERGENCECREATEDIALOGSTATICTEXT3,  
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1068
] = [wx.NewId() for _init_ctrls in range(11)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1069
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1070
class DivergenceCreateDialog(wx.Dialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1071
    def _init_coll_flexGridSizer1_Items(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1072
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1073
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1074
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1075
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1076
    def _init_sizers(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1077
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1078
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1079
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1080
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1081
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1082
        self.SetSizer(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1083
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1084
    def _init_ctrls(self, prnt):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1085
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1086
        wx.Dialog.__init__(self, id=wxID_DIVERGENCECREATEDIALOG,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1087
              name='DivergencePropertiesDialog', parent=prnt, pos=wx.Point(376, 223),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1088
              size=wx.Size(500, 300), style=wx.DEFAULT_DIALOG_STYLE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1089
              title='Create a new divergence or convergence')
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1090
        self.SetClientSize(wx.Size(500, 260))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1091
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1092
        self.MainPanel = wx.Panel(id=wxID_DIVERGENCECREATEDIALOGMAINPANEL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1093
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1094
              size=wx.Size(600, 220), style=wx.TAB_TRAVERSAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1095
        self.MainPanel.SetAutoLayout(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1096
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1097
        self.staticText1 = wx.StaticText(id=wxID_DIVERGENCECREATEDIALOGSTATICTEXT1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1098
              label='Type:', name='staticText1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1099
              pos=wx.Point(24, 24), size=wx.Size(200, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1100
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1101
        self.radioButton1 = wx.RadioButton(id=wxID_DIVERGENCECREATEDIALOGRADIOBUTTON1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1102
              label='Selection Divergence', name='radioButton1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1103
              pos=wx.Point(24, 48), size=wx.Size(200, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1104
        EVT_RADIOBUTTON(self, wxID_DIVERGENCECREATEDIALOGRADIOBUTTON1, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1105
        self.radioButton1.SetValue(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1106
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1107
        self.radioButton2 = wx.RadioButton(id=wxID_DIVERGENCECREATEDIALOGRADIOBUTTON2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1108
              label='Selection Convergence', name='radioButton2', parent=self.MainPanel, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1109
              pos=wx.Point(24, 72), size=wx.Size(200, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1110
        EVT_RADIOBUTTON(self, wxID_DIVERGENCECREATEDIALOGRADIOBUTTON2, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1111
        self.radioButton2.SetValue(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1112
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1113
        self.radioButton3 = wx.RadioButton(id=wxID_DIVERGENCECREATEDIALOGRADIOBUTTON3,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1114
              label='Simultaneous Divergence', name='radioButton3', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1115
              pos=wx.Point(24, 96), size=wx.Size(200, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1116
        EVT_RADIOBUTTON(self, wxID_DIVERGENCECREATEDIALOGRADIOBUTTON3, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1117
        self.radioButton3.SetValue(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1118
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1119
        self.radioButton4 = wx.RadioButton(id=wxID_DIVERGENCECREATEDIALOGRADIOBUTTON4,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1120
              label='Simultaneous Convergence', name='radioButton4', parent=self.MainPanel, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1121
              pos=wx.Point(24, 120), size=wx.Size(200, 24), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1122
        EVT_RADIOBUTTON(self, wxID_DIVERGENCECREATEDIALOGRADIOBUTTON4, self.OnTypeChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1123
        self.radioButton4.SetValue(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1124
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1125
        self.staticText2 = wx.StaticText(id=wxID_DIVERGENCECREATEDIALOGSTATICTEXT2,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1126
              label='Number of sequences:', name='staticText2', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1127
              pos=wx.Point(24, 150), size=wx.Size(200, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1128
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1129
        self.Sequences = wx.SpinCtrl(id=wxID_DIVERGENCECREATEDIALOGSEQUENCES,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1130
              name='Sequences', parent=self.MainPanel, pos=wx.Point(24, 174),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1131
              size=wx.Size(200, 24), style=0, min=2, max=20)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1132
        EVT_SPINCTRL(self, wxID_DIVERGENCECREATEDIALOGSEQUENCES, self.OnSequencesChanged)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1133
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1134
        self.staticText3 = wx.StaticText(id=wxID_DIVERGENCECREATEDIALOGSTATICTEXT3,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1135
              label='Preview:', name='staticText3', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1136
              pos=wx.Point(250, 24), size=wx.Size(100, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1137
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1138
        self.Preview = wx.Panel(id=wxID_DIVERGENCECREATEDIALOGPREVIEW,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1139
              name='Preview', parent=self.MainPanel, pos=wx.Point(250, 48),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1140
              size=wx.Size(225, 150), style=wx.TAB_TRAVERSAL|wx.SIMPLE_BORDER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1141
        self.Preview.SetBackgroundColour(wxColour(255,255,255))
42
4a8400732001 Adding optimization on redrawing
lbessard
parents: 28
diff changeset
  1142
        setattr(self.Preview, "GetDrawingMode", lambda:FREEDRAWING_MODE)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1143
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1144
        self._init_sizers()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1145
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1146
    def __init__(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1147
        self._init_ctrls(parent)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1148
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1149
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1150
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1151
        self.Divergence = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1152
        self.MinSize = (0, 0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1153
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1154
        EVT_PAINT(self, self.OnPaint)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1155
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1156
    def GetValues(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1157
        values = {}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1158
        if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1159
            values["type"] = SELECTION_DIVERGENCE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1160
        elif self.radioButton2.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1161
            values["type"] = SELECTION_CONVERGENCE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1162
        elif self.radioButton3.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1163
            values["type"] = SIMULTANEOUS_DIVERGENCE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1164
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1165
            values["type"] = SIMULTANEOUS_CONVERGENCE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1166
        values["number"] = self.Sequences.GetValue()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1167
        return values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1168
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1169
    def SetMinSize(self, size):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1170
        self.MinSize = size
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1171
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1172
    def OnTypeChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1173
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1174
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1175
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1176
    def OnSequencesChanged(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1177
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1178
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1179
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1180
    def RefreshPreview(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1181
        dc = wxClientDC(self.Preview)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1182
        dc.Clear()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1183
        if self.radioButton1.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1184
            self.Divergence = SFC_Divergence(self.Preview, SELECTION_DIVERGENCE, self.Sequences.GetValue())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1185
        elif self.radioButton2.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1186
            self.Divergence = SFC_Divergence(self.Preview, SELECTION_CONVERGENCE, self.Sequences.GetValue())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1187
        elif self.radioButton3.GetValue():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1188
            self.Divergence = SFC_Divergence(self.Preview, SIMULTANEOUS_DIVERGENCE, self.Sequences.GetValue())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1189
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1190
            self.Divergence = SFC_Divergence(self.Preview, SIMULTANEOUS_CONVERGENCE, self.Sequences.GetValue())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1191
        width, height = self.Divergence.GetSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1192
        min_width, min_height = max(width, self.MinSize[0]), max(height, self.MinSize[1])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1193
        self.Divergence.SetSize(min_width, min_height)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1194
        clientsize = self.Preview.GetClientSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1195
        x = (clientsize.width - min_width) / 2
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1196
        y = (clientsize.height - min_height) / 2
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1197
        self.Divergence.SetPosition(x, y)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1198
        self.Divergence.Draw(dc)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1199
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1200
    def OnPaint(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1201
        self.RefreshPreview()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1202
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1203
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1204
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1205
#                            Action Block Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1206
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1207
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1208
class ActionTable(wxPyGridTableBase):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1209
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1210
    """
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1211
    A custom wxGrid Table using user supplied data
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1212
    """
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1213
    def __init__(self, parent, data, colnames):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1214
        # The base class must be initialized *first*
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1215
        wxPyGridTableBase.__init__(self)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1216
        self.data = data
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1217
        self.colnames = colnames
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1218
        self.Parent = parent
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1219
        # XXX
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1220
        # we need to store the row length and collength to
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1221
        # see if the table has changed size
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1222
        self._rows = self.GetNumberRows()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1223
        self._cols = self.GetNumberCols()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1224
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1225
    def GetNumberCols(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1226
        return len(self.colnames)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1227
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1228
    def GetNumberRows(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1229
        return len(self.data)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1230
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1231
    def GetColLabelValue(self, col):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1232
        if col < len(self.colnames):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1233
            return self.colnames[col]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1234
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1235
    def GetRowLabelValues(self, row):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1236
        return row
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1237
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1238
    def GetValue(self, row, col):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1239
        if row < self.GetNumberRows():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1240
            name = str(self.data[row].get(self.GetColLabelValue(col), ""))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1241
            return name
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1242
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1243
    def GetValueByName(self, row, colname):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1244
        return self.data[row].get(colname)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1245
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1246
    def SetValue(self, row, col, value):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1247
        if col < len(self.colnames):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1248
            self.data[row][self.GetColLabelValue(col)] = value
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1249
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1250
    def ResetView(self, grid):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1251
        """
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1252
        (wxGrid) -> Reset the grid view.   Call this to
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1253
        update the grid if rows and columns have been added or deleted
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1254
        """
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1255
        grid.BeginBatch()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1256
        for current, new, delmsg, addmsg in [
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1257
            (self._rows, self.GetNumberRows(), wxGRIDTABLE_NOTIFY_ROWS_DELETED, wxGRIDTABLE_NOTIFY_ROWS_APPENDED),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1258
            (self._cols, self.GetNumberCols(), wxGRIDTABLE_NOTIFY_COLS_DELETED, wxGRIDTABLE_NOTIFY_COLS_APPENDED),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1259
        ]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1260
            if new < current:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1261
                msg = wxGridTableMessage(self,delmsg,new,current-new)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1262
                grid.ProcessTableMessage(msg)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1263
            elif new > current:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1264
                msg = wxGridTableMessage(self,addmsg,new-current)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1265
                grid.ProcessTableMessage(msg)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1266
                self.UpdateValues(grid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1267
        grid.EndBatch()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1268
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1269
        self._rows = self.GetNumberRows()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1270
        self._cols = self.GetNumberCols()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1271
        # update the column rendering scheme
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1272
        self._updateColAttrs(grid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1273
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1274
        # update the scrollbars and the displayed part of the grid
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1275
        grid.AdjustScrollbars()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1276
        grid.ForceRefresh()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1277
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1278
    def UpdateValues(self, grid):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1279
        """Update all displayed values"""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1280
        # This sends an event to the grid table to update all of the values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1281
        msg = wxGridTableMessage(self, wxGRIDTABLE_REQUEST_VIEW_GET_VALUES)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1282
        grid.ProcessTableMessage(msg)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1283
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1284
    def _updateColAttrs(self, grid):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1285
        """
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1286
        wxGrid -> update the column attributes to add the
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1287
        appropriate renderer given the column name.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1288
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1289
        Otherwise default to the default renderer.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1290
        """
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1291
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1292
        for col in range(self.GetNumberCols()):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1293
            attr = wxGridCellAttr()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1294
            attr.SetAlignment(self.Parent.ColAlignements[col], wxALIGN_CENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1295
            grid.SetColAttr(col, attr)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1296
            grid.SetColSize(col, self.Parent.ColSizes[col])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1297
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1298
        typelist = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1299
        accesslist = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1300
        for row in range(self.GetNumberRows()):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1301
            for col in range(self.GetNumberCols()):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1302
                editor = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1303
                renderer = None
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1304
                readonly = False
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1305
                colname = self.GetColLabelValue(col)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1306
                if colname == "Qualifier":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1307
                    editor = wxGridCellChoiceEditor()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1308
                    editor.SetParameters(self.Parent.QualifierList)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1309
                if colname == "Duration":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1310
                    editor = wxGridCellTextEditor()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1311
                    renderer = wxGridCellStringRenderer()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1312
                    if self.Parent.DurationList[self.data[row]["Qualifier"]]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1313
                        readonly = False
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1314
                    else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1315
                        readonly = True
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1316
                        self.data[row]["Duration"] = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1317
                elif colname == "Type":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1318
                    editor = wxGridCellChoiceEditor()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1319
                    editor.SetParameters(self.Parent.TypeList)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1320
                elif colname == "Value":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1321
                    type = self.data[row]["Type"]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1322
                    if type == "Action":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1323
                        editor = wxGridCellChoiceEditor()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1324
                        editor.SetParameters(self.Parent.ActionList)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1325
                    elif type == "Variable":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1326
                        editor = wxGridCellChoiceEditor()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1327
                        editor.SetParameters(self.Parent.VariableList)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1328
                    elif type == "Inline":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1329
                        editor = wxGridCellTextEditor()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1330
                        renderer = wxGridCellStringRenderer()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1331
                elif colname == "Indicator":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1332
                    editor = wxGridCellChoiceEditor()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1333
                    editor.SetParameters(self.Parent.VariableList)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1334
                    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1335
                grid.SetCellEditor(row, col, editor)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1336
                grid.SetCellRenderer(row, col, renderer)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1337
                grid.SetReadOnly(row, col, readonly)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1338
                
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1339
                grid.SetCellBackgroundColour(row, col, wxWHITE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1340
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1341
    def SetData(self, data):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1342
        self.data = data
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1343
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1344
    def GetData(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1345
        return self.data
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1346
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1347
    def GetCurrentIndex(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1348
        return self.CurrentIndex
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1349
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1350
    def SetCurrentIndex(self, index):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1351
        self.CurrentIndex = index
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1352
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1353
    def AppendRow(self, row_content):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1354
        self.data.append(row_content)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1355
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1356
    def RemoveRow(self, row_index):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1357
        self.data.pop(row_index)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1358
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1359
    def MoveRow(self, row_index, move, grid):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1360
        new_index = max(0, min(row_index + move, len(self.data) - 1))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1361
        if new_index != row_index:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1362
            self.data.insert(new_index, self.data.pop(row_index))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1363
            grid.SetGridCursor(new_index, grid.GetGridCursorCol())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1364
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1365
    def Empty(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1366
        self.data = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1367
        self.editors = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1368
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1369
[wxID_ACTIONBLOCKDIALOG, wxID_ACTIONBLOCKDIALOGMAINPANEL, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1370
 wxID_ACTIONBLOCKDIALOGVARIABLESGRID, wxID_ACTIONBLOCKDIALOGSTATICTEXT1, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1371
 wxID_ACTIONBLOCKDIALOGADDBUTTON,wxID_ACTIONBLOCKDIALOGDELETEBUTTON, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1372
 wxID_ACTIONBLOCKDIALOGUPBUTTON, wxID_ACTIONBLOCKDIALOGDOWNBUTTON, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1373
] = [wx.NewId() for _init_ctrls in range(8)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1374
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1375
class ActionBlockDialog(wx.Dialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1376
    def _init_coll_flexGridSizer1_Items(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1377
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1378
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1379
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1380
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1381
    def _init_sizers(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1382
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1383
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1384
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1385
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1386
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1387
        self.SetSizer(self.flexGridSizer1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1388
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1389
    def _init_ctrls(self, prnt):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1390
        # generated method, don't edit
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1391
        wx.Dialog.__init__(self, id=wxID_ACTIONBLOCKDIALOG,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1392
              name='ActionBlockDialog', parent=prnt, pos=wx.Point(376, 223),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1393
              size=wx.Size(500, 300), style=wx.DEFAULT_DIALOG_STYLE,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1394
              title='Edit action block properties')
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1395
        self.SetClientSize(wx.Size(500, 300))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1396
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1397
        self.MainPanel = wx.Panel(id=wxID_ACTIONBLOCKDIALOGMAINPANEL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1398
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1399
              size=wx.Size(500, 300), style=wx.TAB_TRAVERSAL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1400
        self.MainPanel.SetAutoLayout(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1401
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1402
        self.staticText1 = wx.StaticText(id=wxID_ACTIONBLOCKDIALOGSTATICTEXT1,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1403
              label='Actions:', name='staticText1', parent=self.MainPanel,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1404
              pos=wx.Point(24, 24), size=wx.Size(95, 17), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1405
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1406
        self.ActionsGrid = wx.grid.Grid(id=wxID_ACTIONBLOCKDIALOGVARIABLESGRID,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1407
              name='ActionsGrid', parent=self.MainPanel, pos=wx.Point(24, 44), 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1408
              size=wx.Size(450, 150), style=wxVSCROLL)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1409
        self.ActionsGrid.SetFont(wx.Font(12, 77, wx.NORMAL, wx.NORMAL, False,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1410
              'Sans'))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1411
        self.ActionsGrid.SetLabelFont(wx.Font(10, 77, wx.NORMAL, wx.NORMAL,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1412
              False, 'Sans'))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1413
        self.ActionsGrid.DisableDragGridSize()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1414
        self.ActionsGrid.EnableScrolling(False, True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1415
        EVT_GRID_CELL_CHANGE(self.ActionsGrid, self.OnActionsGridCellChange)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1416
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1417
        self.AddButton = wx.Button(id=wxID_ACTIONBLOCKDIALOGADDBUTTON, label='Add',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1418
              name='AddButton', parent=self.MainPanel, pos=wx.Point(245, 204),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1419
              size=wx.Size(72, 32), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1420
        EVT_BUTTON(self, wxID_ACTIONBLOCKDIALOGADDBUTTON, self.OnAddButton)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1421
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1422
        self.DeleteButton = wx.Button(id=wxID_ACTIONBLOCKDIALOGDELETEBUTTON, label='Delete',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1423
              name='DeleteButton', parent=self.MainPanel, pos=wx.Point(325, 204),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1424
              size=wx.Size(72, 32), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1425
        EVT_BUTTON(self, wxID_ACTIONBLOCKDIALOGDELETEBUTTON, self.OnDeleteButton)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1426
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1427
        self.UpButton = wx.Button(id=wxID_ACTIONBLOCKDIALOGUPBUTTON, label='^',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1428
              name='UpButton', parent=self.MainPanel, pos=wx.Point(405, 204),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1429
              size=wx.Size(32, 32), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1430
        EVT_BUTTON(self, wxID_ACTIONBLOCKDIALOGUPBUTTON, self.OnUpButton)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1431
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1432
        self.DownButton = wx.Button(id=wxID_ACTIONBLOCKDIALOGDOWNBUTTON, label='v',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1433
              name='DownButton', parent=self.MainPanel, pos=wx.Point(445, 204),
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1434
              size=wx.Size(32, 32), style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1435
        EVT_BUTTON(self, wxID_ACTIONBLOCKDIALOGDOWNBUTTON, self.OnDownButton)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1436
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1437
        self._init_sizers()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1438
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1439
    def __init__(self, parent):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1440
        self._init_ctrls(parent)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1441
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1442
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1443
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1444
        self.DefaultValue = {"Qualifier" : "N", "Duration" : "", "Type" : "Action", "Value" : "", "Indicator" : ""}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1445
        self.Table = ActionTable(self, [], ["Qualifier","Duration","Type","Value","Indicator"])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1446
        self.TypeList = "Action,Variable,Inline"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1447
        self.ColSizes = [60, 90, 80, 110, 80]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1448
        self.ColAlignements = [wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1449
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1450
        self.ActionsGrid.SetTable(self.Table)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1451
        self.ActionsGrid.SetRowLabelSize(0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1452
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1453
        self.Table.ResetView(self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1454
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1455
    def OnAddButton(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1456
        self.Table.AppendRow(self.DefaultValue.copy())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1457
        self.Table.ResetView(self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1458
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1459
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1460
    def OnDeleteButton(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1461
        row = self.ActionsGrid.GetGridCursorRow()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1462
        self.Table.RemoveRow(row)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1463
        self.Table.ResetView(self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1464
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1465
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1466
    def OnUpButton(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1467
        row = self.ActionsGrid.GetGridCursorRow()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1468
        self.Table.MoveRow(row, -1, self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1469
        self.Table.ResetView(self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1470
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1471
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1472
    def OnDownButton(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1473
        row = self.ActionsGrid.GetGridCursorRow()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1474
        self.Table.MoveRow(row, 1, self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1475
        self.Table.ResetView(self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1476
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1477
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1478
    def OnActionsGridCellChange(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1479
        self.Table.ResetView(self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1480
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1481
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1482
    def SetQualifierList(self, list):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1483
        self.QualifierList = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1484
        sep = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1485
        for qualifier in list.keys():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1486
            self.QualifierList += "%s%s"%(sep, qualifier)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1487
            sep = ","
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1488
        self.DurationList = list
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1489
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1490
    def SetVariableList(self, list):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1491
        self.VariableList = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1492
        sep = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1493
        for variable in list:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1494
            self.VariableList += "%s%s"%(sep, variable["Name"])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1495
            sep = ","
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1496
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1497
    def SetActionList(self, list):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1498
        self.ActionList = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1499
        sep = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1500
        for action in list:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1501
            self.ActionList += "%s%s"%(sep, action)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1502
            sep = ","
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1503
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1504
    def SetValues(self, actions):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1505
        for action in actions:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1506
            row = {"Qualifier" : action["qualifier"], "Value" : action["value"]}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1507
            if action["type"] == "reference":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1508
                if action["value"] in self.ActionList:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1509
                    row["Type"] = "Action"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1510
                elif action["value"] in self.VariableList:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1511
                    row["Type"] = "Variable"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1512
                else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1513
                    row["Type"] = "Inline"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1514
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1515
                row["Type"] = "Inline"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1516
            if "duration" in action:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1517
                row["Duration"] = action["duration"]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1518
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1519
                row["Duration"] = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1520
            if "indicator" in action:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1521
                row["Indicator"] = action["indicator"]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1522
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1523
                row["Indicator"] = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1524
            self.Table.AppendRow(row)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1525
        self.Table.ResetView(self.ActionsGrid)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1526
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1527
    def GetValues(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1528
        values = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1529
        for data in self.Table.GetData():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1530
            action = {"qualifier" : data["Qualifier"], "value" : data["Value"]}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1531
            if data["Type"] in ["Action", "Variable"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1532
                action["type"] = "reference"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1533
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1534
                action["type"] = "inline"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1535
            if data["Duration"] != "":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1536
                action["duration"] = data["Duration"]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1537
            if data["Indicator"] != "":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1538
                action["indicator"] = data["Indicator"]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1539
            values.append(action)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1540
        return values
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1541
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1542
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1543
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1544
#                          Edit Step Name Dialog
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1545
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1546
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1547
class StepNameDialog(wxTextEntryDialog):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1548
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1549
    def __init__(self, parent, message, caption = "Please enter text", defaultValue = "", 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1550
                       style = wxOK|wxCANCEL|wxCENTRE, pos = wxDefaultPosition):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1551
        wx.TextEntryDialog.__init__(self, parent, message, caption, defaultValue, style, pos)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1552
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1553
        self.PouNames = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1554
        self.Variables = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1555
        self.StepNames = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1556
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1557
        EVT_BUTTON(self, self.GetSizer().GetItem(3).GetSizer().GetAffirmativeButton().GetId(), self.OnOK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1558
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1559
    def OnOK(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1560
        step_name = self.GetSizer().GetItem(1).GetWindow().GetValue()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1561
        if step_name == "":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1562
            message = wxMessageDialog(self, "You must type a name!", "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1563
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1564
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1565
        elif not TestIdentifier(step_name):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1566
            message = wxMessageDialog(self, "\"%s\" is not a valid identifier!"%step_name, "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1567
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1568
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1569
        elif step_name.upper() in IEC_KEYWORDS:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1570
            message = wxMessageDialog(self, "\"%s\" is a keyword. It can't be used!"%step_name, "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1571
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1572
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1573
        elif step_name.upper() in self.PouNames:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1574
            message = wxMessageDialog(self, "A pou with \"%s\" as name exists!"%step_name, "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1575
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1576
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1577
        elif step_name.upper() in self.Variables:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1578
            message = wxMessageDialog(self, "A variable with \"%s\" as name exists!"%step_name, "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1579
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1580
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1581
        elif step_name.upper() in self.StepNames:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1582
            message = wxMessageDialog(self, "\"%s\" step already exists!"%step_name, "Error", wxOK|wxICON_ERROR)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1583
            message.ShowModal()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1584
            message.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1585
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1586
            self.EndModal(wxID_OK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1587
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1588
    def SetPouNames(self, pou_names):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1589
        self.PouNames = [pou_name.upper() for pou_name in pou_names]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1590
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1591
    def SetVariables(self, variables):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1592
        self.Variables = [var["Name"].upper() for var in variables]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1593
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1594
    def SetStepNames(self, step_names):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1595
        self.StepNames = [step_name.upper() for step_name in step_names]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
  1596
42
4a8400732001 Adding optimization on redrawing
lbessard
parents: 28
diff changeset
  1597
    def GetValue(self):
4a8400732001 Adding optimization on redrawing
lbessard
parents: 28
diff changeset
  1598
        return self.GetSizer().GetItem(1).GetWindow().GetValue()