PLCOpenEditor.py
author lbessard
Thu, 26 Jul 2007 17:23:21 +0200
changeset 56 7187e1c00975
parent 55 e24d2f917c7e
child 58 39cd981ff242
permissions -rw-r--r--
Adding support for Undo/Redo and Unsaved File On Close detection
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     1
#!/usr/bin/env python
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     3
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     4
#This file is part of PLCOpenEditor, a library implementing an IEC 61131-3 editor
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     5
#based on the plcopen standard. 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     6
#
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     7
#Copyright (C): Edouard TISSERANT and Laurent BESSARD
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     8
#
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
     9
#See COPYING file for copyrights details.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    10
#
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    11
#This library is free software; you can redistribute it and/or
5
f8652b073e84 GPL->LGPL
etisserant
parents: 4
diff changeset
    12
#modify it under the terms of the GNU General Public
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    13
#License as published by the Free Software Foundation; either
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    14
#version 2.1 of the License, or (at your option) any later version.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    15
#
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    16
#This library is distributed in the hope that it will be useful,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    17
#but WITHOUT ANY WARRANTY; without even the implied warranty of
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    18
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    19
#Lesser General Public License for more details.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    20
#
5
f8652b073e84 GPL->LGPL
etisserant
parents: 4
diff changeset
    21
#You should have received a copy of the GNU General Public
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    22
#License along with this library; if not, write to the Free Software
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    23
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    24
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    25
from wxPython.wx import *
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    26
from wxPython.grid import *
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    27
from time import localtime
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    28
from datetime import datetime
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    29
import wx
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    30
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    31
from SFCViewer import *
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    32
from LDViewer import *
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    33
from Viewer import *
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    34
from TextViewer import *
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    35
from RessourceEditor import *
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    36
from PLCControler import *
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    37
from plcopen import OpenPDFDoc
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    38
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    39
import os, re, platform, sys, time, traceback, getopt
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    40
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    41
__version__ = "$Revision$"
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    42
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    43
def create(parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    44
    return PLCOpenEditor(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    45
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    46
def usage():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    47
    print "\nUsage of PLCOpenEditor.py :"
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    48
    print "\n   %s [Filepath]\n"%sys.argv[0]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    49
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    50
try:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    51
    opts, args = getopt.getopt(sys.argv[1:], "h", ["help"])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    52
except getopt.GetoptError:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    53
    # print help information and exit:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    54
    usage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    55
    sys.exit(2)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    56
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    57
for o, a in opts:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    58
    if o in ("-h", "--help"):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    59
        usage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    60
        sys.exit()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    61
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    62
fileOpen = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    63
if len(args) > 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    64
    usage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    65
    sys.exit()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    66
elif len(args) == 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    67
    fileOpen = args[0]
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
    68
CWD = ""
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
    69
for path in sys.path:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
    70
    if os.path.isfile(os.path.join(path, "PLCOpenEditor.py")):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
    71
        CWD = path
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    72
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    73
[wxID_PLCOPENEDITOR, wxID_PLCOPENEDITORPROJECTTREE, 
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
    74
 wxID_PLCOPENEDITORSPLITTERWINDOW1, wxID_PLCOPENEDITOREDITORPANEL,
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
    75
 wxID_PLCOPENEDITORTABSOPENED, wxID_PLCOPENEDITORTOOLBAR,
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
    76
 wxID_PLCOPENEDITORDEFAULTTOOLBAR, wxID_PLCOPENEDITORSFCTOOLBAR, 
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    77
 wxID_PLCOPENEDITORFBDTOOLBAR, wxID_PLCOPENEDITORLDTOOLBAR,
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
    78
] = [wx.NewId() for _init_ctrls in range(10)]
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
    79
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    80
[wxID_PLCOPENEDITORFILEMENUITEMS0, wxID_PLCOPENEDITORFILEMENUITEMS1, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    81
 wxID_PLCOPENEDITORFILEMENUITEMS2, wxID_PLCOPENEDITORFILEMENUITEMS3, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    82
 wxID_PLCOPENEDITORFILEMENUITEMS5, wxID_PLCOPENEDITORFILEMENUITEMS6, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    83
 wxID_PLCOPENEDITORFILEMENUITEMS7, wxID_PLCOPENEDITORFILEMENUITEMS9, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    84
 wxID_PLCOPENEDITORFILEMENUITEMS11,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    85
] = [wx.NewId() for _init_coll_FileMenu_Items in range(9)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    86
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    87
[wxID_PLCOPENEDITORHELPMENUITEMS0, wxID_PLCOPENEDITORHELPMENUITEMS1, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    88
 wxID_PLCOPENEDITORHELPMENUITEMS2, wxID_PLCOPENEDITORHELPMENUITEMS3, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    89
] = [wx.NewId() for _init_coll_HelpMenu_Items in range(4)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    90
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    91
[wxID_PLCOPENEDITORSFCMENUITEMS0, wxID_PLCOPENEDITORSFCMENUITEMS1, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    92
 wxID_PLCOPENEDITORSFCMENUITEMS2, wxID_PLCOPENEDITORSFCMENUITEMS3,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    93
] = [wx.NewId() for _init_coll_HelpMenu_Items in range(4)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    94
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    95
[wxID_PLCOPENEDITORCONFIGMENUITEMS0, wxID_PLCOPENEDITORCONFIGMENUITEMS1, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    96
] = [wx.NewId() for _init_coll_HelpMenu_Items in range(2)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    97
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    98
[wxID_PLCOPENEDITOREDITMENUITEMS0, wxID_PLCOPENEDITOREDITMENUITEMS1, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    99
 wxID_PLCOPENEDITOREDITMENUITEMS11, wxID_PLCOPENEDITOREDITMENUITEMS12, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   100
 wxID_PLCOPENEDITOREDITMENUITEMS2, wxID_PLCOPENEDITOREDITMENUITEMS4, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   101
 wxID_PLCOPENEDITOREDITMENUITEMS5, wxID_PLCOPENEDITOREDITMENUITEMS6, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   102
 wxID_PLCOPENEDITOREDITMENUITEMS8, wxID_PLCOPENEDITOREDITMENUITEMS9, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   103
] = [wx.NewId() for _init_coll_EditMenu_Items in range(10)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   104
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   105
[wxID_PLCOPENEDITORSFCMENUITEMS0, wxID_PLCOPENEDITORSFCMENUITEMS1, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   106
 wxID_PLCOPENEDITORSFCMENUITEMS2, wxID_PLCOPENEDITORSFCMENUITEMS3, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   107
] = [wx.NewId() for _init_coll_SFCMenu_Items in range(4)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   108
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   109
[wxID_PLCOPENEDITORCONFIGMENUITEMS0, wxID_PLCOPENEDITORCONFIGMENUITEMS1, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   110
] = [wx.NewId() for _init_coll_ConfigMenu_Items in range(2)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   111
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   112
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   113
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   114
#                            ToolBars definitions
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   115
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   116
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   117
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   118
[wxID_PLCOPENEDITORTOOLBARSELECTION, wxID_PLCOPENEDITORTOOLBARCOMMENT,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   119
 wxID_PLCOPENEDITORTOOLBARVARIABLE, wxID_PLCOPENEDITORTOOLBARBLOCK,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   120
 wxID_PLCOPENEDITORTOOLBARCONNECTION, wxID_PLCOPENEDITORTOOLBARWIRE,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   121
 wxID_PLCOPENEDITORTOOLBARPOWERRAIL, wxID_PLCOPENEDITORTOOLBARRUNG,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   122
 wxID_PLCOPENEDITORTOOLBARCOIL, wxID_PLCOPENEDITORTOOLBARCONTACT,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   123
 wxID_PLCOPENEDITORTOOLBARBRANCH, wxID_PLCOPENEDITORTOOLBARINITIALSTEP,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   124
 wxID_PLCOPENEDITORTOOLBARSTEP, wxID_PLCOPENEDITORTOOLBARTRANSITION,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   125
 wxID_PLCOPENEDITORTOOLBARACTIONBLOCK, wxID_PLCOPENEDITORTOOLBARDIVERGENCE,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   126
 wxID_PLCOPENEDITORTOOLBARJUMP,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   127
] = [wx.NewId() for _init_coll_DefaultToolBar_Items in range(17)]
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   128
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   129
ToolBarItems = {
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   130
    "FBD" : [(True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCOMMENT, "OnCommentTool", "Images/comment.png", "Create a new comment"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   131
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARVARIABLE, "OnVariableTool", "Images/variable.png", "Create a new variable"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   132
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARBLOCK, "OnBlockTool", "Images/block.png", "Create a new block"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   133
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCONNECTION, "OnConnectionTool", "Images/connection.png", "Create a new connection"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   134
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARWIRE, "OnWireTool", "Images/wire.png", "Create a new wire")],
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   135
    "LD" :  [(True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCOMMENT, "OnCommentTool", "Images/comment.png", "Create a new comment"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   136
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARPOWERRAIL, "OnPowerRailTool", "Images/powerrail.png", "Create a new power rail"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   137
             (False, DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARRUNG, "OnRungTool", "Images/rung.png", "Create a new rung"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   138
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCOIL, "OnCoilTool", "Images/coil.png", "Create a new coil"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   139
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCONTACT, "OnContactTool", "Images/contact.png", "Create a new contact"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   140
             (False, DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARBRANCH, "OnBranchTool", "Images/branch.png", "Create a new branch"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   141
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARVARIABLE, "OnVariableTool", "Images/variable.png", "Create a new variable"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   142
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARBLOCK, "OnBlockTool", "Images/block.png", "Create a new block"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   143
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCONNECTION, "OnConnectionTool", "Images/connection.png", "Create a new connection"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   144
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARWIRE, "OnWireTool", "Images/wire.png", "Create a new wire")],
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   145
    "SFC" : [(True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCOMMENT, "OnCommentTool", "Images/comment.png", "Create a new comment"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   146
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARINITIALSTEP, "OnInitialStepTool", "Images/initial_step.png", "Create a new initial step"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   147
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARSTEP, "OnStepTool", "Images/step.png", "Create a new step"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   148
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARTRANSITION, "OnTransitionTool", "Images/transition.png", "Create a new transition"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   149
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARACTIONBLOCK, "OnActionBlockTool", "Images/action.png", "Create a new action block"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   150
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARDIVERGENCE, "OnDivergenceTool", "Images/divergence.png", "Create a new divergence"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   151
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARJUMP, "OnJumpTool", "Images/jump.png", "Create a new jump"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   152
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARVARIABLE, "OnVariableTool", "Images/variable.png", "Create a new variable"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   153
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARBLOCK, "OnBlockTool", "Images/block.png", "Create a new block"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   154
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCONNECTION, "OnConnectionTool", "Images/connection.png", "Create a new connection"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   155
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARPOWERRAIL, "OnPowerRailTool", "Images/powerrail.png", "Create a new power rail"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   156
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARCONTACT, "OnContactTool", "Images/contact.png", "Create a new contact"),
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   157
             (True, FREEDRAWING_MODE, wxID_PLCOPENEDITORTOOLBARWIRE, "OnWireTool", "Images/wire.png", "Create a new wire")],
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   158
    "ST" : [],
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   159
    "IL" : []
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   160
}
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   161
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   162
class PLCOpenEditor(wx.Frame):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   163
    _custom_classes = {'wx.SashWindow' : ['Viewer']}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   164
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   165
    def _init_coll_EditMenu_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   166
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   167
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   168
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS0,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   169
              kind=wx.ITEM_NORMAL, text=u'Refresh\tCTRL+R')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   170
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   171
              kind=wx.ITEM_NORMAL, text=u'Undo\tCTRL+Z')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   172
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS2,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   173
              kind=wx.ITEM_NORMAL, text=u'Redo\tCTRL+Y')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   174
        parent.AppendSeparator()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   175
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS4,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   176
              kind=wx.ITEM_NORMAL, text=u'Cut\tCTRL+X')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   177
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS5,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   178
              kind=wx.ITEM_NORMAL, text=u'Copy\tCTRL+C')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   179
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS6,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   180
              kind=wx.ITEM_NORMAL, text=u'Paste\tCTRL+V')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   181
        parent.AppendSeparator()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   182
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS8,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   183
              kind=wx.ITEM_NORMAL, text=u'Add POU')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   184
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS9,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   185
              kind=wx.ITEM_NORMAL, text=u'Remove POU')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   186
        parent.AppendSeparator()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   187
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS11,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   188
              kind=wx.ITEM_NORMAL, text=u'Add Configuration')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   189
        parent.Append(help='', id=wxID_PLCOPENEDITOREDITMENUITEMS12,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   190
              kind=wx.ITEM_NORMAL, text=u'Remove Configuration')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   191
        self.Bind(wx.EVT_MENU, self.OnRefreshMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   192
              id=wxID_PLCOPENEDITOREDITMENUITEMS0)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   193
        self.Bind(wx.EVT_MENU, self.OnUndoMenu,
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   194
              id=wxID_PLCOPENEDITOREDITMENUITEMS1)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   195
        self.Bind(wx.EVT_MENU, self.OnRedoMenu,
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   196
              id=wxID_PLCOPENEDITOREDITMENUITEMS2)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   197
        self.Bind(wx.EVT_MENU, self.OnCutMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   198
              id=wxID_PLCOPENEDITOREDITMENUITEMS4)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   199
        self.Bind(wx.EVT_MENU, self.OnCopyMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   200
              id=wxID_PLCOPENEDITOREDITMENUITEMS5)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   201
        self.Bind(wx.EVT_MENU, self.OnPasteMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   202
              id=wxID_PLCOPENEDITOREDITMENUITEMS6)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   203
        self.Bind(wx.EVT_MENU, self.OnAddPouMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   204
              id=wxID_PLCOPENEDITOREDITMENUITEMS8)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   205
        self.Bind(wx.EVT_MENU, self.OnRemovePouMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   206
              id=wxID_PLCOPENEDITOREDITMENUITEMS9)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   207
        self.Bind(wx.EVT_MENU, self.OnAddConfigurationMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   208
              id=wxID_PLCOPENEDITOREDITMENUITEMS11)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   209
        self.Bind(wx.EVT_MENU, self.OnRemoveConfigurationMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   210
              id=wxID_PLCOPENEDITOREDITMENUITEMS12)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   211
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   212
    def _init_coll_menuBar1_Menus(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   213
        # generated method, don't edit
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   214
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   215
        if self.ModeSolo:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   216
            parent.Append(menu=self.FileMenu, title=u'File')
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   217
        parent.Append(menu=self.EditMenu, title=u'Edit')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   218
        parent.Append(menu=self.HelpMenu, title=u'Help')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   219
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   220
    def _init_coll_ConfigMenu_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   221
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   222
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   223
        parent.Append(help='', id=wxID_PLCOPENEDITORCONFIGMENUITEMS0,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   224
              kind=wx.ITEM_NORMAL, text=u'Add Resource')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   225
        parent.Append(help='', id=wxID_PLCOPENEDITORCONFIGMENUITEMS1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   226
              kind=wx.ITEM_NORMAL, text=u'Remove Resource')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   227
        self.Bind(wx.EVT_MENU, self.OnAddResourceMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   228
              id=wxID_PLCOPENEDITORCONFIGMENUITEMS0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   229
        self.Bind(wx.EVT_MENU, self.OnRemoveResourceMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   230
              id=wxID_PLCOPENEDITORCONFIGMENUITEMS1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   231
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   232
    def _init_coll_HelpMenu_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   233
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   234
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   235
        parent.Append(help='', id=wxID_PLCOPENEDITORHELPMENUITEMS0,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   236
              kind=wx.ITEM_NORMAL, text=u'PLCOpenEditor\tF1')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   237
        parent.Append(help='', id=wxID_PLCOPENEDITORHELPMENUITEMS1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   238
              kind=wx.ITEM_NORMAL, text=u'PLCOpen\tF2')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   239
        parent.Append(help='', id=wxID_PLCOPENEDITORHELPMENUITEMS2,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   240
              kind=wx.ITEM_NORMAL, text=u'IEC 61131-3\tF3')
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   241
        if self.ModeSolo:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   242
            parent.Append(help='', id=wxID_PLCOPENEDITORHELPMENUITEMS3,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   243
                  kind=wx.ITEM_NORMAL, text=u'About')
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   244
        self.Bind(wx.EVT_MENU, self.OnPLCOpenMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   245
              id=wxID_PLCOPENEDITORHELPMENUITEMS1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   246
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   247
    def _init_coll_FileMenu_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   248
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   249
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   250
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS0,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   251
              kind=wx.ITEM_NORMAL, text=u'New\tCTRL+N')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   252
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   253
              kind=wx.ITEM_NORMAL, text=u'Open\tCTRL+O')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   254
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS2,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   255
              kind=wx.ITEM_NORMAL, text=u'Close Tab\tCTRL+W')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   256
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS3,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   257
              kind=wx.ITEM_NORMAL, text=u'Close Project')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   258
        parent.AppendSeparator()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   259
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS5,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   260
              kind=wx.ITEM_NORMAL, text=u'Save\tCTRL+S')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   261
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS6,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   262
              kind=wx.ITEM_NORMAL, text=u'Save As...\tCTRL+SHIFT+S')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   263
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS7,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   264
              kind=wx.ITEM_NORMAL, text=u'Generate Program\tCTRL+G')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   265
        parent.AppendSeparator()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   266
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS9,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   267
              kind=wx.ITEM_NORMAL, text=u'Properties')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   268
        parent.AppendSeparator()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   269
        parent.Append(help='', id=wxID_PLCOPENEDITORFILEMENUITEMS11,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   270
              kind=wx.ITEM_NORMAL, text=u'Quit\tCTRL+Q')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   271
        self.Bind(wx.EVT_MENU, self.OnNewProjectMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   272
              id=wxID_PLCOPENEDITORFILEMENUITEMS0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   273
        self.Bind(wx.EVT_MENU, self.OnOpenProjectMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   274
              id=wxID_PLCOPENEDITORFILEMENUITEMS1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   275
        self.Bind(wx.EVT_MENU, self.OnCloseTabMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   276
              id=wxID_PLCOPENEDITORFILEMENUITEMS2)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   277
        self.Bind(wx.EVT_MENU, self.OnCloseProjectMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   278
              id=wxID_PLCOPENEDITORFILEMENUITEMS3)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   279
        self.Bind(wx.EVT_MENU, self.OnSaveProjectMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   280
              id=wxID_PLCOPENEDITORFILEMENUITEMS5)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   281
        self.Bind(wx.EVT_MENU, self.OnSaveProjectAsMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   282
              id=wxID_PLCOPENEDITORFILEMENUITEMS6)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   283
        self.Bind(wx.EVT_MENU, self.OnGenerateProgramMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   284
              id=wxID_PLCOPENEDITORFILEMENUITEMS7)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   285
        self.Bind(wx.EVT_MENU, self.OnPropertiesMenu,
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   286
              id=wxID_PLCOPENEDITORFILEMENUITEMS9)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   287
        self.Bind(wx.EVT_MENU, self.OnQuitMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   288
              id=wxID_PLCOPENEDITORFILEMENUITEMS11)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   289
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   290
    def _init_coll_SFCMenu_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   291
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   292
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   293
        parent.Append(help='', id=wxID_PLCOPENEDITORSFCMENUITEMS0,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   294
              kind=wx.ITEM_NORMAL, text=u'Add Transition')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   295
        parent.Append(help='', id=wxID_PLCOPENEDITORSFCMENUITEMS1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   296
              kind=wx.ITEM_NORMAL, text=u'Add Action')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   297
        parent.Append(help='', id=wxID_PLCOPENEDITORSFCMENUITEMS2,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   298
              kind=wx.ITEM_NORMAL, text=u'Remove Transition')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   299
        parent.Append(help='', id=wxID_PLCOPENEDITORSFCMENUITEMS3,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   300
              kind=wx.ITEM_NORMAL, text=u'Remove Action')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   301
        self.Bind(wx.EVT_MENU, self.OnAddPouTransitionMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   302
              id=wxID_PLCOPENEDITORSFCMENUITEMS0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   303
        self.Bind(wx.EVT_MENU, self.OnAddPouActionMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   304
              id=wxID_PLCOPENEDITORSFCMENUITEMS1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   305
        self.Bind(wx.EVT_MENU, self.OnRemovePouTransitionMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   306
              id=wxID_PLCOPENEDITORSFCMENUITEMS2)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   307
        self.Bind(wx.EVT_MENU, self.OnRemovePouActionMenu,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   308
              id=wxID_PLCOPENEDITORSFCMENUITEMS3)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   309
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   310
    def _init_utils(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   311
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   312
        self.menuBar1 = wx.MenuBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   313
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   314
        if self.ModeSolo:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   315
            self.FileMenu = wx.Menu(title=u'')
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   316
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   317
            self.FileMenu = None
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   318
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   319
        self.EditMenu = wx.Menu(title=u'')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   320
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   321
        self.HelpMenu = wx.Menu(title='')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   322
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   323
        self.SFCMenu = wx.Menu(title='')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   324
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   325
        self.ConfigMenu = wx.Menu(title='')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   326
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   327
        self._init_coll_menuBar1_Menus(self.menuBar1)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   328
        if self.ModeSolo:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   329
            self._init_coll_FileMenu_Items(self.FileMenu)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   330
        self._init_coll_EditMenu_Items(self.EditMenu)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   331
        self._init_coll_HelpMenu_Items(self.HelpMenu)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   332
        self._init_coll_SFCMenu_Items(self.SFCMenu)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   333
        self._init_coll_ConfigMenu_Items(self.ConfigMenu)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   334
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   335
    def _init_coll_MainGridSizer_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   336
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   337
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   338
        parent.AddWindow(self.splitterWindow1, 0, border=0, flag=wxGROW)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   339
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   340
    def _init_coll_EditorGridSizer_Items(self, parent):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   341
        # generated method, don't edit
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   342
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   343
        parent.AddWindow(self.ToolBar, 0, border=0, flag=wxGROW)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   344
        parent.AddWindow(self.TabsOpened, 0, border=0, flag=wxGROW)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   345
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   346
    def _init_coll_MainGridSizer_Growables(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   347
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   348
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   349
        parent.AddGrowableCol(0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   350
        parent.AddGrowableRow(0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   351
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   352
    def _init_coll_EditorGridSizer_Growables(self, parent):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   353
        # generated method, don't edit
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   354
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   355
        parent.AddGrowableCol(0)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   356
        parent.AddGrowableRow(1)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   357
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   358
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   359
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   360
        self.MainGridSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=1, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   361
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   362
        self.EditorGridSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   363
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   364
        self._init_coll_MainGridSizer_Growables(self.MainGridSizer)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   365
        self._init_coll_MainGridSizer_Items(self.MainGridSizer)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   366
        self._init_coll_EditorGridSizer_Growables(self.EditorGridSizer)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   367
        self._init_coll_EditorGridSizer_Items(self.EditorGridSizer)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   368
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   369
        self.SetSizer(self.MainGridSizer)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   370
        self.EditorPanel.SetSizer(self.EditorGridSizer)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   371
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   372
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   373
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   374
        wx.Frame.__init__(self, id=wxID_PLCOPENEDITOR, name=u'PLCOpenEditor',
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   375
              parent=prnt, pos=wx.Point(235, 287), size=wx.Size(1000, 600),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   376
              style=wx.DEFAULT_FRAME_STYLE, title=u'PLCOpenEditor')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   377
        self._init_utils()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   378
        self.SetClientSize(wx.Size(1000, 600))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   379
        self.SetMenuBar(self.menuBar1)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   380
        self.Bind(wx.EVT_CLOSE, self.OnCloseFrame, id=wxID_PLCOPENEDITOR)
7
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   381
        
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   382
        self.splitterWindow1 = wx.SplitterWindow(id=wxID_PLCOPENEDITORSPLITTERWINDOW1,
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   383
              name='splitterWindow1', parent=self, point=wx.Point(0, 0),
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   384
              size=wx.Size(-1, -1), style=wx.SP_3D)
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   385
        self.splitterWindow1.SetNeedUpdating(True)
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   386
        self.splitterWindow1.SetMinimumPaneSize(1)
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   387
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   388
        self.EditorPanel = wx.Panel(id=wxID_PLCOPENEDITOREDITORPANEL, 
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   389
              name='TabPanel', parent=self.splitterWindow1, pos=wx.Point(0, 0),
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   390
              size=wx.Size(-1, -1), style=wx.TAB_TRAVERSAL)
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   391
        
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   392
        self.TabsOpened = wx.Notebook(id=wxID_PLCOPENEDITORTABSOPENED,
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   393
              name='TabsOpened', parent=self.EditorPanel, pos=wx.Point(0,
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   394
              0), size=wx.Size(-1, -1), style=0)
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   395
        self.TabsOpened.Bind(wx.EVT_NOTEBOOK_PAGE_CHANGED,
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   396
              self.OnPouSelectedChanged, id=wxID_PLCOPENEDITORTABSOPENED)
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   397
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   398
        self.ToolBar = wxToolBar(id=wxID_PLCOPENEDITORTOOLBAR, name='ToolBar',
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   399
              parent=self.EditorPanel, pos=wx.Point(0, 0), size=wx.Size(0, 40),
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   400
              style=wxTB_HORIZONTAL | wxNO_BORDER)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   401
        self.ToolBar.AddRadioTool(wxID_PLCOPENEDITORTOOLBARSELECTION, 
7
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   402
              wxBitmap(os.path.join(CWD, 'Images/select.png')), wxNullBitmap, "Select an object")
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   403
        self.Bind(wx.EVT_TOOL, self.OnSelectionTool, 
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   404
              id=wxID_PLCOPENEDITORTOOLBARSELECTION)
7
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   405
        
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   406
        self.ProjectTree = wx.TreeCtrl(id=wxID_PLCOPENEDITORPROJECTTREE,
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   407
              name='treeCtrl1', parent=self.splitterWindow1, pos=wx.Point(0, 0),
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   408
              size=wx.Size(-1, -1),
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   409
              style=wx.TR_HAS_BUTTONS|wx.TR_EDIT_LABELS|wx.TR_SINGLE|wx.SUNKEN_BORDER)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   410
        self.ProjectTree.Bind(wx.EVT_RIGHT_UP, self.OnProjectTreeRightUp)
7
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   411
        self.Bind(wx.EVT_TREE_BEGIN_DRAG, self.OnProjectTreeBeginDrag,
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   412
              id=wxID_PLCOPENEDITORPROJECTTREE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   413
        self.Bind(wx.EVT_TREE_BEGIN_LABEL_EDIT, self.OnProjectTreeItemBeginEdit,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   414
              id=wxID_PLCOPENEDITORPROJECTTREE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   415
        self.Bind(wx.EVT_TREE_END_LABEL_EDIT, self.OnProjectTreeItemEndEdit,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   416
              id=wxID_PLCOPENEDITORPROJECTTREE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   417
        self.Bind(wx.EVT_TREE_ITEM_ACTIVATED, self.OnProjectTreeItemActivated,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   418
              id=wxID_PLCOPENEDITORPROJECTTREE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   419
        self.Bind(wx.EVT_TREE_SEL_CHANGED, self.OnProjectTreeItemSelected,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   420
              id=wxID_PLCOPENEDITORPROJECTTREE)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   421
        self.splitterWindow1.SplitVertically(self.ProjectTree, self.EditorPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   422
              200)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   423
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   424
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   425
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   426
    def __init__(self, parent, controler = None):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   427
        self.ModeSolo = controler == None
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   428
        self._init_ctrls(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   429
        
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   430
        self.TreeImageList = wxImageList(16, 16)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   431
        for language in LANGUAGES:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   432
            self.TreeImageList.Add(wxBitmap(os.path.join(CWD, 'Images/%s.png'%language)))
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   433
        self.ProjectTree.SetImageList(self.TreeImageList)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   434
        
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   435
        if self.ModeSolo:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   436
            self.Controler = PLCControler()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   437
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   438
            self.Controler = controler
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   439
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   440
        if fileOpen:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   441
            self.Controler.OpenXMLFile(fileOpen)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   442
            self.RefreshProjectTree()
3
86ccc89d7b0b FBD Blocks and Variables can now be modified and wires can't be unconnected on both sides
lbessard
parents: 2
diff changeset
   443
        
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   444
        self.CurrentToolBar = []
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   445
        self.CurrentLanguage = ""
41
0688db995ddf Reverted PLCOpenEditor to DRIVEN mode.
etisserant
parents: 37
diff changeset
   446
        #self.DrawingMode = FREEDRAWING_MODE
0688db995ddf Reverted PLCOpenEditor to DRIVEN mode.
etisserant
parents: 37
diff changeset
   447
        self.DrawingMode = DRIVENDRAWING_MODE
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   448
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   449
        self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   450
        self.RefreshEditMenu()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   451
        self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   452
        self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   453
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   454
    def GetDrawingMode(self):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   455
        return self.DrawingMode
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   456
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   457
    def RefreshTitle(self):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   458
        if self.Controler.HasOpenedProject() > 0:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   459
            self.SetTitle("PLCOpenEditor - %s"%self.Controler.GetFilename())
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   460
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   461
            self.SetTitle("PLCOpenEditor")
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   462
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   463
    def RefreshFileMenu(self):
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   464
        if self.FileMenu:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   465
            if self.Controler.HasOpenedProject():
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   466
                if self.TabsOpened.GetPageCount() > 0:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   467
                    self.FileMenu.FindItemByPosition(2).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   468
                else:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   469
                    self.FileMenu.FindItemByPosition(2).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   470
                self.FileMenu.FindItemByPosition(3).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   471
                self.FileMenu.FindItemByPosition(5).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   472
                self.FileMenu.FindItemByPosition(6).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   473
                self.FileMenu.FindItemByPosition(7).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   474
                self.FileMenu.FindItemByPosition(9).Enable(True)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   475
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   476
                self.FileMenu.FindItemByPosition(2).Enable(False)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   477
                self.FileMenu.FindItemByPosition(3).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   478
                self.FileMenu.FindItemByPosition(5).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   479
                self.FileMenu.FindItemByPosition(6).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   480
                self.FileMenu.FindItemByPosition(7).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   481
                self.FileMenu.FindItemByPosition(9).Enable(False)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   482
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   483
    def RefreshEditMenu(self):
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   484
        if self.EditMenu:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   485
            if self.Controler.HasOpenedProject():
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   486
                undo, redo = self.Controler.GetBufferState()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   487
                self.EditMenu.Enable(wxID_PLCOPENEDITOREDITMENUITEMS1, undo)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   488
                self.EditMenu.Enable(wxID_PLCOPENEDITOREDITMENUITEMS2, redo)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   489
            else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   490
                self.EditMenu.Enable(wxID_PLCOPENEDITOREDITMENUITEMS1, False)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   491
                self.EditMenu.Enable(wxID_PLCOPENEDITOREDITMENUITEMS2, False)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   492
            if self.Controler.HasOpenedProject():
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   493
                if self.TabsOpened.GetPageCount() > 0:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   494
                    self.EditMenu.FindItemByPosition(0).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   495
                else:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   496
                    self.EditMenu.FindItemByPosition(0).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   497
                self.EditMenu.FindItemByPosition(8).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   498
                self.EditMenu.FindItemByPosition(9).Enable(True)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   499
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   500
                self.EditMenu.FindItemByPosition(0).Enable(False)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   501
                self.EditMenu.FindItemByPosition(8).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   502
                self.EditMenu.FindItemByPosition(9).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   503
            bodytype = self.Controler.GetCurrentElementEditingBodyType()
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   504
            if bodytype in ["IL","ST"]:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   505
                self.EditMenu.FindItemByPosition(4).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   506
                self.EditMenu.FindItemByPosition(5).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   507
                self.EditMenu.FindItemByPosition(6).Enable(True)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   508
            else:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   509
                self.EditMenu.FindItemByPosition(4).Enable(False)
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   510
                self.EditMenu.FindItemByPosition(5).Enable(False)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   511
            self.EditMenu.FindItemByPosition(6).Enable(False)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   512
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   513
    def ShowProperties(self):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   514
        old_values = self.Controler.GetProjectProperties()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   515
        dialog = ProjectDialog(self)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   516
        dialog.SetValues(old_values)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   517
        if dialog.ShowModal() == wxID_OK:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   518
            new_values = dialog.GetValues()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   519
            projectname = new_values.pop("projectName")
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   520
            new_values["creationDateTime"] = old_values["creationDateTime"]
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   521
            self.Controler.SetProjectProperties(projectname, new_values)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   522
            self.RefreshProjectTree()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   523
        dialog.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   524
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   525
    def OnCloseFrame(self, event):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   526
        if not self.Controler.ProjectIsSaved():
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   527
            dialog = wxMessageDialog(self, "There are changes, do you want to save?",  "Close Application", wxYES_NO|wxCANCEL|wxICON_QUESTION)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   528
            answer = dialog.ShowModal()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   529
            dialog.Destroy()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   530
            if answer == wxID_YES:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   531
                self.SaveProject()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   532
                event.Skip()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   533
            elif answer == wxID_NO:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   534
                event.Skip()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   535
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   536
            event.Skip()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   537
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   538
    def OnNewProjectMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   539
        dialog = ProjectDialog(self)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   540
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   541
            values = dialog.GetValues()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   542
            projectname = values.pop("projectName")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   543
            values["creationDateTime"] = datetime(*localtime()[:6])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   544
            self.Controler.CreateNewProject(projectname)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   545
            self.Controler.SetProjectProperties(projectname, values)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   546
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   547
            self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   548
            self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   549
            self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   550
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   551
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   552
    def OnOpenProjectMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   553
        filepath = self.Controler.GetFilePath()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   554
        if filepath != "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   555
            directory = os.path.dirname(filepath)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   556
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   557
            directory = os.getcwd()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   558
        dialog = wxFileDialog(self, "Choose a file", directory, "",  "PLCOpen files (*.xml)|*.xml|All files|*.*", wxOPEN)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   559
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   560
            filepath = dialog.GetPath()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   561
            if os.path.isfile(filepath):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   562
                self.Controler.OpenXMLFile(filepath)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   563
                self.TabsOpened.DeleteAllPages()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   564
                self.RefreshProjectTree()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   565
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   566
            self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   567
            self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   568
            self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   569
        dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   570
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   571
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   572
    def OnCloseTabMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   573
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   574
        if selected >= 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   575
            self.Controler.CloseElementEditing()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   576
            self.TabsOpened.DeletePage(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   577
            if self.TabsOpened.GetPageCount() > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   578
                self.TabsOpened.SetSelection(min(selected, self.TabsOpened.GetPageCount() - 1))
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   579
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   580
            self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   581
            self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   582
            self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   583
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   584
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   585
    def OnCloseProjectMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   586
        self.Controler.Reset()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   587
        self.TabsOpened.DeleteAllPages()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   588
        self.ProjectTree.DeleteAllItems()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   589
        self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   590
        self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   591
        self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   592
        self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   593
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   594
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   595
    def OnSaveProjectMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   596
        self.SaveProject()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   597
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   598
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   599
    def OnSaveProjectAsMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   600
        self.SaveProjectAs()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   601
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   602
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   603
    def OnGenerateProgramMenu(self, event):
42
4a8400732001 Adding optimization on redrawing
lbessard
parents: 41
diff changeset
   604
        dialog = wxFileDialog(self, "Choose a file", os.getcwd(), self.Controler.GetProgramFilePath(),  "ST files (*.st)|*.st|All files|*.*", wxSAVE|wxCHANGE_DIR)
4
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   605
        if dialog.ShowModal() == wxID_OK:
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   606
            filepath = dialog.GetPath()
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   607
            if os.path.isdir(os.path.dirname(filepath)):
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   608
                result = self.Controler.GenerateProgram(filepath)
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   609
                if not result:
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   610
                    message = wxMessageDialog(self, "Can't generate program to file %s!"%filepath, "Error", wxOK|wxICON_ERROR)
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   611
                    message.ShowModal()
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   612
                    message.Destroy()
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   613
            else:
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   614
                message = wxMessageDialog(self, "%s is not a valid folder!"%os.path.dirname(filepath), "Error", wxOK|wxICON_ERROR)
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   615
                message.ShowModal()
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   616
                message.Destroy()
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   617
        dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   618
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   619
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   620
    def SaveProject(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   621
        result = self.Controler.SaveXMLFile()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   622
        if not result:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   623
            self.SaveProjectAs()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   624
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   625
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   626
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   627
    def SaveProjectAs(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   628
        filepath = self.Controler.GetFilePath()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   629
        if filepath != "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   630
            directory, filename = os.path.split(filepath)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   631
        else:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   632
            directory, filename = os.getcwd(), "%(projectName)s.xml"%self.Controler.GetProjectProperties()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   633
        dialog = wxFileDialog(self, "Choose a file", directory, filename,  "PLCOpen files (*.xml)|*.xml|All files|*.*", wxSAVE|wxOVERWRITE_PROMPT)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   634
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   635
            filepath = dialog.GetPath()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   636
            if os.path.isdir(os.path.dirname(filepath)):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   637
                result = self.Controler.SaveXMLFile(filepath)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   638
                if not result:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   639
                    message = wxMessageDialog(self, "Can't save project to file %s!"%filepath, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   640
                    message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   641
                    message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   642
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   643
                message = wxMessageDialog(self, "%s is not a valid folder!"%os.path.dirname(filepath), "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   644
                message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   645
                message.Destroy()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   646
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   647
        dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   648
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   649
    def OnPropertiesMenu(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   650
        self.ShowProperties()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   651
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   652
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   653
    def OnQuitMenu(self, event):
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   654
        self.ToolBar.Reparent(self)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   655
        self.Controler.Reset()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   656
        self.Close()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   657
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   658
3
86ccc89d7b0b FBD Blocks and Variables can now be modified and wires can't be unconnected on both sides
lbessard
parents: 2
diff changeset
   659
    def ResetCurrentMode(self):
86ccc89d7b0b FBD Blocks and Variables can now be modified and wires can't be unconnected on both sides
lbessard
parents: 2
diff changeset
   660
        selected = self.TabsOpened.GetSelection()
86ccc89d7b0b FBD Blocks and Variables can now be modified and wires can't be unconnected on both sides
lbessard
parents: 2
diff changeset
   661
        if selected != -1:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   662
            window = self.TabsOpened.GetPage(selected)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   663
            window.SetMode(MODE_SELECTION)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   664
        self.ToolBar.ToggleTool(wxID_PLCOPENEDITORTOOLBARSELECTION, True)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   665
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   666
    def ResetToolToggle(self, id):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   667
        tool = self.ToolBar.FindById(id)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   668
        tool.SetToggle(False)
3
86ccc89d7b0b FBD Blocks and Variables can now be modified and wires can't be unconnected on both sides
lbessard
parents: 2
diff changeset
   669
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   670
    def OnSelectionTool(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   671
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   672
        if selected != -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   673
            self.TabsOpened.GetPage(selected).SetMode(MODE_SELECTION)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   674
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   675
    
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   676
    def OnCommentTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   677
        self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARCOMMENT)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   678
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   679
        if selected != -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   680
            self.TabsOpened.GetPage(selected).SetMode(MODE_COMMENT)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   681
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   682
    
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   683
    def OnVariableTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   684
        self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARVARIABLE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   685
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   686
        if selected != -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   687
            self.TabsOpened.GetPage(selected).SetMode(MODE_VARIABLE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   688
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   689
    
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   690
    def OnBlockTool(self, event):
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   691
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   692
        if selected != -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   693
            self.TabsOpened.GetPage(selected).SetMode(MODE_BLOCK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   694
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   695
        
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   696
    def OnConnectionTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   697
        self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARCONNECTION)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   698
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   699
        if selected != -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   700
            self.TabsOpened.GetPage(selected).SetMode(MODE_CONNECTION)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   701
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   702
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   703
    def OnWireTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   704
        self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARWIRE)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   705
        selected = self.TabsOpened.GetSelection()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   706
        if selected != -1:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   707
            self.TabsOpened.GetPage(selected).SetMode(MODE_WIRE)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   708
        event.Skip()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   709
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   710
    def OnPowerRailTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   711
        self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARPOWERRAIL)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   712
        selected = self.TabsOpened.GetSelection()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   713
        if selected != -1:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   714
            self.TabsOpened.GetPage(selected).SetMode(MODE_POWERRAIL)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   715
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   716
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   717
    def OnRungTool(self, event):
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   718
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   719
        if selected != -1:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   720
            self.TabsOpened.GetPage(selected).Viewer.AddLadderRung()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   721
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   722
    
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   723
    def OnCoilTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   724
        self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARCOIL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   725
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   726
        if selected != -1:
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   727
            self.TabsOpened.GetPage(selected).SetMode(MODE_COIL)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   728
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   729
    
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   730
    def OnContactTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   731
        if self.DrawingMode == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   732
            self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARCONTACT)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   733
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   734
        if selected != -1:
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   735
            if self.DrawingMode == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   736
                self.TabsOpened.GetPage(selected).SetMode(MODE_CONTACT)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   737
            else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   738
                self.TabsOpened.GetPage(selected).Viewer.AddLadderContact()
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   739
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   740
    
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   741
    def OnBranchTool(self, event): 
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   742
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   743
        if selected != -1:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   744
            self.TabsOpened.GetPage(selected).Viewer.AddLadderBranch()
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   745
        event.Skip()    
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   746
    
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   747
    def OnInitialStepTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   748
        self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARINITIALSTEP)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   749
        selected = self.TabsOpened.GetSelection()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   750
        if selected != -1:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   751
            self.TabsOpened.GetPage(selected).SetMode(MODE_INITIALSTEP)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   752
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   753
    
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   754
    def OnStepTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   755
        if self.GetDrawingMode() == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   756
            self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARSTEP)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   757
        selected = self.TabsOpened.GetSelection()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   758
        if selected != -1:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   759
            if self.GetDrawingMode() == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   760
                self.TabsOpened.GetPage(selected).SetMode(MODE_STEP)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   761
            else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   762
                self.TabsOpened.GetPage(selected).Viewer.AddStep()
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   763
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   764
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   765
    def OnActionBlockTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   766
        if self.GetDrawingMode() == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   767
            self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARACTIONBLOCK)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   768
        selected = self.TabsOpened.GetSelection()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   769
        if selected != -1:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   770
            if self.GetDrawingMode() == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   771
                self.TabsOpened.GetPage(selected).SetMode(MODE_ACTION)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   772
            else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   773
                self.TabsOpened.GetPage(selected).Viewer.AddStepAction()
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   774
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   775
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   776
    def OnTransitionTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   777
        self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARTRANSITION)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   778
        selected = self.TabsOpened.GetSelection()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   779
        if selected != -1:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   780
            self.TabsOpened.GetPage(selected).SetMode(MODE_TRANSITION)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   781
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   782
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   783
    def OnDivergenceTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   784
        if self.GetDrawingMode() == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   785
            self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARDIVERGENCE)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   786
        selected = self.TabsOpened.GetSelection()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   787
        if selected != -1:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   788
            if self.GetDrawingMode() == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   789
                self.TabsOpened.GetPage(selected).SetMode(MODE_DIVERGENCE)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   790
            else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   791
                self.TabsOpened.GetPage(selected).Viewer.AddDivergence()
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   792
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   793
    
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   794
    def OnJumpTool(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   795
        if self.GetDrawingMode() == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   796
            self.ResetToolToggle(wxID_PLCOPENEDITORTOOLBARJUMP)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   797
        selected = self.TabsOpened.GetSelection()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   798
        if selected != -1:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   799
            if self.GetDrawingMode() == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   800
                self.TabsOpened.GetPage(selected).SetMode(MODE_JUMP)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   801
            else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   802
                self.TabsOpened.GetPage(selected).Viewer.AddJump()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   803
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   804
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   805
    def OnPouSelectedChanged(self, event):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   806
        old_selected = self.TabsOpened.GetSelection()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   807
        if old_selected >= 0:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   808
            self.TabsOpened.GetPage(old_selected).ResetBuffer()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   809
        selected = event.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   810
        if selected >= 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   811
            self.Controler.RefreshCurrentElementEditing(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   812
            found = False
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   813
            name = self.TabsOpened.GetPageText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   814
            root = self.ProjectTree.GetRootItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   815
            item, root_cookie = self.ProjectTree.GetFirstChild(root)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   816
            while item.IsOk() and not found:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   817
                if self.ProjectTree.GetItemText(item) == name:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   818
                    self.ProjectTree.SelectItem(item)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   819
                item, root_cookie = self.ProjectTree.GetNextChild(root, root_cookie)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   820
            self.TabsOpened.GetPage(selected).RefreshView()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   821
            self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   822
            self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   823
            self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   824
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   825
7
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   826
    def OnProjectTreeBeginDrag(self, event):
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   827
        item = event.GetItem()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   828
        if self.ProjectTree.GetPyData(item) == ITEM_POU:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   829
            block_name = self.ProjectTree.GetItemText(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   830
            block_type = self.Controler.GetPouType(block_name)
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
   831
            if block_type != "program":
54
6688829ce624 *** empty log message ***
lbessard
parents: 53
diff changeset
   832
                data = wxTextDataObject(str((block_name, block_type, "")))
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
   833
                dragSource = wxDropSource(self.ProjectTree)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
   834
                dragSource.SetData(data)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
   835
                dragSource.DoDragDrop()
7
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   836
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   837
    def OnProjectTreeItemEndEdit(self, event):
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   838
        message = None
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   839
        abort = False
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   840
        new_name = event.GetLabel()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   841
        if new_name != "":
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   842
            if not TestIdentifier(new_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   843
                message = "\"%s\" is not a valid identifier!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   844
            elif new_name.upper() in IEC_KEYWORDS:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   845
                message = "\"%s\" is a keyword. It can't be used!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   846
            else:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   847
                item = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   848
                itemtype = self.ProjectTree.GetPyData(item)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   849
                if itemtype == ITEM_PROJECT:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   850
                    self.Controler.SetProjectProperties(name = new_name)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   851
                elif itemtype == ITEM_POU:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   852
                    if new_name.upper() in self.Controler.GetProjectPouNames():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   853
                        message = "\"%s\" pou already exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   854
                        abort = True
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   855
                    elif new_name.upper() in self.Controler.GetProjectPouVariables():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   856
                        messageDialog = wxMessageDialog(self, "A variable is defined with \"%s\" as name. It can generate a conflict. Do you wish to continue?"%new_name, "Error", wxYES_NO|wxICON_QUESTION)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   857
                        if messageDialog.ShowModal() == wxID_NO:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   858
                            abort = True
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   859
                        messageDialog.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   860
                    if not abort:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   861
                        old_name = self.ProjectTree.GetItemText(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   862
                        self.Controler.ChangePouName(old_name, new_name)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   863
                        self.RefreshTabsOpenedTitles()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   864
                elif itemtype == ITEM_TRANSITION:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   865
                    category = self.ProjectTree.GetItemParent(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   866
                    pou = self.ProjectTree.GetItemParent(category)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   867
                    pou_name = self.ProjectTree.GetItemText(pou)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   868
                    if new_name.upper() in self.Controler.GetProjectPouNames():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   869
                        message = "A pou with \"%s\" as name exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   870
                    elif new_name.upper() in self.Controler.GetProjectPouVariables(pou_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   871
                        message = "A variable with \"%s\" as name already exists in this pou!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   872
                    else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   873
                        old_name = self.ProjectTree.GetItemText(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   874
                        self.Controler.ChangePouTransitionName(pou_name, old_name, new_name)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   875
                        self.RefreshTabsOpenedTitles()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   876
                elif itemtype == ITEM_ACTION:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   877
                    category = self.ProjectTree.GetItemParent(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   878
                    pou = self.ProjectTree.GetItemParent(category)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   879
                    pou_name = self.ProjectTree.GetItemText(pou)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   880
                    if new_name.upper() in self.Controler.GetProjectPouNames():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   881
                        message = "A pou with \"%s\" as name exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   882
                    elif new_name.upper() in self.Controler.GetProjectPouVariables(pou_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   883
                        message = "A variable with \"%s\" as name already exists in this pou!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   884
                    else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   885
                        old_name = self.ProjectTree.GetItemText(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   886
                        self.Controler.ChangePouActionName(pou_name, old_name, new_name)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   887
                        self.RefreshTabsOpenedTitles()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   888
                elif itemtype == ITEM_VARIABLE:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   889
                    category = self.ProjectTree.GetItemParent(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   890
                    if self.ProjectTree.GetItemText(category) != 'Global':
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   891
                        category = self.ProjectTree.GetItemParent(category)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   892
                    pou = self.ProjectTree.GetItemParent(category)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   893
                    pou_name = self.ProjectTree.GetItemText(pou)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   894
                    if new_name.upper() in self.Controler.GetProjectPouNames():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   895
                        message = "A pou with \"%s\" as name exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   896
                    elif new_name.upper() in self.Controler.GetProjectPouVariables(pou_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   897
                        message = "A variable with \"%s\" as name already exists in this pou!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   898
                    else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   899
                        old_name = self.ProjectTree.GetItemText(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   900
                        self.Controler.ChangePouVariableName(pou_name, old_name, new_name)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   901
                        self.RefreshTabsOpenedTitles()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   902
            if message or abort:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   903
                if message:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   904
                    messageDialog = wxMessageDialog(self, message, "Error", wxOK|wxICON_ERROR)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   905
                    messageDialog.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   906
                    messageDialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   907
                item = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   908
                wxCallAfter(self.ProjectTree.EditLabel, item)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   909
                event.Veto()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   910
            else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   911
                wxCallAfter(self.RefreshProjectTree)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   912
                event.Skip()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   913
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   914
    def OnProjectTreeItemBeginEdit(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   915
        selected = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   916
        if self.ProjectTree.GetPyData(selected) == ITEM_UNEDITABLE:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   917
            event.Veto()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   918
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   919
            event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   920
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   921
    def OnProjectTreeItemActivated(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   922
        selected = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   923
        if self.ProjectTree.IsExpanded(selected):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   924
            self.ProjectTree.Collapse(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   925
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   926
            self.ProjectTree.Expand(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   927
        name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   928
        data = self.ProjectTree.GetPyData(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   929
        if name == "Properties":
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   930
            self.ShowProperties()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   931
##        elif data == ITEM_CLASS:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   932
##            item = self.ProjectTree.GetItemParent(selected)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   933
##            item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   934
##            while item_type not in [ITEM_POU, ITEM_RESOURCE, ITEM_CONFIGURATION] and item.IsOk():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   935
##                item = self.ProjectTree.GetItemParent(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   936
##                item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   937
##            item_name = self.ProjectTree.GetItemText(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   938
##            if item_type == ITEM_POU:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   939
##                dialog = EditVariableDialog(self, item_name, self.Controler.GetPouType(item_name), self.Controler.PouIsUsed(item_name), name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   940
##                dialog.SetPouNames(self.Controler.GetProjectPouNames())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   941
##                values = {}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   942
##                values["returnType"] = self.Controler.GetPouInterfaceReturnTypeByName(item_name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   943
##                values["data"] = self.Controler.GetPouInterfaceVarsByName(item_name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   944
##                dialog.SetValues(values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   945
##                if dialog.ShowModal() == wxID_OK:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   946
##                    new_values = dialog.GetValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   947
##                    if "returnType" in new_values:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   948
##                        self.Controler.SetPouInterfaceReturnType(item_name, new_values["returnType"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   949
##                    self.Controler.SetPouInterfaceVars(item_name, new_values["data"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   950
##                    pou_names = self.Controler.GetElementsOpenedNames()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   951
##                    if item_name in pou_names:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   952
##                        window = self.TabsOpened.GetPage(pou_names.index(item_name))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   953
##                        if isinstance(window, TextViewer):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   954
##                            varlist = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   955
##                            if "returnType" in new_values:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   956
##                                varlist.append(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   957
##                            for var in new_values["data"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   958
##                                varlist.append(var["Name"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   959
##                            window.SetVariables(varlist)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   960
##                dialog.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   961
##                self.RefreshProjectTree()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   962
##            elif item_type == ITEM_CONFIGURATION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   963
##                dialog = EditVariableDialog(self, item_name, None, False, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   964
##                dialog.SetPouNames(self.Controler.GetProjectPouNames())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   965
##                values = {"data" : self.Controler.GetConfigurationGlobalVars(item_name)}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   966
##                dialog.SetValues(values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   967
##                if dialog.ShowModal() == wxID_OK:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   968
##                    new_values = dialog.GetValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   969
##                    self.Controler.SetConfigurationGlobalVars(item_name, new_values["data"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   970
##                dialog.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   971
##                self.RefreshProjectTree()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   972
##            elif item_type == ITEM_RESOURCE:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   973
##                config = self.ProjectTree.GetItemParent(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   974
##                config_type = self.ProjectTree.GetPyData(config)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   975
##                while config_type != ITEM_CONFIGURATION and config.IsOk():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   976
##                    config = self.ProjectTree.GetItemParent(config)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   977
##                    config_type = self.ProjectTree.GetPyData(config)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   978
##                if config.IsOk():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   979
##                    config_name = self.ProjectTree.GetItemText(config)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   980
##                    dialog = EditVariableDialog(self, item_name, None, False, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   981
##                    values = {"data" : self.Controler.GetConfigurationResourceGlobalVars(config_name, item_name)}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   982
##                    dialog.SetValues(values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   983
##                    if dialog.ShowModal() == wxID_OK:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   984
##                        new_values = dialog.GetValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   985
##                        self.Controler.SetConfigurationResourceGlobalVars(config_name, item_name, new_values["data"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   986
##                    dialog.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   987
##                    self.RefreshProjectTree()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   988
##        elif data in [ITEM_POU, ITEM_TRANSITION, ITEM_ACTION]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   989
##            if data == ITEM_POU:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   990
##                idx = self.Controler.OpenElementEditing(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   991
##                language = self.Controler.GetPouBodyType(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   992
##                varlist = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   993
##                returnType = self.Controler.GetPouInterfaceReturnTypeByName(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   994
##                if returnType:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   995
##                    varlist.append(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   996
##                vars = self.Controler.GetPouInterfaceVarsByName(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   997
##                if vars:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   998
##                    for var in vars:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   999
##                        varlist.append(var["Name"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1000
##                self.EditVariable.SetPou(self.Controler.GetPouType(name), self.Controler.PouIsUsed(name))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1001
##                self.EditVariable.SetValues({"returnType":returnType,"data":vars})
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1002
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1003
##                parent = self.ProjectTree.GetItemParent(selected)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1004
##                parent_name = self.ProjectTree.GetItemText(parent)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1005
##                grandparent = self.ProjectTree.GetItemParent(parent)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1006
##                grandparent_name = self.ProjectTree.GetItemText(grandparent)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1007
##                if data == ITEM_TRANSITION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1008
##                    idx = self.Controler.OpenPouTransitionEditing(grandparent_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1009
##                    language = self.Controler.GetTransitionBodyType(grandparent_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1010
##                elif data == ITEM_ACTION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1011
##                    idx = self.Controler.OpenPouActionEditing(grandparent_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1012
##                    language = self.Controler.GetActionBodyType(grandparent_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1013
##                varlist = [name]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1014
##                vars = self.Controler.GetPouInterfaceVarsByName(grandparent_name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1015
##                if vars:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1016
##                    for var in vars:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1017
##                        varlist.append(var["Name"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1018
##                self.EditVariable.SetPou(self.Controler.GetPouType(grandparent_name), self.Controler.PouIsUsed(grandparent_name))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1019
##                self.EditVariable.SetValues({"returnType":returnType,"data":vars})
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1020
##            if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1021
##                if language == "FBD":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1022
##                    new_window = Viewer(self.TabsOpened, self, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1023
##                elif language == "LD":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1024
##                    new_window = LD_Viewer(self.TabsOpened, self, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1025
##                elif language == "SFC":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1026
##                    new_window = SFC_Viewer(self.TabsOpened, self, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1027
##                elif language in ["IL", "ST"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1028
##                    new_window = TextViewer(self.TabsOpened, self, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1029
##                    new_window.SetTextSyntax(language)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1030
##                    if language == "IL":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1031
##                        new_window.SetKeywords(IL_KEYWORDS)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1032
##                    else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1033
##                        new_window.SetKeywords(ST_KEYWORDS)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1034
##                    new_window.SetVariables(varlist)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1035
##                    new_window.SetFunctions(self.Controler.GetBlockTypes())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1036
##                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1037
##                    return
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1038
##                new_window.RefreshView()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1039
##                self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1040
##                self.TabsOpened.SetSelection(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1041
##                self.RefreshTabsOpenedTitles()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1042
##                self.RefreshFileMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1043
##                self.RefreshEditMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1044
##                self.RefreshToolBar()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1045
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1046
##                if data == ITEM_POU:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1047
##                    idx = self.Controler.ChangeElementEditing(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1048
##                elif data == ITEM_TRANSITION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1049
##                    idx = self.Controler.ChangePouTransitionEditing(grandparent_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1050
##                elif data == ITEM_ACTION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1051
##                    idx = self.Controler.ChangePouActionEditing(grandparent_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1052
##                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1053
##                    self.TabsOpened.SetSelection(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1054
##                    self.RefreshFileMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1055
##                    self.RefreshEditMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1056
##                    self.RefreshToolBar()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1057
##        elif data == ITEM_RESOURCE:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1058
##            item = self.ProjectTree.GetItemParent(selected)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1059
##            item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1060
##            while item_type != ITEM_CONFIGURATION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1061
##                item = self.ProjectTree.GetItemParent(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1062
##                item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1063
##            config_name = self.ProjectTree.GetItemText(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1064
##            idx = self.Controler.OpenConfigurationResourceEditing(config_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1065
##            if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1066
##                new_window = ResourceEditor(self.TabsOpened, self, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1067
##                new_window.RefreshView()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1068
##                self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1069
##                self.TabsOpened.SetSelection(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1070
##                self.RefreshTabsOpenedTitles()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1071
##                self.RefreshFileMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1072
##                self.RefreshEditMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1073
##                self.RefreshToolBar()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1074
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1075
##                idx = self.Controler.ChangeConfigurationResourceEditing(parent_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1076
##                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1077
##                    self.TabsOpened.SetSelection(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1078
##                    self.RefreshFileMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1079
##                    self.RefreshEditMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1080
##                    self.RefreshToolBar()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1081
        elif data in [ITEM_POU, ITEM_TRANSITION, ITEM_ACTION, ITEM_RESOURCE, ITEM_CONFIGURATION]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1082
            if data == ITEM_CONFIGURATION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1083
                idx = self.Controler.OpenConfigurationEditing(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1084
                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1085
                    new_window = PouEditorPanel(self.TabsOpened, self, self.Controler, "config", config_name = name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1086
                    self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1087
                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1088
                    idx = self.Controler.ChangeConfigurationEditing(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1089
            elif data == ITEM_RESOURCE:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1090
                item = self.ProjectTree.GetItemParent(selected)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1091
                item_type = self.ProjectTree.GetPyData(item)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1092
                while item_type != ITEM_CONFIGURATION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1093
                    item = self.ProjectTree.GetItemParent(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1094
                    item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1095
                config_name = self.ProjectTree.GetItemText(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1096
                idx = self.Controler.OpenConfigurationResourceEditing(config_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1097
                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1098
                    new_window = PouEditorPanel(self.TabsOpened, self, self.Controler, "resource", config_name = config_name, resource_name = name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1099
                    self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1100
                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1101
                    idx = self.Controler.ChangeConfigurationResourceEditing(config_name, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1102
            elif data == ITEM_POU:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1103
                idx = self.Controler.OpenElementEditing(name)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1104
                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1105
                    new_window = PouEditorPanel(self.TabsOpened, self, self.Controler, self.Controler.GetPouType(name), pou_name = name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1106
                    self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1107
                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1108
                    idx = self.Controler.ChangeElementEditing(name)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1109
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1110
                parent = self.ProjectTree.GetItemParent(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1111
                parent_name = self.ProjectTree.GetItemText(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1112
                grandparent = self.ProjectTree.GetItemParent(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1113
                grandparent_name = self.ProjectTree.GetItemText(grandparent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1114
                if data == ITEM_TRANSITION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1115
                    idx = self.Controler.OpenPouTransitionEditing(grandparent_name, name)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1116
                    if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1117
                        new_window = PouEditorPanel(self.TabsOpened, self, self.Controler, "transition", pou_name = grandparent_name, transition_name = name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1118
                        self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1119
                    else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1120
                        idx = self.Controler.ChangePouTransitionEditing(grandparent_name, name)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1121
                elif data == ITEM_ACTION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1122
                    idx = self.Controler.OpenPouActionEditing(grandparent_name, name)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1123
                    if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1124
                        new_window = PouEditorPanel(self.TabsOpened, self, self.Controler, "action", pou_name = grandparent_name, action_name = name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1125
                        self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1126
                    else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1127
                        idx = self.Controler.ChangePouActionEditing(grandparent_name, name)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1128
            if idx != None:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1129
                old_selected = self.TabsOpened.GetSelection()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1130
                if old_selected >= 0:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1131
                    self.TabsOpened.GetPage(old_selected).ResetBuffer()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1132
                self.TabsOpened.SetSelection(idx)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1133
                window = self.TabsOpened.GetPage(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1134
                window.RefreshView()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1135
                self.RefreshTabsOpenedTitles()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1136
                self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1137
                self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1138
                self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1139
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1140
    def OnProjectTreeRightUp(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1141
        selected = self.ProjectTree.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1142
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1143
            name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1144
            if self.Controler.GetPouBodyType(name) == "SFC":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1145
                self.PopupMenu(self.SFCMenu)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1146
        elif self.ProjectTree.GetPyData(selected) == ITEM_CONFIGURATION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1147
            self.PopupMenu(self.ConfigMenu)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1148
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1149
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1150
    def OnProjectTreeItemSelected(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1151
        selected = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1152
        name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1153
        if self.ProjectTree.GetItemParent(selected) == self.ProjectTree.GetRootItem() and name != "Properties":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1154
            if self.Controler.IsElementEditing(name):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1155
                idx = self.Controler.ChangeElementEditing(name)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1156
                if idx != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1157
                    self.TabsOpened.SetSelection(idx)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1158
                    self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1159
                    self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1160
                    self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1161
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1162
            name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1163
            parent = self.ProjectTree.GetItemParent(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1164
            parent_name = self.ProjectTree.GetItemText(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1165
            grandparent = self.ProjectTree.GetItemParent(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1166
            grandparent_name = self.ProjectTree.GetItemText(grandparent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1167
            if parent_name == "Transitions":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1168
                idx = self.Controler.ChangePouTransitionEditing(grandparent_name, name)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1169
                if idx != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1170
                    self.TabsOpened.SetSelection(idx)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1171
                    self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1172
                    self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1173
                    self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1174
            elif parent_name == "Action":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1175
                idx = self.Controler.ChangePouActionEditing(grandparent_name, name)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1176
                if idx != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1177
                    self.TabsOpened.SetSelection(idx)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1178
                    self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1179
                    self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1180
                    self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1181
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1182
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1183
    def RefreshProjectTree(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1184
        infos = self.Controler.GetProjectInfos()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1185
        root = self.ProjectTree.GetRootItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1186
        self.GenerateTreeBranch(root, infos)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1187
        self.ProjectTree.Expand(self.ProjectTree.GetRootItem())
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1188
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1189
    def GenerateTreeBranch(self, root, infos):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1190
        to_delete = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1191
        if root.IsOk():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1192
            self.ProjectTree.SetItemText(root, infos["name"])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1193
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1194
            root = self.ProjectTree.AddRoot(infos["name"])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1195
        self.ProjectTree.SetPyData(root, infos["type"])
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1196
        if infos["type"] == ITEM_POU:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1197
            self.ProjectTree.SetItemImage(root, LANGUAGES.index(self.Controler.GetPouBodyType(infos["name"])))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1198
        item, root_cookie = self.ProjectTree.GetFirstChild(root)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1199
        if len(infos["values"]) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1200
            for values in infos["values"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1201
                if not item.IsOk():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1202
                    item = self.ProjectTree.AppendItem(root, "")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1203
                    item, root_cookie = self.ProjectTree.GetNextChild(root, root_cookie)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1204
                self.GenerateTreeBranch(item, values)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1205
                item, root_cookie = self.ProjectTree.GetNextChild(root, root_cookie)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1206
        while item.IsOk():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1207
            to_delete.append(item)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1208
            item, root_cookie = self.ProjectTree.GetNextChild(root, root_cookie)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1209
        for item in to_delete:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1210
            self.ProjectTree.Delete(item)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1211
    
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1212
    def ResetToolBar(self):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1213
        for item in self.CurrentToolBar:
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1214
            self.Unbind(wx.EVT_MENU, id=item)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1215
            self.ToolBar.DeleteTool(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1216
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1217
    def RefreshToolBar(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1218
        language = self.Controler.GetCurrentElementEditingBodyType()
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1219
        if language and language != self.CurrentLanguage:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1220
            self.ResetToolBar()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1221
            self.CurrentLanguage = language
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1222
            self.CurrentToolBar = []
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1223
            for radio, modes, id, method, picture, help in ToolBarItems[language]:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1224
                if modes & self.DrawingMode:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1225
                    if radio or self.DrawingMode == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1226
                        self.ToolBar.AddRadioTool(id, wxBitmap(os.path.join(CWD, picture)), wxNullBitmap, help)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1227
                    else:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1228
                        self.ToolBar.AddSimpleTool(id, wxBitmap(os.path.join(CWD, picture)), help)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1229
                    self.Bind(wx.EVT_TOOL, getattr(self, method), id=id)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1230
                    self.CurrentToolBar.append(id)
3
86ccc89d7b0b FBD Blocks and Variables can now be modified and wires can't be unconnected on both sides
lbessard
parents: 2
diff changeset
  1231
        self.ResetCurrentMode()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1232
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1233
    def RefreshTabsOpenedTitles(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1234
        pous = self.Controler.GetElementsOpenedNames()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1235
        for i, pou in enumerate(pous):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1236
            self.TabsOpened.SetPageText(i, pou)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1237
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1238
    def OnRefreshMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1239
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1240
        if selected != -1:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1241
            self.TabsOpened.GetPage(selected).RefreshView()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1242
            self.TabsOpened.GetPage(selected).Refresh()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1243
        event.Skip()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1244
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1245
    def OnUndoMenu(self, event):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1246
        self.Controler.LoadPrevious()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1247
        selected = self.TabsOpened.GetSelection()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1248
        if selected != -1:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1249
            self.TabsOpened.GetPage(selected).RefreshView()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1250
            self.TabsOpened.GetPage(selected).Refresh()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1251
        self.RefreshTitle()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1252
        self.RefreshEditMenu()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1253
        event.Skip()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1254
    
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1255
    def OnRedoMenu(self, event):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1256
        self.Controler.LoadNext()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1257
        selected = self.TabsOpened.GetSelection()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1258
        if selected != -1:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1259
            self.TabsOpened.GetPage(selected).RefreshView()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1260
            self.TabsOpened.GetPage(selected).Refresh()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1261
        self.RefreshTitle()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1262
        self.RefreshEditMenu()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1263
        event.Skip()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1264
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1265
    def OnCutMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1266
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1267
        if selected != -1:
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1268
            try:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1269
                self.TabsOpened.GetPage(selected).Viewer.Cut()
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1270
            except:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1271
                pass
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1272
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1273
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1274
    def OnCopyMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1275
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1276
        if selected != -1:
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1277
            try:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1278
                self.TabsOpened.GetPage(selected).Viewer.Copy()
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1279
            except:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1280
                pass
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1281
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1282
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1283
    def OnPasteMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1284
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1285
        if selected != -1:
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1286
            try:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1287
                self.TabsOpened.GetPage(selected).Viewer.Paste()
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1288
            except:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1289
                pass
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1290
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1291
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1292
    def OnAddPouMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1293
        dialog = PouDialog(self)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1294
        dialog.SetPouNames(self.Controler.GetProjectPouNames())
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1295
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1296
            values = dialog.GetValues()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1297
            self.Controler.ProjectAddPou(values["pouName"], values["pouType"], values["language"])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1298
            self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1299
        dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1300
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1301
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1302
    def OnRemovePouMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1303
        pous = self.Controler.GetProjectPouNames()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1304
        dialog = wxSingleChoiceDialog(self, "Select POU to remove:", "POU Remove", pous, wxOK|wxCANCEL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1305
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1306
            selected = dialog.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1307
            if not self.Controler.PouIsUsed(selected):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1308
                self.Controler.ProjectRemovePou(selected)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1309
                deleted = None
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1310
                for i in xrange(self.TabsOpened.GetPageCount()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1311
                    if self.TabsOpened.GetPageText(i) == selected:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1312
                        deleted = i
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1313
                if deleted != None:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1314
                    self.TabsOpened.DeletePage(i)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1315
                self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1316
                self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1317
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1318
                message = wxMessageDialog(self, "%s is used by one or more POUs. It can't be removed!"%selected, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1319
                message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1320
                message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1321
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1322
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1323
    def OnAddConfigurationMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1324
        dialog = wxTextEntryDialog(self, "Enter configuration name:", "Create new configuration", "", wxOK|wxCANCEL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1325
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1326
            value = dialog.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1327
            self.Controler.ProjectAddConfiguration(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1328
            self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1329
        dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1330
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1331
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1332
    def OnRemoveConfigurationMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1333
        configs = self.Controler.GetProjectConfigNames()
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1334
        dialog = wxSingleChoiceDialog(self, "Select Configuration to remove:", "Remove configuration", configs, wxOK|wxCANCEL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1335
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1336
            selected = dialog.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1337
            self.Controler.ProjectRemoveConfiguration(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1338
            self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1339
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1340
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1341
    def OnAddPouTransitionMenu(self, event):
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1342
        selected = self.ProjectTree.GetSelection()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1343
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1344
            pouname = self.ProjectTree.GetItemText(selected)
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1345
            if self.Controler.GetPouBodyType(pouname) == "SFC":
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1346
                dialog = PouTransitionDialog(self)
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1347
                if dialog.ShowModal() == wxID_OK: 
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1348
                    values = dialog.GetValues()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1349
                    self.Controler.ProjectAddPouTransition(pouname, values["transitionName"], values["language"])
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1350
                    self.RefreshProjectTree()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1351
                dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1352
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1353
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1354
    def OnRemovePouTransitionMenu(self, event):
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1355
        selected = self.ProjectTree.GetSelection()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1356
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1357
            pouname = self.ProjectTree.GetItemText(selected)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1358
            if self.Controler.GetPouBodyType(pouname) == "SFC":
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1359
                transitions = self.Controler.GetPouTransitions(pouname)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1360
                dialog = wxSingleChoiceDialog(self, "Select Transition to remove:", "Remove transition", transitions, wxOK|wxCANCEL)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1361
                if dialog.ShowModal() == wxID_OK: 
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1362
                    selected = dialog.GetStringSelection()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1363
                    self.Controler.ProjectRemovePouTransition(pouname, selected)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1364
                    self.RefreshProjectTree()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1365
                dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1366
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1367
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1368
    def OnAddPouActionMenu(self, event):
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1369
        selected = self.ProjectTree.GetSelection()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1370
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1371
            pouname = self.ProjectTree.GetItemText(selected)
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1372
            if self.Controler.GetPouBodyType(pouname) == "SFC":
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1373
                dialog = PouActionDialog(self)
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1374
                if dialog.ShowModal() == wxID_OK:
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1375
                    values = dialog.GetValues()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1376
                    self.Controler.ProjectAddPouAction(pouname, values["actionName"], values["language"])
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1377
                    self.RefreshProjectTree()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1378
                dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1379
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1380
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1381
    def OnRemovePouActionMenu(self, event):
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1382
        selected = self.ProjectTree.GetSelection()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1383
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1384
            pouname = self.ProjectTree.GetItemText(selected)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1385
            if self.Controler.GetPouBodyType(pouname) == "SFC":
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1386
                actions = self.Controler.GetPouActions(pouname)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1387
                dialog = wxSingleChoiceDialog(self, "Select Action to remove:", "Remove action", actions, wxOK|wxCANCEL)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1388
                if dialog.ShowModal() == wxID_OK: 
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1389
                    selected = dialog.GetStringSelection()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1390
                    self.Controler.ProjectRemovePouAction(pouname, selected)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1391
                    self.RefreshProjectTree()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1392
                dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1393
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1394
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1395
    def OnAddResourceMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1396
        selected = self.ProjectTree.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1397
        if self.ProjectTree.GetPyData(selected) == ITEM_CONFIGURATION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1398
            config_name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1399
            dialog = wxTextEntryDialog(self, "Enter Resource name:", "Create new Resource", "", wxOK|wxCANCEL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1400
            if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1401
                value = dialog.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1402
                self.Controler.ProjectAddConfigurationResource(config_name, value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1403
                self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1404
            dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1405
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1406
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1407
    def OnRemoveResourceMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1408
        selected = self.ProjectTree.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1409
        if self.ProjectTree.GetPyData(selected) == ITEM_CONFIGURATION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1410
            config_name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1411
            infos = self.Controler.GetProjectInfos()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1412
            resources = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1413
            for config in infos["configs"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1414
                if config["name"] == config_name:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1415
                    resources = config["resources"]
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1416
            dialog = wxSingleChoiceDialog(self, "Select Resource to remove:", "Remove resource", resources, wxOK|wxCANCEL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1417
            if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1418
                resource = dialog.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1419
                self.Controler.ProjectRemoveConfigurationResource(config_name, resource)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1420
                self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1421
            dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1422
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1423
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1424
    def OnPLCOpenMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1425
        result = OpenPDFDoc()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1426
        if type(result) == StringType:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1427
            message = wxMessageDialog(self, result, "ERROR", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1428
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1429
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1430
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1431
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1432
current_num = 0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1433
def GetNewNum():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1434
    global current_num
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1435
    current_num += 1
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1436
    return current_num
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1437
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1438
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1439
#                            Create Project Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1440
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1441
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1442
[wxID_PROJECTDIALOG, wxID_PROJECTDIALOGMAINPANEL, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1443
 wxID_PROJECTDIALOGPROJECTNAME, wxID_PROJECTDIALOGCOMPANYNAME, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1444
 wxID_PROJECTDIALOGCOMPANYURL, wxID_PROJECTDIALOGPRODUCTNAME, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1445
 wxID_PROJECTDIALOGPRODUCTVERSION, wxID_PROJECTDIALOGPRODUCTRELEASE, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1446
 wxID_PROJECTDIALOGCONTENTDESCRIPTION, wxID_PROJECTDIALOGSTATICTEXT1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1447
 wxID_PROJECTDIALOGSTATICTEXT2, wxID_PROJECTDIALOGSTATICTEXT3, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1448
 wxID_PROJECTDIALOGSTATICTEXT4, wxID_PROJECTDIALOGSTATICTEXT5, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1449
 wxID_PROJECTDIALOGSTATICTEXT6, wxID_PROJECTDIALOGSTATICTEXT7, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1450
] = [wx.NewId() for _init_ctrls in range(16)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1451
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1452
class ProjectDialog(wx.Dialog):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1453
    def _init_coll_flexGridSizer1_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1454
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1455
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1456
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1457
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1458
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1459
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1460
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1461
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1462
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1463
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1464
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1465
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1466
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1467
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1468
        wx.Dialog.__init__(self, id=wxID_PROJECTDIALOG,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1469
              name='ProjectDialog', parent=prnt, pos=wx.Point(376, 223),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1470
              size=wx.Size(550, 450), style=wx.DEFAULT_DIALOG_STYLE,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1471
              title='Create a new project')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1472
        self.SetClientSize(wx.Size(550, 450))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1473
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1474
        self.MainPanel = wx.Panel(id=wxID_PROJECTDIALOGMAINPANEL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1475
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1476
              size=wx.Size(450, 400), style=wx.TAB_TRAVERSAL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1477
        self.MainPanel.SetAutoLayout(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1478
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1479
        self.staticText1 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1480
              label='Project Name (required):', name='staticText1', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1481
              pos=wx.Point(24, 24), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1482
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1483
        self.ProjectName = wx.TextCtrl(id=wxID_PROJECTDIALOGPROJECTNAME,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1484
              name='ProjectName', parent=self.MainPanel, pos=wx.Point(224, 24), 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1485
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1486
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1487
        self.staticText2 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT2,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1488
              label='Company Name (required):', name='staticText2', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1489
              pos=wx.Point(24, 64), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1490
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1491
        self.CompanyName = wx.TextCtrl(id=wxID_PROJECTDIALOGCOMPANYNAME,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1492
              name='CompanyName', parent=self.MainPanel, pos=wx.Point(224, 64),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1493
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1494
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1495
        self.staticText3 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT3,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1496
              label='Company URL (optional):', name='staticText3', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1497
              pos=wx.Point(24, 104), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1498
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1499
        self.CompanyURL = wx.TextCtrl(id=wxID_PROJECTDIALOGCOMPANYURL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1500
              name='CompanyURL', parent=self.MainPanel, pos=wx.Point(224, 104),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1501
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1502
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1503
        self.staticText4 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT4,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1504
              label='Product Name (required):', name='staticText4', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1505
              pos=wx.Point(24, 144), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1506
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1507
        self.ProductName = wx.TextCtrl(id=wxID_PROJECTDIALOGPRODUCTNAME,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1508
              name='ProductName', parent=self.MainPanel, pos=wx.Point(224, 144),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1509
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1510
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1511
        self.staticText5 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT5,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1512
              label='Product Version (required):', name='staticText5', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1513
              pos=wx.Point(24, 184), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1514
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1515
        self.ProductVersion = wx.TextCtrl(id=wxID_PROJECTDIALOGPRODUCTVERSION,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1516
              name='ProductVersion', parent=self.MainPanel, pos=wx.Point(224, 184),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1517
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1518
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1519
        self.staticText6 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT6,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1520
              label='Product Release (optional):', name='staticText6', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1521
              pos=wx.Point(24, 224), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1522
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1523
        self.ProductRelease = wx.TextCtrl(id=wxID_PROJECTDIALOGPRODUCTRELEASE,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1524
              name='ProductRelease', parent=self.MainPanel, pos=wx.Point(224, 224),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1525
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1526
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1527
        self.staticText7 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT7,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1528
              label='Content Description (optional):', name='staticText7', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1529
              pos=wx.Point(24, 264), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1530
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1531
        self.ContentDescription = wx.TextCtrl(id=wxID_PROJECTDIALOGCONTENTDESCRIPTION,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1532
              name='ProductRelease', parent=self.MainPanel, pos=wx.Point(224, 264),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1533
              size=wx.Size(295, 120), style=wxTE_MULTILINE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1534
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1535
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1536
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1537
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1538
        self._init_ctrls(parent)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1539
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1540
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1541
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1542
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1543
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1544
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1545
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1546
        if self.ProjectName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1547
            error.append("Project Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1548
        if self.CompanyName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1549
            error.append("Company Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1550
        if self.ProductName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1551
            error.append("Product Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1552
        if self.ProductVersion.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1553
            error.append("Product Version")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1554
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1555
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1556
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1557
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1558
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1559
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1560
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1561
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1562
                    text += ", %s"%item 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1563
            message = wxMessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1564
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1565
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1566
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1567
            self.EndModal(wxID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1568
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1569
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1570
        for item, value in values.items():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1571
            if item == "projectName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1572
                self.ProjectName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1573
            elif item == "companyName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1574
                self.CompanyName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1575
            elif item == "companyURL":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1576
                self.CompanyURL.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1577
            elif item == "productName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1578
                self.ProductName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1579
            elif item == "productVersion":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1580
                self.ProductVersion.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1581
            elif item == "productRelease":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1582
                self.ProductRelease.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1583
            elif item == "contentDescription":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1584
                self.ContentDescription.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1585
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1586
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1587
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1588
        values["projectName"] = self.ProjectName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1589
        values["companyName"] = self.CompanyName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1590
        if self.CompanyURL.GetValue() != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1591
            values["companyURL"] = self.CompanyURL.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1592
        values["productName"] = self.ProductName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1593
        values["productVersion"] = self.ProductVersion.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1594
        if self.ProductRelease.GetValue() != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1595
            values["productRelease"] = self.ProductRelease.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1596
        if self.ProductRelease.GetValue() != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1597
            values["contentDescription"] = self.ContentDescription.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1598
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1599
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1600
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1601
#                            Create Pou Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1602
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1603
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1604
[wxID_POUDIALOG, wxID_POUDIALOGMAINPANEL, wxID_POUDIALOGPOUNAME, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1605
 wxID_POUDIALOGPOUTYPE, wxID_POUDIALOGLANGUAGE, wxID_POUDIALOGSTATICTEXT1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1606
 wxID_POUDIALOGSTATICTEXT2, wxID_POUDIALOGSTATICTEXT3, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1607
] = [wx.NewId() for _init_ctrls in range(8)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1608
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1609
class PouDialog(wx.Dialog):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1610
    def _init_coll_flexGridSizer1_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1611
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1612
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1613
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1614
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1615
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1616
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1617
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1618
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1619
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1620
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1621
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1622
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1623
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1624
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1625
        wx.Dialog.__init__(self, id=wxID_POUDIALOG,
16
20dcc0dce64b Bug on block properties dialog corrected
lbessard
parents: 13
diff changeset
  1626
              name='PouDialog', parent=prnt, pos=wx.Point(376, 223),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1627
              size=wx.Size(300, 200), style=wx.DEFAULT_DIALOG_STYLE,
16
20dcc0dce64b Bug on block properties dialog corrected
lbessard
parents: 13
diff changeset
  1628
              title='Create a new POU')
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1629
        self.SetClientSize(wx.Size(300, 200))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1630
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1631
        self.MainPanel = wx.Panel(id=wxID_POUDIALOGMAINPANEL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1632
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1633
              size=wx.Size(300, 200), style=wx.TAB_TRAVERSAL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1634
        self.MainPanel.SetAutoLayout(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1635
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1636
        self.staticText1 = wx.StaticText(id=wxID_POUDIALOGSTATICTEXT1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1637
              label='POU Name:', name='staticText1', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1638
              pos=wx.Point(24, 24), size=wx.Size(95, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1639
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1640
        self.PouName = wx.TextCtrl(id=wxID_POUDIALOGPOUNAME,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1641
              name='POUName', parent=self.MainPanel, pos=wx.Point(104, 24), 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1642
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1643
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1644
        self.staticText2 = wx.StaticText(id=wxID_POUDIALOGSTATICTEXT2,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1645
              label='POU Type:', name='staticText2', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1646
              pos=wx.Point(24, 64), size=wx.Size(95, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1647
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1648
        self.PouType = wx.Choice(id=wxID_POUDIALOGPOUTYPE,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1649
              name='POUType', parent=self.MainPanel, pos=wx.Point(104, 64),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1650
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1651
        EVT_CHOICE(self, wxID_POUDIALOGPOUTYPE, self.OnTypeChanged)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1652
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1653
        self.staticText3 = wx.StaticText(id=wxID_POUDIALOGSTATICTEXT3,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1654
              label='Language:', name='staticText3', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1655
              pos=wx.Point(24, 104), size=wx.Size(95, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1656
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1657
        self.Language = wx.Choice(id=wxID_POUDIALOGLANGUAGE,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1658
              name='Language', parent=self.MainPanel, pos=wx.Point(104, 104),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1659
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1660
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1661
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1662
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1663
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1664
        self._init_ctrls(parent)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1665
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1666
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1667
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1668
        for option in ["function","functionBlock","program"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1669
            self.PouType.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1670
        self.RefreshLanguage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1671
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1672
        self.PouNames = []
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1673
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1674
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1675
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1676
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1677
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1678
        pou_name = self.PouName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1679
        if pou_name == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1680
            error.append("POU Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1681
        if self.PouType.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1682
            error.append("POU Type")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1683
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1684
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1685
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1686
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1687
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1688
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1689
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1690
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1691
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1692
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1693
                    text += ", %s"%item 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1694
            message = wxMessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1695
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1696
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1697
        elif not TestIdentifier(pou_name):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1698
            message = wxMessageDialog(self, "\"%s\" is not a valid identifier!"%pou_name, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1699
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1700
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1701
        elif pou_name.upper() in IEC_KEYWORDS:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1702
            message = wxMessageDialog(self, "\"%s\" is a keyword. It can't be used!"%pou_name, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1703
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1704
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1705
        elif pou_name.upper() in self.PouNames:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1706
            message = wxMessageDialog(self, "\"%s\" pou already exists!"%pou_name, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1707
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1708
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1709
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1710
            self.EndModal(wxID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1711
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1712
    def RefreshLanguage(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1713
        selection = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1714
        self.Language.Clear()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1715
        for option in ["IL","ST","LD","FBD","SFC"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1716
            if option != "SFC" or self.PouType.GetStringSelection() == "program":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1717
                self.Language.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1718
        if self.Language.FindString(selection) != wxNOT_FOUND:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1719
            self.Language.SetStringSelection(selection)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1720
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1721
    def OnTypeChanged(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1722
        self.RefreshLanguage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1723
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1724
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1725
    def SetPouNames(self, pou_names):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1726
        self.PouNames = [pou_name.upper() for pou_name in pou_names]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1727
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1728
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1729
        for item, value in values.items():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1730
            if item == "pouName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1731
                self.PouName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1732
            elif item == "pouType":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1733
                self.PouType.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1734
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1735
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1736
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1737
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1738
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1739
        values["pouName"] = self.PouName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1740
        values["pouType"] = self.PouType.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1741
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1742
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1743
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1744
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1745
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1746
#                          Create Pou Transition Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1747
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1748
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1749
[wxID_POUTRANSITIONDIALOG, wxID_POUTRANSITIONDIALOGMAINPANEL, 
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1750
 wxID_POUTRANSITIONDIALOGTRANSITIONNAME, wxID_POUTRANSITIONDIALOGLANGUAGE, 
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1751
 wxID_POUTRANSITIONDIALOGSTATICTEXT1, wxID_POUTRANSITIONDIALOGSTATICTEXT2,
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1752
] = [wx.NewId() for _init_ctrls in range(6)]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1753
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1754
class PouTransitionDialog(wx.Dialog):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1755
    def _init_coll_flexGridSizer1_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1756
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1757
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1758
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1759
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1760
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1761
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1762
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1763
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1764
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1765
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1766
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1767
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1768
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1769
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1770
        wx.Dialog.__init__(self, id=wxID_POUTRANSITIONDIALOG,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1771
              name='PouTransitionDialog', parent=prnt, pos=wx.Point(376, 223),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1772
              size=wx.Size(350, 200), style=wx.DEFAULT_DIALOG_STYLE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1773
              title='Create a new transition')
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1774
        self.SetClientSize(wx.Size(350, 160))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1775
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1776
        self.MainPanel = wx.Panel(id=wxID_POUTRANSITIONDIALOGMAINPANEL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1777
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1778
              size=wx.Size(350, 200), style=wx.TAB_TRAVERSAL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1779
        self.MainPanel.SetAutoLayout(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1780
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1781
        self.staticText1 = wx.StaticText(id=wxID_POUTRANSITIONDIALOGSTATICTEXT1,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1782
              label='Transition Name:', name='staticText1', parent=self.MainPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1783
              pos=wx.Point(24, 24), size=wx.Size(145, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1784
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1785
        self.TransitionName = wx.TextCtrl(id=wxID_POUTRANSITIONDIALOGTRANSITIONNAME,
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1786
              name='TransitionName', parent=self.MainPanel, pos=wx.Point(154, 24),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1787
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1788
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1789
        self.staticText2 = wx.StaticText(id=wxID_POUTRANSITIONDIALOGSTATICTEXT2,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1790
              label='Language:', name='staticText2', parent=self.MainPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1791
              pos=wx.Point(24, 64), size=wx.Size(145, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1792
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1793
        self.Language = wx.Choice(id=wxID_POUTRANSITIONDIALOGLANGUAGE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1794
              name='Language', parent=self.MainPanel, pos=wx.Point(154, 64),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1795
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1796
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1797
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1798
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1799
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1800
        self._init_ctrls(parent)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1801
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1802
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1803
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1804
        for option in ["IL","ST","LD","FBD"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1805
            self.Language.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1806
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1807
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1808
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1809
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1810
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1811
        if self.TransitionName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1812
            error.append("Transition Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1813
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1814
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1815
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1816
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1817
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1818
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1819
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1820
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1821
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1822
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1823
                    text += ", %s"%item 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1824
            message = wxMessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1825
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1826
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1827
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1828
            self.EndModal(wxID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1829
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1830
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1831
        for item, value in values.items():
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1832
            if item == "transitionName":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1833
                self.TransitionName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1834
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1835
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1836
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1837
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1838
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1839
        values["transitionName"] = self.TransitionName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1840
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1841
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1842
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1843
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1844
#                          Create Pou Action Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1845
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1846
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1847
[wxID_POUACTIONDIALOG, wxID_POUACTIONDIALOGMAINPANEL, 
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1848
 wxID_POUACTIONDIALOGACTIONNAME, wxID_POUACTIONDIALOGLANGUAGE, 
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1849
 wxID_POUACTIONDIALOGSTATICTEXT1, wxID_POUACTIONDIALOGSTATICTEXT2, 
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1850
] = [wx.NewId() for _init_ctrls in range(6)]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1851
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1852
class PouActionDialog(wx.Dialog):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1853
    def _init_coll_flexGridSizer1_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1854
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1855
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1856
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1857
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1858
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1859
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1860
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1861
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1862
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1863
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1864
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1865
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1866
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1867
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1868
        wx.Dialog.__init__(self, id=wxID_POUACTIONDIALOG,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1869
              name='PouActionDialog', parent=prnt, pos=wx.Point(376, 223),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1870
              size=wx.Size(320, 200), style=wx.DEFAULT_DIALOG_STYLE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1871
              title='Create a new action')
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1872
        self.SetClientSize(wx.Size(320, 160))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1873
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1874
        self.MainPanel = wx.Panel(id=wxID_POUACTIONDIALOGMAINPANEL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1875
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1876
              size=wx.Size(350, 200), style=wx.TAB_TRAVERSAL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1877
        self.MainPanel.SetAutoLayout(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1878
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1879
        self.staticText1 = wx.StaticText(id=wxID_POUACTIONDIALOGSTATICTEXT1,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1880
              label='Action Name:', name='staticText1', parent=self.MainPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1881
              pos=wx.Point(24, 24), size=wx.Size(145, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1882
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1883
        self.ActionName = wx.TextCtrl(id=wxID_POUACTIONDIALOGACTIONNAME,
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1884
              name='ActionName', parent=self.MainPanel, pos=wx.Point(124, 24),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1885
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1886
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1887
        self.staticText3 = wx.StaticText(id=wxID_POUACTIONDIALOGSTATICTEXT2,
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1888
              label='Language:', name='staticText2', parent=self.MainPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1889
              pos=wx.Point(24, 64), size=wx.Size(145, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1890
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1891
        self.Language = wx.Choice(id=wxID_POUACTIONDIALOGLANGUAGE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1892
              name='Language', parent=self.MainPanel, pos=wx.Point(124, 64),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1893
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1894
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1895
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1896
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1897
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1898
        self._init_ctrls(parent)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1899
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1900
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1901
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1902
        for option in ["IL","ST","LD","FBD"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1903
            self.Language.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1904
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1905
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1906
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1907
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1908
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1909
        if self.ActionName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1910
            error.append("Action Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1911
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1912
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1913
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1914
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1915
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1916
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1917
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1918
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1919
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1920
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1921
                    text += ", %s"%item 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1922
            message = wxMessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1923
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1924
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1925
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1926
            self.EndModal(wxID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1927
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1928
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1929
        for item, value in values.items():
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1930
            if item == "actionName":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1931
                self.ActionName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1932
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1933
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1934
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1935
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1936
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1937
        values["actionName"] = self.ActionName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1938
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1939
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1940
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1941
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1942
#                            Pou Interface Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1943
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1944
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1945
class VariableTable(wxPyGridTableBase):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1946
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1947
    """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1948
    A custom wxGrid Table using user supplied data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1949
    """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1950
    def __init__(self, parent, data, colnames):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1951
        # The base class must be initialized *first*
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1952
        wxPyGridTableBase.__init__(self)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1953
        self.data = data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1954
        self.colnames = colnames
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1955
        self.Parent = parent
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1956
        # XXX
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1957
        # we need to store the row length and collength to
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1958
        # see if the table has changed size
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1959
        self._rows = self.GetNumberRows()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1960
        self._cols = self.GetNumberCols()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1961
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1962
    def GetNumberCols(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1963
        return len(self.colnames)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1964
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1965
    def GetNumberRows(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1966
        return len(self.data)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1967
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1968
    def GetColLabelValue(self, col):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1969
        if col < len(self.colnames):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1970
            return self.colnames[col]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1971
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1972
    def GetRowLabelValues(self, row):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1973
        return row
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1974
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1975
    def GetValue(self, row, col):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1976
        if row < self.GetNumberRows():
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1977
            if col == 0:
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  1978
                return self.Parent.Values.index(self.data[row]) + 1
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1979
            name = str(self.data[row].get(self.GetColLabelValue(col), ""))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1980
            return name
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1981
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1982
    def GetValueByName(self, row, colname):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1983
        return self.data[row].get(colname)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1984
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1985
    def SetValue(self, row, col, value):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1986
        if col < len(self.colnames):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1987
            self.data[row][self.GetColLabelValue(col)] = value
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1988
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1989
    def ResetView(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1990
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1991
        (wxGrid) -> Reset the grid view.   Call this to
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1992
        update the grid if rows and columns have been added or deleted
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1993
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1994
        grid.BeginBatch()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1995
        for current, new, delmsg, addmsg in [
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1996
            (self._rows, self.GetNumberRows(), wxGRIDTABLE_NOTIFY_ROWS_DELETED, wxGRIDTABLE_NOTIFY_ROWS_APPENDED),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1997
            (self._cols, self.GetNumberCols(), wxGRIDTABLE_NOTIFY_COLS_DELETED, wxGRIDTABLE_NOTIFY_COLS_APPENDED),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1998
        ]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1999
            if new < current:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2000
                msg = wxGridTableMessage(self,delmsg,new,current-new)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2001
                grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2002
            elif new > current:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2003
                msg = wxGridTableMessage(self,addmsg,new-current)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2004
                grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2005
                self.UpdateValues(grid)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2006
        grid.EndBatch()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2007
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2008
        self._rows = self.GetNumberRows()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2009
        self._cols = self.GetNumberCols()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2010
        # update the column rendering scheme
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2011
        self._updateColAttrs(grid)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2012
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2013
        # update the scrollbars and the displayed part of the grid
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2014
        grid.AdjustScrollbars()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2015
        grid.ForceRefresh()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2016
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2017
    def UpdateValues(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2018
        """Update all displayed values"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2019
        # This sends an event to the grid table to update all of the values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2020
        msg = wxGridTableMessage(self, wxGRIDTABLE_REQUEST_VIEW_GET_VALUES)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2021
        grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2022
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2023
    def _updateColAttrs(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2024
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2025
        wxGrid -> update the column attributes to add the
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2026
        appropriate renderer given the column name.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2027
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2028
        Otherwise default to the default renderer.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2029
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2030
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2031
        for col in range(self.GetNumberCols()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2032
            attr = wxGridCellAttr()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2033
            attr.SetAlignment(self.Parent.ColAlignements[col], wxALIGN_CENTRE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2034
            grid.SetColAttr(col, attr)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2035
            grid.SetColSize(col, self.Parent.ColSizes[col])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2036
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2037
        typelist = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2038
        accesslist = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2039
        for row in range(self.GetNumberRows()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2040
            for col in range(self.GetNumberCols()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2041
                editor = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2042
                renderer = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2043
                colname = self.GetColLabelValue(col)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2044
                grid.SetReadOnly(row, col, False)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2045
                if col == 0:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2046
                    grid.SetReadOnly(row, col, True)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2047
                elif colname == "Name":
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2048
                    if self.Parent.PouIsUsed and self.GetValueByName(row, "Class") in ["Input", "Output", "InOut"]:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2049
                        grid.SetReadOnly(row, col, True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2050
                    else:
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2051
                        editor = wxGridCellTextEditor()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2052
                        renderer = wxGridCellStringRenderer()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2053
                elif colname in ["Initial Value","Location"]:
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2054
                    editor = wxGridCellTextEditor()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2055
                    renderer = wxGridCellStringRenderer()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2056
                elif colname == "Class":
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2057
                    if len(self.Parent.ClassList) == 1 or self.Parent.PouIsUsed and self.GetValueByName(row, "Class") in ["Input", "Output", "InOut"]:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2058
                        grid.SetReadOnly(row, col, True)
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2059
                    else:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2060
                        editor = wxGridCellChoiceEditor()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2061
                        excluded = []
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2062
                        if self.Parent.PouIsUsed:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2063
                            excluded.extend(["Input","Output","InOut"])    
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2064
                        editor.SetParameters(",".join([choice for choice in self.Parent.ClassList if choice not in excluded]))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2065
                elif colname == "Type":
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2066
                    if self.Parent.PouIsUsed and self.GetValueByName(row, "Class") in ["Input", "Output", "InOut"]:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2067
                        grid.SetReadOnly(row, col, True)
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2068
                    else:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2069
                        editor = wxGridCellChoiceEditor()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2070
                        editor.SetParameters(self.Parent.TypeList)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2071
                elif colname in ["Retain", "Constant"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2072
                    editor = wxGridCellChoiceEditor()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2073
                    editor.SetParameters(self.Parent.OptionList)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2074
                    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2075
                grid.SetCellEditor(row, col, editor)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2076
                grid.SetCellRenderer(row, col, renderer)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2077
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2078
                grid.SetCellBackgroundColour(row, col, wxWHITE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2079
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2080
    def SetData(self, data):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2081
        self.data = data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2082
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2083
    def GetData(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2084
        return self.data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2085
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2086
    def GetCurrentIndex(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2087
        return self.CurrentIndex
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2088
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2089
    def SetCurrentIndex(self, index):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2090
        self.CurrentIndex = index
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2091
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2092
    def AppendRow(self, row_content):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2093
        self.data.append(row_content)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2094
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2095
    def RemoveRow(self, row_index):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2096
        self.data.pop(row_index)
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2097
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2098
    def GetRow(self, row_index):
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2099
        return self.data[row_index]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2100
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2101
    def Empty(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2102
        self.data = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2103
        self.editors = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2104
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2105
class VariableDropTarget(wx.TextDropTarget):
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2106
    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2107
    def __init__(self, parent):
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2108
        wx.TextDropTarget.__init__(self)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2109
        self.Parent = parent
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2110
    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2111
    def OnDropText(self, x, y, data):
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2112
        col = self.Parent.VariablesGrid.XToCol(x)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2113
        row = self.Parent.VariablesGrid.YToRow(y)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2114
        if col != wxNOT_FOUND and row != wxNOT_FOUND:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2115
            if self.Parent.Table.GetColLabelValue(col) != "Location":
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2116
                return
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2117
            try:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2118
                values = eval(data)    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2119
            except:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2120
                values = None
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2121
            if values and values[1] == "location":
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2122
                dialog = wxSingleChoiceDialog(self.Parent, "Select a variable class:", "Variable class", ["Input", "Output", "Memory"], wxOK|wxCANCEL)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2123
                if dialog.ShowModal() == wxID_OK:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2124
                    selected = dialog.GetSelection()
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2125
                    if selected == 0:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2126
                        location = "%I" + values[0]
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2127
                    elif selected == 1:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2128
                        location = "%Q" + values[0]
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2129
                    else:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2130
                        location = "%M" + values[0]
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2131
                    self.Parent.Table.SetValue(row - 1, col, location)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2132
                    self.Parent.Table.ResetView(self.Parent.VariablesGrid)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2133
                    self.Parent.SaveValues()
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2134
                dialog.Destroy()    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2135
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2136
[wxID_POUEDITORPANEL, wxID_POUEDITORPANELVIEWER, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2137
 wxID_POUEDITORPANELVARIABLESGRID, wxID_POUEDITORPANELRETURNTYPE, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2138
 wxID_POUEDITORPANELCLASSFILTER, wxID_POUEDITORPANELADDBUTTON,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2139
 wxID_POUEDITORPANELDELETEBUTTON, wxID_POUEDITORPANELUPBUTTON, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2140
 wxID_POUEDITORPANELDOWNBUTTON, wxID_POUEDITORPANELSTATICTEXT1, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2141
 wxID_POUEDITORPANELSTATICTEXT2, wxID_POUEDITORPANELSTATICTEXT3,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2142
] = [wx.NewId() for _init_ctrls in range(12)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2143
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2144
class PouEditorPanel(wx.Panel):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2145
    def _init_coll_MainPanelSizer_Items(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2146
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2147
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2148
        parent.AddWindow(self.Viewer, 0, border=0, flag=wxGROW)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2149
        parent.AddSizer(self.VariablePanelSizer, 0, border=0, flag=wxGROW)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2150
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2151
    def _init_coll_MainPanelSizer_Growables(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2152
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2153
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2154
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2155
        parent.AddGrowableRow(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2156
    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2157
    def _init_coll_VariablePanelSizer_Items(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2158
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2159
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2160
        parent.AddWindow(self.VariablesGrid, 0, border=0, flag=wxGROW)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2161
        parent.AddSizer(self.ControlPanelSizer, 0, border=0, flag=wxGROW)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2162
    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2163
    def _init_coll_VariablePanelSizer_Growables(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2164
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2165
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2166
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2167
        parent.AddGrowableRow(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2168
    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2169
    def _init_coll_ControlPanelSizer_Items(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2170
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2171
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2172
        parent.AddSizer(self.ChoicePanelSizer, 0, border=0, flag=wxGROW)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2173
        parent.AddSizer(self.ButtonPanelSizer, 0, border=0, flag=wxALIGN_CENTER)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2174
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2175
    def _init_coll_ControlPanelSizer_Growables(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2176
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2177
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2178
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2179
        parent.AddGrowableRow(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2180
        parent.AddGrowableRow(1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2181
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2182
    def _init_coll_ChoicePanelSizer_Items(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2183
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2184
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2185
        parent.AddWindow(self.staticText1, 0, border=0, flag=wxALIGN_BOTTOM)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2186
        parent.AddWindow(self.ReturnType, 0, border=0, flag=0)
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  2187
        parent.AddWindow(self.staticText2, 0, border=0, flag=wxALIGN_BOTTOM)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2188
        parent.AddWindow(self.ClassFilter, 0, border=0, flag=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2189
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2190
    def _init_coll_ButtonPanelSizer_Items(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2191
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2192
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2193
        parent.AddWindow(self.UpButton, 0, border=0, flag=0)
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  2194
        parent.AddWindow(self.AddButton, 0, border=0, flag=0)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2195
        parent.AddWindow(self.DownButton, 0, border=0, flag=0)
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  2196
        parent.AddWindow(self.DeleteButton, 0, border=0, flag=0)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2197
        
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2198
    def _init_coll_ButtonPanelSizer_Growables(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2199
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2200
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2201
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2202
        parent.AddGrowableCol(1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2203
        parent.AddGrowableCol(2)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2204
        parent.AddGrowableCol(3)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2205
        parent.AddGrowableRow(0)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2206
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2207
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2208
        # generated method, don't edit
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2209
        self.MainPanelSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2210
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2211
        self.VariablePanelSizer = wx.FlexGridSizer(cols=2, hgap=10, rows=1, vgap=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2212
        
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2213
        self.ControlPanelSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=10)
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2214
        
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2215
        self.ChoicePanelSizer = wx.GridSizer(cols=1, hgap=5, rows=4, vgap=5)
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2216
        
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2217
        self.ButtonPanelSizer = wx.FlexGridSizer(cols=2, hgap=5, rows=2, vgap=0)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2218
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2219
        self._init_coll_MainPanelSizer_Items(self.MainPanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2220
        self._init_coll_MainPanelSizer_Growables(self.MainPanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2221
        self._init_coll_VariablePanelSizer_Items(self.VariablePanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2222
        self._init_coll_VariablePanelSizer_Growables(self.VariablePanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2223
        self._init_coll_ControlPanelSizer_Items(self.ControlPanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2224
        self._init_coll_ControlPanelSizer_Growables(self.ControlPanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2225
        self._init_coll_ChoicePanelSizer_Items(self.ChoicePanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2226
        self._init_coll_ButtonPanelSizer_Items(self.ButtonPanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2227
        self._init_coll_ButtonPanelSizer_Growables(self.ButtonPanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2228
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2229
        self.SetSizer(self.MainPanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2230
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2231
    def _init_ctrls(self, prnt, element_type):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2232
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2233
        wx.Panel.__init__(self, id=wxID_POUEDITORPANEL,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2234
              name='EditVariablePanel', parent=prnt, pos=wx.Point(0, 0),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2235
              size=wx.Size(-1, -1), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2236
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2237
        if element_type == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2238
            self.Viewer = wx.Panel(id=wxID_POUEDITORPANELVIEWER,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2239
              name='ConfigPanel', parent=self, pos=wx.Point(0, 0),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2240
              size=wx.Size(-1, -1), style=wx.TAB_TRAVERSAL)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2241
            self.Viewer.ResetBuffer = lambda: None
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2242
            self.Viewer.RefreshView = lambda: None
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2243
        elif element_type == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2244
            self.Viewer = ResourceEditor(self, self.Parent, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2245
        elif element_type == "FBD":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2246
            self.Viewer = Viewer(self, self.Parent, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2247
        elif element_type == "LD":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2248
            self.Viewer = LD_Viewer(self, self.Parent, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2249
        elif element_type == "SFC":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2250
            self.Viewer = SFC_Viewer(self, self.Parent, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2251
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2252
            self.Viewer = TextViewer(self, self.Parent, self.Controler)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2253
            self.Viewer.SetTextSyntax(element_type)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2254
            if element_type == "IL":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2255
                self.Viewer.SetKeywords(IL_KEYWORDS)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2256
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2257
                self.Viewer.SetKeywords(ST_KEYWORDS)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2258
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2259
        self.staticText1 = wx.StaticText(id=wxID_POUEDITORPANELSTATICTEXT1,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2260
              label='Return Type:', name='staticText1', parent=self,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2261
              pos=wx.Point(0, 0), size=wx.Size(95, 17), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2262
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2263
        self.ReturnType = wx.Choice(id=wxID_POUEDITORPANELRETURNTYPE,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2264
              name='ReturnType', parent=self, pos=wx.Point(0, 0),
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2265
              size=wx.Size(145, 24), style=0)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2266
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2267
        self.staticText2 = wx.StaticText(id=wxID_POUEDITORPANELSTATICTEXT2,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2268
              label='Class Filter:', name='staticText2', parent=self,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2269
              pos=wx.Point(0, 0), size=wx.Size(95, 17), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2270
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2271
        self.ClassFilter = wx.Choice(id=wxID_POUEDITORPANELCLASSFILTER,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2272
              name='ClassFilter', parent=self, pos=wx.Point(0, 0),
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2273
              size=wx.Size(145, 24), style=0)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2274
        EVT_CHOICE(self, wxID_POUEDITORPANELCLASSFILTER, self.OnClassFilter)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2275
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2276
        self.VariablesGrid = wx.grid.Grid(id=wxID_POUEDITORPANELVARIABLESGRID,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2277
              name='VariablesGrid', parent=self, pos=wx.Point(0, 0), 
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2278
              size=wx.Size(0, 150), style=wxVSCROLL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2279
        self.VariablesGrid.SetFont(wx.Font(12, 77, wx.NORMAL, wx.NORMAL, False,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2280
              'Sans'))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2281
        self.VariablesGrid.SetLabelFont(wx.Font(10, 77, wx.NORMAL, wx.NORMAL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2282
              False, 'Sans'))
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2283
        self.VariablesGrid.Bind(wx.grid.EVT_GRID_CELL_CHANGE, self.OnVariablesGridCellChange)
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2284
        self.VariablesGrid.Bind(wx.grid.EVT_GRID_SELECT_CELL, self.OnVariablesGridSelectCell)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2285
        self.VariablesGrid.Bind(wx.grid.EVT_GRID_CELL_LEFT_CLICK, self.OnVariablesGridCellLeftClick)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2286
        
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2287
        self.VariablesGrid.SetDropTarget(VariableDropTarget(self))
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2288
        
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2289
        self.AddButton = wx.Button(id=wxID_POUEDITORPANELADDBUTTON, label='Add',
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2290
              name='AddButton', parent=self, pos=wx.Point(345, 340),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2291
              size=wx.Size(72, 32), style=0)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2292
        EVT_BUTTON(self, wxID_POUEDITORPANELADDBUTTON, self.OnAddButton)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2293
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2294
        self.DeleteButton = wx.Button(id=wxID_POUEDITORPANELDELETEBUTTON, label='Delete',
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2295
              name='DeleteButton', parent=self, pos=wx.Point(425, 340),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2296
              size=wx.Size(72, 32), style=0)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2297
        EVT_BUTTON(self, wxID_POUEDITORPANELDELETEBUTTON, self.OnDeleteButton)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2298
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2299
        self.UpButton = wx.Button(id=wxID_POUEDITORPANELUPBUTTON, label='^',
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2300
              name='UpButton', parent=self, pos=wx.Point(505, 340),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2301
              size=wx.Size(32, 32), style=0)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2302
        EVT_BUTTON(self, wxID_POUEDITORPANELUPBUTTON, self.OnUpButton)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2303
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2304
        self.DownButton = wx.Button(id=wxID_POUEDITORPANELDOWNBUTTON, label='v',
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2305
              name='DownButton', parent=self, pos=wx.Point(545, 340),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2306
              size=wx.Size(32, 32), style=0)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2307
        EVT_BUTTON(self, wxID_POUEDITORPANELDOWNBUTTON, self.OnDownButton)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2308
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2309
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2310
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2311
    def __init__(self, parent, window, controler, element_type, pou_name = None, transition_name = None, action_name = None, config_name = None, resource_name = None):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2312
        self.Parent = window
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2313
        self.Controler = controler
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2314
        self.ElementType = element_type
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2315
        self.PouName = pou_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2316
        self.TransitionName = transition_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2317
        self.ActionName = action_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2318
        self.ConfigName = config_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2319
        self.ResourceName = resource_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2320
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2321
        if element_type == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2322
            self._init_ctrls(parent, "config")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2323
            pou_type = "config"
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2324
        elif element_type == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2325
            self._init_ctrls(parent, "resource")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2326
            pou_type = "resource"
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2327
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2328
            if element_type == "transition":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2329
                self._init_ctrls(parent, self.Controler.GetTransitionBodyType(pou_name, transition_name))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2330
            elif element_type == "action":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2331
                self._init_ctrls(parent, self.Controler.GetActionBodyType(pou_name, action_name))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2332
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2333
                self._init_ctrls(parent, self.Controler.GetPouBodyType(pou_name))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2334
            pou_type = self.Controler.GetPouType(pou_name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2335
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2336
        self.Filter = "All"
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2337
        self.FilterChoices = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2338
        self.FilterChoiceTransfer = {"All" : "All", "Interface" : "Interface", 
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2339
            "   Input" : "Input", "   Output" : "Output", "   InOut" : "InOut", 
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2340
            "   External" : "External", "Variables" : "Variables", "   Local" : "Local",
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2341
            "   Temp" : "Temp", "Global" : "Global", "Access" : "Access"}
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2342
        
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2343
        if pou_type in ["config", "resource"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2344
            self.DefaultTypes = {"All" : "Global"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2345
            self.DefaultValue = {"Name" : "", "Class" : "", "Type" : "INT", "Location" : "", "Initial Value" : "", "Retain" : "No", "Constant" : "No"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2346
        else:
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2347
            self.DefaultTypes = {"All" : "Local", "Interface" : "Input", "Variables" : "Local"}
11
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2348
            self.DefaultValue = {"Name" : "", "Class" : "", "Type" : "INT", "Location" : "", "Initial Value" : "", "Retain" : "No", "Constant" : "No"}
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2349
        if pou_type in ["config", "resource"] or pou_type == "program":
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2350
            self.Table = VariableTable(self, [], ["#", "Name", "Class", "Type", "Location", "Initial Value", "Retain", "Constant"])
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2351
            if pou_type not in ["config", "resource"]:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2352
                self.FilterChoices = ["All","Interface","   Input","   Output","   InOut","   External","Variables","   Local","   Temp","Global","Access"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2353
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2354
                self.FilterChoices = ["All","Global","Access"]
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2355
            self.ColSizes = [40, 80, 70, 80, 80, 80, 60, 70]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2356
            self.ColAlignements = [wxALIGN_CENTER, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_CENTER, wxALIGN_CENTER]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2357
        else:
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2358
            self.Table = VariableTable(self, [], ["#", "Name", "Class", "Type", "Initial Value", "Retain", "Constant"])
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2359
            self.FilterChoices = ["All","Interface","   Input","   Output","   InOut","   External","Variables","   Local","   Temp"]
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2360
            self.ColSizes = [40, 120, 70, 80, 120, 60, 70]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2361
            self.ColAlignements = [wxALIGN_CENTER, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_CENTER, wxALIGN_CENTER]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2362
        for choice in self.FilterChoices:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2363
            self.ClassFilter.Append(choice)
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2364
        reverse_transfer = {}
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2365
        for filter, choice in self.FilterChoiceTransfer.items():
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2366
            reverse_transfer[choice] = filter
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2367
        self.ClassFilter.SetStringSelection(reverse_transfer[self.Filter])
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2368
        self.RefreshTypeList()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2369
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2370
        self.OptionList = "Yes,No"
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2371
        self.TypeList = ",".join([value for value, parent in TypeHierarchy_list if not value.startswith("ANY")])
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2372
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2373
        if pou_type == "function":
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2374
            for value, parent in TypeHierarchy_list:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2375
                if not value.startswith("ANY"):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2376
                    self.ReturnType.Append(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2377
            self.ReturnType.Enable(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2378
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2379
            self.ReturnType.Enable(False)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2380
            self.staticText1.Hide()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2381
            self.ReturnType.Hide()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2382
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2383
        self.VariablesGrid.SetTable(self.Table)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2384
        self.VariablesGrid.SetRowLabelSize(0)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2385
    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2386
    def SetMode(self, mode):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2387
        if self.ElementType not in ["resource", "config"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2388
            if self.ElementType == "transition":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2389
                language = self.Controler.GetTransitionBodyType(self.PouName, self.TransitionName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2390
            elif self.ElementType == "action":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2391
                language = self.Controler.GetActionBodyType(self.PouName, self.ActionName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2392
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2393
                language = self.Controler.GetPouBodyType(self.PouName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2394
            if language not in ["IL", "ST"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2395
                self.Viewer.SetMode(mode)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2396
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2397
    def ResetBuffer(self):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2398
        self.Viewer.ResetBuffer()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2399
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2400
    def RefreshView(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2401
        self.PouNames = self.Controler.GetProjectPouNames()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2402
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2403
        if self.ElementType == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2404
            self.PouIsUsed = False
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2405
            returnType = None
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2406
            self.Values = self.Controler.GetConfigurationGlobalVars(self.ConfigName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2407
        elif self.ElementType == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2408
            self.PouIsUsed = False
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2409
            returnType = None
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2410
            self.Values = self.Controler.GetConfigurationResourceGlobalVars(self.ConfigName, self.ResourceName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2411
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2412
            self.PouIsUsed = self.Controler.PouIsUsed(self.PouName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2413
            returnType = self.Controler.GetCurrentElementEditingInterfaceReturnType()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2414
            self.Values = self.Controler.GetCurrentElementEditingInterfaceVars()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2415
            varlist = [var["Name"] for var in self.Values]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2416
            if self.ElementType == "transtion":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2417
                language = self.Controler.GetTransitionBodyType(self.PouName, self.TransitionName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2418
                varlist.append(self.ActionName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2419
            elif self.ElementType == "action":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2420
                language = self.Controler.GetActionBodyType(self.PouName, self.ActionName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2421
                varlist.append(self.ActionName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2422
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2423
                language = self.Controler.GetPouBodyType(self.PouName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2424
                varlist.append(self.PouName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2425
            if language in ["IL", "ST"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2426
                self.Viewer.SetVariables(varlist)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2427
                self.Viewer.SetFunctions(self.Controler.GetBlockTypes())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2428
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2429
        if returnType and self.ReturnType.IsEnabled():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2430
            self.ReturnType.SetStringSelection(returnType)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2431
        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2432
        self.RefreshButtons()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2433
        self.Viewer.RefreshView()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2434
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2435
    def OnClassFilter(self, event):
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2436
        self.Filter = self.FilterChoiceTransfer[self.ClassFilter.GetStringSelection()]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2437
        self.RefreshTypeList()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2438
        self.RefreshValues()
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2439
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2440
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2441
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2442
    def RefreshTypeList(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2443
        if self.Filter == "All":
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2444
            self.ClassList = [self.FilterChoiceTransfer[choice] for choice in self.FilterChoices if self.FilterChoiceTransfer[choice] not in ["All","Interface","Variables"]]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2445
        elif self.Filter == "Interface":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2446
            self.ClassList = ["Input","Output","InOut","External"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2447
        elif self.Filter == "Variables":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2448
            self.ClassList = ["Local","Temp"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2449
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2450
            self.ClassList = [self.Filter]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2451
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2452
    def RefreshButtons(self):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2453
        if self.Table:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2454
            table_length = len(self.Table.data)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2455
            row_class = None
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2456
            if table_length and self.PouIsUsed:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2457
                row = self.VariablesGrid.GetGridCursorRow()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2458
                row_class = self.Table.GetValueByName(row, "Class")
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2459
            self.AddButton.Enable(not self.PouIsUsed or self.Filter not in ["Interface", "Input", "Output", "InOut"])
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2460
            self.DeleteButton.Enable(table_length > 0 and row_class not in ["Input", "Output", "InOut"])
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2461
            self.UpButton.Enable(table_length > 0 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2462
            self.DownButton.Enable(table_length > 0 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2463
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2464
    def OnAddButton(self, event):
11
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2465
        new_row = self.DefaultValue.copy()
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2466
        if self.Filter in self.DefaultTypes:
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2467
            new_row["Class"] = self.DefaultTypes[self.Filter]
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2468
        else:
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2469
            new_row["Class"] = self.Filter
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2470
        self.Values.append(new_row)
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2471
        self.RefreshValues()
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2472
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2473
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2474
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2475
    def OnDeleteButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2476
        row = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2477
        self.Values.remove(row)
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2478
        self.RefreshValues()
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2479
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2480
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2481
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2482
    def OnUpButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2483
        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), -1)
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2484
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2485
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2486
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2487
    def OnDownButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2488
        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), 1)
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2489
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2490
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2491
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2492
    def OnVariablesGridCellChange(self, event):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2493
        row, col = event.GetRow(), event.GetCol()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2494
        colname = self.Table.GetColLabelValue(col)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2495
        value = self.Table.GetValue(row, col)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2496
        if colname == "Name":
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2497
            if not TestIdentifier(value):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2498
                message = wxMessageDialog(self, "\"%s\" is not a valid identifier!"%value, "Error", wxOK|wxICON_ERROR)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2499
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2500
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2501
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2502
            elif value.upper() in IEC_KEYWORDS:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2503
                message = wxMessageDialog(self, "\"%s\" is a keyword. It can't be used!"%value, "Error", wxOK|wxICON_ERROR)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2504
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2505
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2506
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2507
            elif value.upper() in self.PouNames:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2508
                message = wxMessageDialog(self, "A pou with \"%s\" as name exists!"%value, "Error", wxOK|wxICON_ERROR)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2509
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2510
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2511
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2512
            elif value.upper() in [var["Name"].upper() for var in self.Values if var != self.Table.data[row]]:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2513
                message = wxMessageDialog(self, "A variable with \"%s\" as name exists in this pou!"%value, "Error", wxOK|wxICON_ERROR)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2514
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2515
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2516
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2517
            else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2518
                self.SaveValues()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2519
                event.Skip()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2520
        else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2521
            self.SaveValues()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2522
            event.Skip()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2523
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2524
    def OnVariablesGridCellLeftClick(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2525
        if event.GetCol() == 0:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2526
            row = event.GetRow()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2527
            var_name = self.Table.GetValueByName(row, "Name")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2528
            var_class = self.Table.GetValueByName(row, "Class")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2529
            var_type = self.Table.GetValueByName(row, "Type")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2530
            data = wxTextDataObject(str((var_name, var_class, var_type)))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2531
            dragSource = wxDropSource(self.VariablesGrid)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2532
            dragSource.SetData(data)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2533
            dragSource.DoDragDrop()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2534
        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2535
    
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2536
    def OnVariablesGridSelectCell(self, event):
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2537
        wxCallAfter(self.RefreshButtons)
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2538
        event.Skip()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2539
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2540
    def MoveValue(self, value_index, move):
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2541
        new_index = max(0, min(value_index + move, len(self.Values) - 1))
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2542
        if new_index != value_index:
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2543
            self.Values.insert(new_index, self.Values.pop(value_index))
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2544
            self.RefreshValues()
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2545
            self.VariablesGrid.SetGridCursor(new_index, self.VariablesGrid.GetGridCursorCol())
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2546
        else:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2547
            self.RefreshValues()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2548
        self.SaveValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2549
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2550
    def RefreshValues(self):
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2551
        if len(self.Table.data) > 0:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2552
            self.VariablesGrid.SetGridCursor(0, 1)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2553
        data = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2554
        for variable in self.Values:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2555
            if variable["Class"] in self.ClassList:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2556
                data.append(variable)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2557
        self.Table.SetData(data)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2558
        self.Table.ResetView(self.VariablesGrid)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2559
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2560
    def SaveValues(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2561
        if self.ElementType == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2562
            self.Controler.SetConfigurationGlobalVars(self.ConfigName, self.Values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2563
        elif self.ElementType == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2564
            self.Controler.SetConfigurationResourceGlobalVars(self.ConfigName, self.ResourceName, self.Values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2565
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2566
            if self.ReturnType.IsEnabled():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2567
                self.Controler.SetPouInterfaceReturnType(self.PouName, self.ReturnType.GetStringSelection())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2568
            self.Controler.SetPouInterfaceVars(self.PouName, self.Values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2569
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2570
##[wxID_EDITVARIABLEDIALOG, wxID_EDITVARIABLEDIALOGMAINPANEL, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2571
## wxID_EDITVARIABLEDIALOGVARIABLESGRID, wxID_EDITVARIABLEDIALOGRETURNTYPE, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2572
## wxID_EDITVARIABLEDIALOGCLASSFILTER, wxID_EDITVARIABLEDIALOGADDBUTTON,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2573
## wxID_EDITVARIABLEDIALOGDELETEBUTTON, wxID_EDITVARIABLEDIALOGUPBUTTON, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2574
## wxID_EDITVARIABLEDIALOGDOWNBUTTON, wxID_EDITVARIABLEDIALOGSTATICTEXT1, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2575
## wxID_EDITVARIABLEDIALOGSTATICTEXT2, wxID_EDITVARIABLEDIALOGSTATICTEXT3,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2576
##] = [wx.NewId() for _init_ctrls in range(12)]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2577
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2578
##class EditVariableDialog(wx.Dialog):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2579
##    def _init_coll_flexGridSizer1_Items(self, parent):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2580
##        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2581
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2582
##        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2583
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2584
##    def _init_sizers(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2585
##        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2586
##        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2587
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2588
##        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2589
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2590
##        self.SetSizer(self.flexGridSizer1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2591
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2592
##    def _init_ctrls(self, prnt, name):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2593
##        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2594
##        wx.Dialog.__init__(self, id=wxID_EDITVARIABLEDIALOG,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2595
##              name='EditVariableDialog', parent=prnt, pos=wx.Point(376, 223),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2596
##              size=wx.Size(600, 440), style=wx.DEFAULT_DIALOG_STYLE,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2597
##              title='Edit variables of %s'%name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2598
##        self.SetClientSize(wx.Size(600, 440))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2599
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2600
##        self.MainPanel = wx.Panel(id=wxID_EDITVARIABLEDIALOGMAINPANEL,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2601
##              name='MainPanel', parent=self, pos=wx.Point(0, 0),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2602
##              size=wx.Size(600, 440), style=wx.TAB_TRAVERSAL)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2603
##        self.MainPanel.SetAutoLayout(True)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2604
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2605
##        self.staticText1 = wx.StaticText(id=wxID_EDITVARIABLEDIALOGSTATICTEXT1,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2606
##              label='Return Type:', name='staticText1', parent=self.MainPanel,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2607
##              pos=wx.Point(24, 29), size=wx.Size(95, 17), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2608
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2609
##        self.ReturnType = wx.Choice(id=wxID_EDITVARIABLEDIALOGRETURNTYPE,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2610
##              name='ReturnType', parent=self.MainPanel, pos=wx.Point(124, 24),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2611
##              size=wx.Size(145, 24), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2612
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2613
##        self.staticText2 = wx.StaticText(id=wxID_EDITVARIABLEDIALOGSTATICTEXT2,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2614
##              label='Class Filter:', name='staticText2', parent=self.MainPanel,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2615
##              pos=wx.Point(324, 29), size=wx.Size(95, 17), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2616
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2617
##        self.ClassFilter = wx.Choice(id=wxID_EDITVARIABLEDIALOGCLASSFILTER,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2618
##              name='ClassFilter', parent=self.MainPanel, pos=wx.Point(424, 24),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2619
##              size=wx.Size(145, 24), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2620
##        EVT_CHOICE(self, wxID_EDITVARIABLEDIALOGCLASSFILTER, self.OnClassFilter)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2621
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2622
##        self.staticText3 = wx.StaticText(id=wxID_EDITVARIABLEDIALOGSTATICTEXT3,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2623
##              label='Variables:', name='staticText3', parent=self.MainPanel,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2624
##              pos=wx.Point(24, 60), size=wx.Size(95, 17), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2625
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2626
##        self.VariablesGrid = wx.grid.Grid(id=wxID_EDITVARIABLEDIALOGVARIABLESGRID,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2627
##              name='VariablesGrid', parent=self.MainPanel, pos=wx.Point(24, 80), 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2628
##              size=wx.Size(550, 250), style=wxVSCROLL)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2629
##        self.VariablesGrid.SetFont(wx.Font(12, 77, wx.NORMAL, wx.NORMAL, False,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2630
##              'Sans'))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2631
##        self.VariablesGrid.SetLabelFont(wx.Font(10, 77, wx.NORMAL, wx.NORMAL,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2632
##              False, 'Sans'))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2633
##        self.VariablesGrid.DisableDragGridSize()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2634
##        self.VariablesGrid.EnableScrolling(False, True)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2635
##        self.VariablesGrid.Bind(wx.grid.EVT_GRID_CELL_CHANGE, self.OnVariablesGridCellChange)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2636
##        self.VariablesGrid.Bind(wx.grid.EVT_GRID_SELECT_CELL, self.OnVariablesGridSelectCell)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2637
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2638
##        self.AddButton = wx.Button(id=wxID_EDITVARIABLEDIALOGADDBUTTON, label='Add',
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2639
##              name='AddButton', parent=self.MainPanel, pos=wx.Point(345, 340),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2640
##              size=wx.Size(72, 32), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2641
##        EVT_BUTTON(self, wxID_EDITVARIABLEDIALOGADDBUTTON, self.OnAddButton)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2642
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2643
##        self.DeleteButton = wx.Button(id=wxID_EDITVARIABLEDIALOGDELETEBUTTON, label='Delete',
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2644
##              name='DeleteButton', parent=self.MainPanel, pos=wx.Point(425, 340),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2645
##              size=wx.Size(72, 32), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2646
##        EVT_BUTTON(self, wxID_EDITVARIABLEDIALOGDELETEBUTTON, self.OnDeleteButton)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2647
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2648
##        self.UpButton = wx.Button(id=wxID_EDITVARIABLEDIALOGUPBUTTON, label='^',
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2649
##              name='UpButton', parent=self.MainPanel, pos=wx.Point(505, 340),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2650
##              size=wx.Size(32, 32), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2651
##        EVT_BUTTON(self, wxID_EDITVARIABLEDIALOGUPBUTTON, self.OnUpButton)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2652
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2653
##        self.DownButton = wx.Button(id=wxID_EDITVARIABLEDIALOGDOWNBUTTON, label='v',
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2654
##              name='DownButton', parent=self.MainPanel, pos=wx.Point(545, 340),
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2655
##              size=wx.Size(32, 32), style=0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2656
##        EVT_BUTTON(self, wxID_EDITVARIABLEDIALOGDOWNBUTTON, self.OnDownButton)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2657
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2658
##        self._init_sizers()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2659
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2660
##    def __init__(self, parent, name, pou_type, pou_is_used, filter = "All"):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2661
##        self._init_ctrls(parent, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2662
##        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2663
##        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2664
##        self.Filter = filter
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2665
##        self.PouIsUsed = pou_is_used
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2666
##        self.FilterChoices = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2667
##        self.FilterChoiceTransfer = {"All" : "All", "Interface" : "Interface", 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2668
##            "   Input" : "Input", "   Output" : "Output", "   InOut" : "InOut", 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2669
##            "   External" : "External", "Variables" : "Variables", "   Local" : "Local",
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2670
##            "   Temp" : "Temp", "Global" : "Global", "Access" : "Access"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2671
##        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2672
##        if pou_type:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2673
##            self.DefaultTypes = {"All" : "Local", "Interface" : "Input", "Variables" : "Local"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2674
##            self.DefaultValue = {"Name" : "", "Class" : "", "Type" : "INT", "Location" : "", "Initial Value" : "", "Retain" : "No", "Constant" : "No"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2675
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2676
##            self.DefaultTypes = {"All" : "Global"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2677
##            self.DefaultValue = {"Name" : "", "Class" : "", "Type" : "INT", "Location" : "", "Initial Value" : "", "Retain" : "No", "Constant" : "No"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2678
##        if not pou_type or pou_type == "program":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2679
##            self.Table = VariableTable(self, [], ["Name", "Class", "Type", "Location", "Initial Value", "Retain", "Constant"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2680
##            if pou_type:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2681
##                self.FilterChoices = ["All","Interface","   Input","   Output","   InOut","   External","Variables","   Local","   Temp","Global","Access"]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2682
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2683
##                self.FilterChoices = ["All","Global","Access"]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2684
##            self.ColSizes = [80, 70, 80, 80, 80, 60, 70]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2685
##            self.ColAlignements = [wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_CENTER, wxALIGN_CENTER]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2686
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2687
##            self.Table = VariableTable(self, [], ["Name", "Class", "Type", "Initial Value", "Retain", "Constant"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2688
##            self.FilterChoices = ["All","Interface","   Input","   Output","   InOut","   External","Variables","   Local","   Temp"]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2689
##            self.ColSizes = [120, 70, 80, 120, 60, 70]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2690
##            self.ColAlignements = [wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_LEFT, wxALIGN_CENTER, wxALIGN_CENTER]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2691
##        for choice in self.FilterChoices:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2692
##            self.ClassFilter.Append(choice)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2693
##        reverse_transfer = {}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2694
##        for filter, choice in self.FilterChoiceTransfer.items():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2695
##            reverse_transfer[choice] = filter
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2696
##        self.ClassFilter.SetStringSelection(reverse_transfer[self.Filter])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2697
##        self.RefreshTypeList()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2698
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2699
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2700
##        self.OptionList = "Yes,No"
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2701
##        self.TypeList = ",".join([value for value, parent in TypeHierarchy_list if not value.startswith("ANY")])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2702
##        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2703
##        if pou_type == "function":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2704
##            for value, parent in TypeHierarchy_list:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2705
##                if not value.startswith("ANY"):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2706
##                    self.ReturnType.Append(value)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2707
##            self.ReturnType.Enable(True)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2708
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2709
##            self.ReturnType.Enable(False)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2710
##            self.staticText2.Hide()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2711
##            self.ReturnType.Hide()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2712
##        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2713
##        self.VariablesGrid.SetTable(self.Table)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2714
##        self.VariablesGrid.SetRowLabelSize(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2715
##        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2716
##        self.Table.ResetView(self.VariablesGrid)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2717
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2718
##        self.PouNames = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2719
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2720
##        if self.PouIsUsed:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2721
##            wxCallAfter(self.WarningMessage, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2722
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2723
##        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2724
##    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2725
##    def WarningMessage(self, name):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2726
##        message = wxMessageDialog(self, "\"%s\" is used by one or more POUs. Its interface can't be changed!"%name, "WARNING", wxOK|wxICON_EXCLAMATION)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2727
##        message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2728
##        message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2729
##    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2730
##    def OnOK(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2731
##        self.VariablesGrid.SetGridCursor(0, 0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2732
##        error = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2733
##        if self.ReturnType.IsEnabled() and self.ReturnType.GetStringSelection() == "":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2734
##            error.append("Return Type")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2735
##        if len(error) > 0:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2736
##            text = ""
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2737
##            for i, item in enumerate(error):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2738
##                if i == 0:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2739
##                    text += item
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2740
##                elif i == len(error) - 1:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2741
##                    text += " and %s"%item
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2742
##                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2743
##                    text += ", %s"%item 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2744
##            message = wxMessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wxOK|wxICON_ERROR)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2745
##            message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2746
##            message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2747
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2748
##            self.EndModal(wxID_OK)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2749
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2750
##    def OnClassFilter(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2751
##        self.Filter = self.FilterChoiceTransfer[self.ClassFilter.GetStringSelection()]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2752
##        self.RefreshTypeList()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2753
##        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2754
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2755
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2756
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2757
##    def RefreshTypeList(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2758
##        if self.Filter == "All":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2759
##            self.ClassList = [self.FilterChoiceTransfer[choice] for choice in self.FilterChoices if self.FilterChoiceTransfer[choice] not in ["All","Interface","Variables"]]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2760
##        elif self.Filter == "Interface":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2761
##            self.ClassList = ["Input","Output","InOut","External"]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2762
##        elif self.Filter == "Variables":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2763
##            self.ClassList = ["Local","Temp"]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2764
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2765
##            self.ClassList = [self.Filter]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2766
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2767
##    def RefreshButtons(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2768
##        table_length = len(self.Table.data)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2769
##        row_class = None
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2770
##        if table_length and self.PouIsUsed:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2771
##            row = self.VariablesGrid.GetGridCursorRow()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2772
##            row_class = self.Table.GetValueByName(row, "Class")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2773
##        self.AddButton.Enable(not self.PouIsUsed or self.Filter not in ["Interface", "Input", "Output", "InOut"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2774
##        self.DeleteButton.Enable(table_length > 0 and row_class not in ["Input", "Output", "InOut"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2775
##        self.UpButton.Enable(table_length > 0 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2776
##        self.DownButton.Enable(table_length > 0 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2777
##    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2778
##    def OnAddButton(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2779
##        new_row = self.DefaultValue.copy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2780
##        if self.Filter in self.DefaultTypes:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2781
##            new_row["Class"] = self.DefaultTypes[self.Filter]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2782
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2783
##            new_row["Class"] = self.Filter
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2784
##        self.Values.append(new_row)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2785
##        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2786
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2787
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2788
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2789
##    def OnDeleteButton(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2790
##        row = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2791
##        self.Values.remove(row)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2792
##        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2793
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2794
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2795
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2796
##    def OnUpButton(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2797
##        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), -1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2798
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2799
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2800
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2801
##    def OnDownButton(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2802
##        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), 1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2803
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2804
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2805
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2806
##    def OnVariablesGridCellChange(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2807
##        row, col = event.GetRow(), event.GetCol()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2808
##        colname = self.Table.GetColLabelValue(col)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2809
##        value = self.Table.GetValue(row, col)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2810
##        if colname == "Name":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2811
##            if not TestIdentifier(value):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2812
##                message = wxMessageDialog(self, "\"%s\" is not a valid identifier!"%value, "Error", wxOK|wxICON_ERROR)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2813
##                message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2814
##                message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2815
##                event.Veto()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2816
##            elif value.upper() in IEC_KEYWORDS:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2817
##                message = wxMessageDialog(self, "\"%s\" is a keyword. It can't be used!"%value, "Error", wxOK|wxICON_ERROR)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2818
##                message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2819
##                message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2820
##                event.Veto()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2821
##            elif value.upper() in self.PouNames:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2822
##                message = wxMessageDialog(self, "A pou with \"%s\" as name exists!"%value, "Error", wxOK|wxICON_ERROR)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2823
##                message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2824
##                message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2825
##                event.Veto()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2826
##            elif value.upper() in [var["Name"].upper() for var in self.Values if var != self.Table.data[row]]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2827
##                message = wxMessageDialog(self, "A variable with \"%s\" as name exists in this pou!"%value, "Error", wxOK|wxICON_ERROR)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2828
##                message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2829
##                message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2830
##                event.Veto()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2831
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2832
##                event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2833
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2834
##            event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2835
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2836
##    def OnVariablesGridSelectCell(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2837
##        wxCallAfter(self.RefreshButtons)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2838
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2839
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2840
##    def SetPouNames(self, pou_names):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2841
##        self.PouNames = [pou_name.upper() for pou_name in pou_names]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2842
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2843
##    def SetValues(self, values):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2844
##        for item, value in values.items():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2845
##            if item == "returnType" and value and self.ReturnType.IsEnabled():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2846
##                self.ReturnType.SetStringSelection(value)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2847
##            if item == "data":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2848
##                self.Values = value
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2849
##        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2850
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2851
##    def MoveValue(self, value_index, move):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2852
##        new_index = max(0, min(value_index + move, len(self.Values) - 1))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2853
##        if new_index != value_index:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2854
##            self.Values.insert(new_index, self.Values.pop(value_index))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2855
##            self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2856
##            self.VariablesGrid.SetGridCursor(new_index, self.VariablesGrid.GetGridCursorCol())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2857
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2858
##            self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2859
##    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2860
##    def RefreshValues(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2861
##        if len(self.Table.data) > 0:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2862
##            self.VariablesGrid.SetGridCursor(0, 0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2863
##        data = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2864
##        for variable in self.Values:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2865
##            if variable["Class"] in self.ClassList:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2866
##                data.append(variable)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2867
##        self.Table.SetData(data)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2868
##        self.Table.ResetView(self.VariablesGrid)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2869
##                
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2870
##    def GetValues(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2871
##        values = {}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2872
##        if self.ReturnType.IsEnabled():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2873
##            values["returnType"] = self.ReturnType.GetStringSelection()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2874
##        values["data"] = self.Values
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2875
##        return values
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2876
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2877
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2878
#                               Exception Handler
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2879
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2880
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2881
Max_Traceback_List_Size = 20
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2882
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2883
def Display_Exception_Dialog(e_type,e_value,e_tb):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2884
    trcbck_lst = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2885
    for i,line in enumerate(traceback.extract_tb(e_tb)):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2886
        trcbck = " " + str(i+1) + ". "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2887
        if line[0].find(os.getcwd()) == -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2888
            trcbck += "file : " + str(line[0]) + ",   "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2889
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2890
            trcbck += "file : " + str(line[0][len(os.getcwd()):]) + ",   "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2891
        trcbck += "line : " + str(line[1]) + ",   " + "function : " + str(line[2])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2892
        trcbck_lst.append(trcbck)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2893
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2894
    # Allow clicking....
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2895
    cap = wx.Window_GetCapture()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2896
    if cap:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2897
        cap.ReleaseMouse()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2898
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2899
    dlg = wx.SingleChoiceDialog(None, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2900
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2901
An error happens.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2902
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2903
Click on OK for saving an error report.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2904
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2905
Please contact LOLITech at:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2906
+33 (0)3 29 52 95 67
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2907
bugs_PLCOpenEditor@lolitech.fr
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2908
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2909
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2910
Error:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2911
""" +
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2912
        str(e_type) + " : " + str(e_value), 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2913
        "Error",
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2914
        trcbck_lst)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2915
    try:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2916
        res = (dlg.ShowModal() == wx.ID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2917
    finally:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2918
        dlg.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2919
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2920
    return res
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2921
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2922
def Display_Error_Dialog(e_value):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2923
    message = wxMessageDialog(None, str(e_value), "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2924
    message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2925
    message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2926
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2927
def get_last_traceback(tb):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2928
    while tb.tb_next:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2929
        tb = tb.tb_next
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2930
    return tb
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2931
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2932
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2933
def format_namespace(d, indent='    '):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2934
    return '\n'.join(['%s%s: %s' % (indent, k, repr(v)[:10000]) for k, v in d.iteritems()])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2935
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2936
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2937
ignored_exceptions = [] # a problem with a line in a module is only reported once per session
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2938
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2939
def wxAddExceptHook(path, app_version='[No version]'):#, ignored_exceptions=[]):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2940
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2941
    def handle_exception(e_type, e_value, e_traceback):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2942
        traceback.print_exception(e_type, e_value, e_traceback) # this is very helpful when there's an exception in the rest of this func
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2943
        last_tb = get_last_traceback(e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2944
        ex = (last_tb.tb_frame.f_code.co_filename, last_tb.tb_frame.f_lineno)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2945
        if str(e_value).startswith("!!!"):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2946
            Display_Error_Dialog(e_value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2947
        elif ex not in ignored_exceptions:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2948
            result = Display_Exception_Dialog(e_type,e_value,e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2949
            if result:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2950
                ignored_exceptions.append(ex)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2951
                info = {
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2952
                    'app-title' : wx.GetApp().GetAppName(), # app_title
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2953
                    'app-version' : app_version,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2954
                    'wx-version' : wx.VERSION_STRING,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2955
                    'wx-platform' : wx.Platform,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2956
                    'python-version' : platform.python_version(), #sys.version.split()[0],
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2957
                    'platform' : platform.platform(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2958
                    'e-type' : e_type,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2959
                    'e-value' : e_value,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2960
                    'date' : time.ctime(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2961
                    'cwd' : os.getcwd(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2962
                    }
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2963
                if e_traceback:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2964
                    info['traceback'] = ''.join(traceback.format_tb(e_traceback)) + '%s: %s' % (e_type, e_value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2965
                    last_tb = get_last_traceback(e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2966
                    exception_locals = last_tb.tb_frame.f_locals # the locals at the level of the stack trace where the exception actually occurred
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2967
                    info['locals'] = format_namespace(exception_locals)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2968
                    if 'self' in exception_locals:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2969
                        info['self'] = format_namespace(exception_locals['self'].__dict__)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2970
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2971
                output = open(path+os.sep+"bug_report_"+info['date'].replace(':','-').replace(' ','_')+".txt",'w')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2972
                lst = info.keys()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2973
                lst.sort()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2974
                for a in lst:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2975
                    output.write(a+":\n"+str(info[a])+"\n\n")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2976
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2977
    #sys.excepthook = lambda *args: wx.CallAfter(handle_exception, *args)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2978
    sys.excepthook = handle_exception
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2979
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2980
if __name__ == '__main__':
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2981
    app = wxPySimpleApp()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2982
    wxInitAllImageHandlers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2983
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2984
    # Install a exception handle for bug reports
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2985
    wxAddExceptHook(os.getcwd(),__version__)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2986
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2987
    frame = PLCOpenEditor(None)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2988
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2989
    frame.Show()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2990
    app.MainLoop()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2991