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