PLCOpenEditor.py
author etisserant
Wed, 25 Jul 2007 10:06:29 +0200
changeset 55 e24d2f917c7e
parent 54 6688829ce624
child 56 7187e1c00975
permissions -rw-r--r--
Removed used POU warning crash
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)
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
   793
            if block_type != "program":
54
6688829ce624 *** empty log message ***
lbessard
parents: 53
diff changeset
   794
                data = wxTextDataObject(str((block_name, block_type, "")))
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
   795
                dragSource = wxDropSource(self.ProjectTree)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
   796
                dragSource.SetData(data)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
   797
                dragSource.DoDragDrop()
7
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
   798
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   799
    def OnProjectTreeItemEndEdit(self, event):
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   800
        message = None
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   801
        abort = False
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   802
        new_name = event.GetLabel()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   803
        if new_name != "":
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   804
            if not TestIdentifier(new_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   805
                message = "\"%s\" is not a valid identifier!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   806
            elif new_name.upper() in IEC_KEYWORDS:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   807
                message = "\"%s\" is a keyword. It can't be used!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   808
            else:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   809
                item = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   810
                itemtype = self.ProjectTree.GetPyData(item)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   811
                if itemtype == ITEM_PROJECT:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   812
                    self.Controler.SetProjectName(new_name)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   813
                elif itemtype == ITEM_POU:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   814
                    if new_name.upper() in self.Controler.GetProjectPouNames():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   815
                        message = "\"%s\" pou already exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   816
                        abort = True
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   817
                    elif new_name.upper() in self.Controler.GetProjectPouVariables():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   818
                        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
   819
                        if messageDialog.ShowModal() == wxID_NO:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   820
                            abort = True
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   821
                        messageDialog.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   822
                    if not abort:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   823
                        old_name = self.ProjectTree.GetItemText(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   824
                        self.Controler.ChangePouName(old_name, new_name)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   825
                        self.RefreshTabsOpenedTitles()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   826
                elif itemtype == ITEM_TRANSITION:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   827
                    category = self.ProjectTree.GetItemParent(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   828
                    pou = self.ProjectTree.GetItemParent(category)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   829
                    pou_name = self.ProjectTree.GetItemText(pou)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   830
                    if new_name.upper() in self.Controler.GetProjectPouNames():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   831
                        message = "A pou with \"%s\" as name exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   832
                    elif new_name.upper() in self.Controler.GetProjectPouVariables(pou_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   833
                        message = "A variable with \"%s\" as name already exists in this pou!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   834
                    else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   835
                        old_name = self.ProjectTree.GetItemText(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   836
                        self.Controler.ChangePouTransitionName(pou_name, old_name, new_name)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   837
                        self.RefreshTabsOpenedTitles()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   838
                elif itemtype == ITEM_ACTION:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   839
                    category = self.ProjectTree.GetItemParent(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   840
                    pou = self.ProjectTree.GetItemParent(category)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   841
                    pou_name = self.ProjectTree.GetItemText(pou)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   842
                    if new_name.upper() in self.Controler.GetProjectPouNames():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   843
                        message = "A pou with \"%s\" as name exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   844
                    elif new_name.upper() in self.Controler.GetProjectPouVariables(pou_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   845
                        message = "A variable with \"%s\" as name already exists in this pou!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   846
                    else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   847
                        old_name = self.ProjectTree.GetItemText(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   848
                        self.Controler.ChangePouActionName(pou_name, old_name, new_name)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   849
                        self.RefreshTabsOpenedTitles()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   850
                elif itemtype == ITEM_VARIABLE:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   851
                    category = self.ProjectTree.GetItemParent(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   852
                    if self.ProjectTree.GetItemText(category) != 'Global':
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   853
                        category = self.ProjectTree.GetItemParent(category)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   854
                    pou = self.ProjectTree.GetItemParent(category)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   855
                    pou_name = self.ProjectTree.GetItemText(pou)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   856
                    if new_name.upper() in self.Controler.GetProjectPouNames():
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   857
                        message = "A pou with \"%s\" as name exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   858
                    elif new_name.upper() in self.Controler.GetProjectPouVariables(pou_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   859
                        message = "A variable with \"%s\" as name already exists in this pou!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   860
                    else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   861
                        old_name = self.ProjectTree.GetItemText(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   862
                        self.Controler.ChangePouVariableName(pou_name, old_name, new_name)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   863
                        self.RefreshTabsOpenedTitles()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   864
            if message or abort:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   865
                if message:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   866
                    messageDialog = wxMessageDialog(self, message, "Error", wxOK|wxICON_ERROR)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   867
                    messageDialog.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   868
                    messageDialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   869
                item = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   870
                wxCallAfter(self.ProjectTree.EditLabel, item)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   871
                event.Veto()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   872
            else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   873
                wxCallAfter(self.RefreshProjectTree)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   874
                event.Skip()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   875
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   876
    def OnProjectTreeItemBeginEdit(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   877
        selected = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   878
        if self.ProjectTree.GetPyData(selected) == ITEM_UNEDITABLE:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   879
            event.Veto()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   880
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   881
            event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   882
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   883
    def OnProjectTreeItemActivated(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   884
        selected = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   885
        if self.ProjectTree.IsExpanded(selected):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   886
            self.ProjectTree.Collapse(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   887
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   888
            self.ProjectTree.Expand(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   889
        name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   890
        data = self.ProjectTree.GetPyData(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   891
        if name == "Properties":
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   892
            self.ShowProperties()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   893
##        elif data == ITEM_CLASS:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   894
##            item = self.ProjectTree.GetItemParent(selected)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   895
##            item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   896
##            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
   897
##                item = self.ProjectTree.GetItemParent(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   898
##                item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   899
##            item_name = self.ProjectTree.GetItemText(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   900
##            if item_type == ITEM_POU:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   901
##                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
   902
##                dialog.SetPouNames(self.Controler.GetProjectPouNames())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   903
##                values = {}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   904
##                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
   905
##                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
   906
##                dialog.SetValues(values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   907
##                if dialog.ShowModal() == wxID_OK:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   908
##                    new_values = dialog.GetValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   909
##                    if "returnType" in new_values:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   910
##                        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
   911
##                    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
   912
##                    pou_names = self.Controler.GetElementsOpenedNames()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   913
##                    if item_name in pou_names:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   914
##                        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
   915
##                        if isinstance(window, TextViewer):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   916
##                            varlist = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   917
##                            if "returnType" in new_values:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   918
##                                varlist.append(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   919
##                            for var in new_values["data"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   920
##                                varlist.append(var["Name"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   921
##                            window.SetVariables(varlist)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   922
##                dialog.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   923
##                self.RefreshProjectTree()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   924
##            elif item_type == ITEM_CONFIGURATION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   925
##                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
   926
##                dialog.SetPouNames(self.Controler.GetProjectPouNames())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   927
##                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
   928
##                dialog.SetValues(values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   929
##                if dialog.ShowModal() == wxID_OK:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   930
##                    new_values = dialog.GetValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   931
##                    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
   932
##                dialog.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   933
##                self.RefreshProjectTree()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   934
##            elif item_type == ITEM_RESOURCE:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   935
##                config = self.ProjectTree.GetItemParent(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   936
##                config_type = self.ProjectTree.GetPyData(config)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   937
##                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
   938
##                    config = self.ProjectTree.GetItemParent(config)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   939
##                    config_type = self.ProjectTree.GetPyData(config)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   940
##                if config.IsOk():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   941
##                    config_name = self.ProjectTree.GetItemText(config)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   942
##                    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
   943
##                    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
   944
##                    dialog.SetValues(values)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   945
##                    if dialog.ShowModal() == wxID_OK:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   946
##                        new_values = dialog.GetValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   947
##                        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
   948
##                    dialog.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   949
##                    self.RefreshProjectTree()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   950
##        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
   951
##            if data == ITEM_POU:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   952
##                idx = self.Controler.OpenElementEditing(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   953
##                language = self.Controler.GetPouBodyType(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   954
##                varlist = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   955
##                returnType = self.Controler.GetPouInterfaceReturnTypeByName(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   956
##                if returnType:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   957
##                    varlist.append(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   958
##                vars = self.Controler.GetPouInterfaceVarsByName(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   959
##                if vars:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   960
##                    for var in vars:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   961
##                        varlist.append(var["Name"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   962
##                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
   963
##                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
   964
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   965
##                parent = self.ProjectTree.GetItemParent(selected)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   966
##                parent_name = self.ProjectTree.GetItemText(parent)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   967
##                grandparent = self.ProjectTree.GetItemParent(parent)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   968
##                grandparent_name = self.ProjectTree.GetItemText(grandparent)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   969
##                if data == ITEM_TRANSITION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   970
##                    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
   971
##                    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
   972
##                elif data == ITEM_ACTION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   973
##                    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
   974
##                    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
   975
##                varlist = [name]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   976
##                vars = self.Controler.GetPouInterfaceVarsByName(grandparent_name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   977
##                if vars:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   978
##                    for var in vars:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   979
##                        varlist.append(var["Name"])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   980
##                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
   981
##                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
   982
##            if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   983
##                if language == "FBD":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   984
##                    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
   985
##                elif language == "LD":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   986
##                    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
   987
##                elif language == "SFC":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   988
##                    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
   989
##                elif language in ["IL", "ST"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   990
##                    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
   991
##                    new_window.SetTextSyntax(language)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   992
##                    if language == "IL":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   993
##                        new_window.SetKeywords(IL_KEYWORDS)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   994
##                    else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   995
##                        new_window.SetKeywords(ST_KEYWORDS)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   996
##                    new_window.SetVariables(varlist)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   997
##                    new_window.SetFunctions(self.Controler.GetBlockTypes())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   998
##                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   999
##                    return
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1000
##                new_window.RefreshView()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1001
##                self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1002
##                self.TabsOpened.SetSelection(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1003
##                self.RefreshTabsOpenedTitles()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1004
##                self.RefreshFileMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1005
##                self.RefreshEditMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1006
##                self.RefreshToolBar()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1007
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1008
##                if data == ITEM_POU:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1009
##                    idx = self.Controler.ChangeElementEditing(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1010
##                elif data == ITEM_TRANSITION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1011
##                    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
  1012
##                elif data == ITEM_ACTION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1013
##                    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
  1014
##                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1015
##                    self.TabsOpened.SetSelection(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1016
##                    self.RefreshFileMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1017
##                    self.RefreshEditMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1018
##                    self.RefreshToolBar()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1019
##        elif data == ITEM_RESOURCE:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1020
##            item = self.ProjectTree.GetItemParent(selected)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1021
##            item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1022
##            while item_type != ITEM_CONFIGURATION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1023
##                item = self.ProjectTree.GetItemParent(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1024
##                item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1025
##            config_name = self.ProjectTree.GetItemText(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1026
##            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
  1027
##            if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1028
##                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
  1029
##                new_window.RefreshView()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1030
##                self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1031
##                self.TabsOpened.SetSelection(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1032
##                self.RefreshTabsOpenedTitles()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1033
##                self.RefreshFileMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1034
##                self.RefreshEditMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1035
##                self.RefreshToolBar()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1036
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1037
##                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
  1038
##                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1039
##                    self.TabsOpened.SetSelection(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1040
##                    self.RefreshFileMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1041
##                    self.RefreshEditMenu()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1042
##                    self.RefreshToolBar()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1043
        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
  1044
            if data == ITEM_CONFIGURATION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1045
                idx = self.Controler.OpenConfigurationEditing(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1046
                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1047
                    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
  1048
                    self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1049
                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1050
                    idx = self.Controler.ChangeConfigurationEditing(name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1051
            elif data == ITEM_RESOURCE:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1052
                item = self.ProjectTree.GetItemParent(selected)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1053
                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
  1054
                while item_type != ITEM_CONFIGURATION:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1055
                    item = self.ProjectTree.GetItemParent(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1056
                    item_type = self.ProjectTree.GetPyData(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1057
                config_name = self.ProjectTree.GetItemText(item)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1058
                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
  1059
                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1060
                    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
  1061
                    self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1062
                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1063
                    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
  1064
            elif data == ITEM_POU:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1065
                idx = self.Controler.OpenElementEditing(name)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1066
                if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1067
                    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
  1068
                    self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1069
                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1070
                    idx = self.Controler.ChangeElementEditing(name)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1071
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1072
                parent = self.ProjectTree.GetItemParent(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1073
                parent_name = self.ProjectTree.GetItemText(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1074
                grandparent = self.ProjectTree.GetItemParent(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1075
                grandparent_name = self.ProjectTree.GetItemText(grandparent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1076
                if data == ITEM_TRANSITION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1077
                    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
  1078
                    if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1079
                        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
  1080
                        self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1081
                    else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1082
                        idx = self.Controler.ChangePouTransitionEditing(grandparent_name, name)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1083
                elif data == ITEM_ACTION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1084
                    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
  1085
                    if idx != None:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1086
                        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
  1087
                        self.TabsOpened.AddPage(new_window, "")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1088
                    else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1089
                        idx = self.Controler.ChangePouActionEditing(grandparent_name, name)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1090
            if idx != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1091
                self.TabsOpened.SetSelection(idx)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1092
                window = self.TabsOpened.GetPage(idx)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1093
                window.RefreshView()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1094
                self.RefreshTabsOpenedTitles()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1095
                self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1096
                self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1097
                self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1098
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1099
    def OnProjectTreeRightUp(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1100
        selected = self.ProjectTree.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1101
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1102
            name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1103
            if self.Controler.GetPouBodyType(name) == "SFC":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1104
                self.PopupMenu(self.SFCMenu)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1105
        elif self.ProjectTree.GetPyData(selected) == ITEM_CONFIGURATION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1106
            self.PopupMenu(self.ConfigMenu)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1107
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1108
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1109
    def OnProjectTreeItemSelected(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1110
        selected = event.GetItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1111
        name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1112
        if self.ProjectTree.GetItemParent(selected) == self.ProjectTree.GetRootItem() and name != "Properties":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1113
            if self.Controler.IsElementEditing(name):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1114
                idx = self.Controler.ChangeElementEditing(name)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1115
                if idx != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1116
                    self.TabsOpened.SetSelection(idx)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1117
                    self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1118
                    self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1119
                    self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1120
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1121
            name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1122
            parent = self.ProjectTree.GetItemParent(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1123
            parent_name = self.ProjectTree.GetItemText(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1124
            grandparent = self.ProjectTree.GetItemParent(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1125
            grandparent_name = self.ProjectTree.GetItemText(grandparent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1126
            if parent_name == "Transitions":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1127
                idx = self.Controler.ChangePouTransitionEditing(grandparent_name, name)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1128
                if idx != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1129
                    self.TabsOpened.SetSelection(idx)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1130
                    self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1131
                    self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1132
                    self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1133
            elif parent_name == "Action":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1134
                idx = self.Controler.ChangePouActionEditing(grandparent_name, name)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1135
                if idx != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1136
                    self.TabsOpened.SetSelection(idx)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1137
                    self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1138
                    self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1139
                    self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1140
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1141
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1142
    def RefreshProjectTree(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1143
        infos = self.Controler.GetProjectInfos()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1144
        root = self.ProjectTree.GetRootItem()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1145
        self.GenerateTreeBranch(root, infos)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1146
        self.ProjectTree.Expand(self.ProjectTree.GetRootItem())
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1147
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1148
    def GenerateTreeBranch(self, root, infos):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1149
        to_delete = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1150
        if root.IsOk():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1151
            self.ProjectTree.SetItemText(root, infos["name"])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1152
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1153
            root = self.ProjectTree.AddRoot(infos["name"])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1154
        self.ProjectTree.SetPyData(root, infos["type"])
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1155
        if infos["type"] == ITEM_POU:
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1156
            self.ProjectTree.SetItemImage(root, LANGUAGES.index(self.Controler.GetPouBodyType(infos["name"])))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1157
        item, root_cookie = self.ProjectTree.GetFirstChild(root)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1158
        if len(infos["values"]) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1159
            for values in infos["values"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1160
                if not item.IsOk():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1161
                    item = self.ProjectTree.AppendItem(root, "")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1162
                    item, root_cookie = self.ProjectTree.GetNextChild(root, root_cookie)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1163
                self.GenerateTreeBranch(item, values)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1164
                item, root_cookie = self.ProjectTree.GetNextChild(root, root_cookie)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1165
        while item.IsOk():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1166
            to_delete.append(item)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1167
            item, root_cookie = self.ProjectTree.GetNextChild(root, root_cookie)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1168
        for item in to_delete:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1169
            self.ProjectTree.Delete(item)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1170
    
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1171
    def ResetToolBar(self):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1172
        for item in self.CurrentToolBar:
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1173
            self.Unbind(wx.EVT_MENU, id=item)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1174
            self.ToolBar.DeleteTool(item)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1175
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1176
    def RefreshToolBar(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1177
        language = self.Controler.GetCurrentElementEditingBodyType()
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1178
        if language and language != self.CurrentLanguage:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1179
            self.ResetToolBar()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1180
            self.CurrentLanguage = language
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1181
            self.CurrentToolBar = []
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1182
            for radio, modes, id, method, picture, help in ToolBarItems[language]:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1183
                if modes & self.DrawingMode:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1184
                    if radio or self.DrawingMode == FREEDRAWING_MODE:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1185
                        self.ToolBar.AddRadioTool(id, wxBitmap(os.path.join(CWD, picture)), wxNullBitmap, help)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1186
                    else:
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1187
                        self.ToolBar.AddSimpleTool(id, wxBitmap(os.path.join(CWD, picture)), help)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1188
                    self.Bind(wx.EVT_TOOL, getattr(self, method), id=id)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1189
                    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
  1190
        self.ResetCurrentMode()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1191
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1192
    def RefreshTabsOpenedTitles(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1193
        pous = self.Controler.GetElementsOpenedNames()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1194
        for i, pou in enumerate(pous):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1195
            self.TabsOpened.SetPageText(i, pou)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1196
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1197
    def OnRefreshMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1198
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1199
        if selected != -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1200
            self.TabsOpened.GetPage(selected).Refresh()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1201
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1202
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1203
    def OnCutMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1204
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1205
        if selected != -1:
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1206
            try:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1207
                self.TabsOpened.GetPage(selected).Viewer.Cut()
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1208
            except:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1209
                pass
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1210
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1211
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1212
    def OnCopyMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1213
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1214
        if selected != -1:
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1215
            try:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1216
                self.TabsOpened.GetPage(selected).Viewer.Copy()
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1217
            except:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1218
                pass
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1219
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1220
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1221
    def OnPasteMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1222
        selected = self.TabsOpened.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1223
        if selected != -1:
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1224
            try:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1225
                self.TabsOpened.GetPage(selected).Viewer.Paste()
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1226
            except:
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  1227
                pass
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1228
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1229
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1230
    def OnAddPouMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1231
        dialog = PouDialog(self)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1232
        dialog.SetPouNames(self.Controler.GetProjectPouNames())
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1233
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1234
            values = dialog.GetValues()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1235
            self.Controler.ProjectAddPou(values["pouName"], values["pouType"], values["language"])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1236
            self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1237
        dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1238
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1239
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1240
    def OnRemovePouMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1241
        pous = self.Controler.GetProjectPouNames()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1242
        dialog = wxSingleChoiceDialog(self, "Select POU to remove:", "POU Remove", pous, wxOK|wxCANCEL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1243
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1244
            selected = dialog.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1245
            if not self.Controler.PouIsUsed(selected):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1246
                self.Controler.ProjectRemovePou(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1247
                for i in xrange(self.TabsOpened.GetPageCount()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1248
                    if self.TabsOpened.GetPageText(i) == selected:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1249
                        self.TabsOpened.DeletePage(i)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1250
                self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1251
                self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1252
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1253
                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
  1254
                message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1255
                message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1256
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1257
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1258
    def OnAddConfigurationMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1259
        dialog = wxTextEntryDialog(self, "Enter configuration name:", "Create new configuration", "", wxOK|wxCANCEL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1260
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1261
            value = dialog.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1262
            self.Controler.ProjectAddConfiguration(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1263
            self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1264
        dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1265
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1266
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1267
    def OnRemoveConfigurationMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1268
        configs = self.Controler.GetProjectConfigNames()
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1269
        dialog = wxSingleChoiceDialog(self, "Select Configuration to remove:", "Remove configuration", configs, wxOK|wxCANCEL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1270
        if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1271
            selected = dialog.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1272
            self.Controler.ProjectRemoveConfiguration(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1273
            self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1274
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1275
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1276
    def OnAddPouTransitionMenu(self, event):
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1277
        selected = self.ProjectTree.GetSelection()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1278
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1279
            pouname = self.ProjectTree.GetItemText(selected)
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1280
            if self.Controler.GetPouBodyType(pouname) == "SFC":
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1281
                dialog = PouTransitionDialog(self)
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1282
                if dialog.ShowModal() == wxID_OK: 
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1283
                    values = dialog.GetValues()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1284
                    self.Controler.ProjectAddPouTransition(pouname, values["transitionName"], values["language"])
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1285
                    self.RefreshProjectTree()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1286
                dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1287
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1288
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1289
    def OnRemovePouTransitionMenu(self, event):
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1290
        selected = self.ProjectTree.GetSelection()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1291
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1292
            pouname = self.ProjectTree.GetItemText(selected)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1293
            if self.Controler.GetPouBodyType(pouname) == "SFC":
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1294
                transitions = self.Controler.GetPouTransitions(pouname)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1295
                dialog = wxSingleChoiceDialog(self, "Select Transition to remove:", "Remove transition", transitions, wxOK|wxCANCEL)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1296
                if dialog.ShowModal() == wxID_OK: 
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1297
                    selected = dialog.GetStringSelection()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1298
                    self.Controler.ProjectRemovePouTransition(pouname, selected)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1299
                    self.RefreshProjectTree()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1300
                dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1301
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1302
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1303
    def OnAddPouActionMenu(self, event):
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1304
        selected = self.ProjectTree.GetSelection()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1305
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1306
            pouname = self.ProjectTree.GetItemText(selected)
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1307
            if self.Controler.GetPouBodyType(pouname) == "SFC":
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1308
                dialog = PouActionDialog(self)
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1309
                if dialog.ShowModal() == wxID_OK:
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1310
                    values = dialog.GetValues()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1311
                    self.Controler.ProjectAddPouAction(pouname, values["actionName"], values["language"])
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1312
                    self.RefreshProjectTree()
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1313
                dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1314
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1315
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1316
    def OnRemovePouActionMenu(self, event):
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1317
        selected = self.ProjectTree.GetSelection()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1318
        if self.ProjectTree.GetPyData(selected) == ITEM_POU:
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1319
            pouname = self.ProjectTree.GetItemText(selected)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1320
            if self.Controler.GetPouBodyType(pouname) == "SFC":
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1321
                actions = self.Controler.GetPouActions(pouname)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1322
                dialog = wxSingleChoiceDialog(self, "Select Action to remove:", "Remove action", actions, wxOK|wxCANCEL)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1323
                if dialog.ShowModal() == wxID_OK: 
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1324
                    selected = dialog.GetStringSelection()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1325
                    self.Controler.ProjectRemovePouAction(pouname, selected)
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1326
                    self.RefreshProjectTree()
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1327
                dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1328
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1329
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1330
    def OnAddResourceMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1331
        selected = self.ProjectTree.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1332
        if self.ProjectTree.GetPyData(selected) == ITEM_CONFIGURATION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1333
            config_name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1334
            dialog = wxTextEntryDialog(self, "Enter Resource name:", "Create new Resource", "", wxOK|wxCANCEL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1335
            if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1336
                value = dialog.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1337
                self.Controler.ProjectAddConfigurationResource(config_name, value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1338
                self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1339
            dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1340
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1341
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1342
    def OnRemoveResourceMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1343
        selected = self.ProjectTree.GetSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1344
        if self.ProjectTree.GetPyData(selected) == ITEM_CONFIGURATION:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1345
            config_name = self.ProjectTree.GetItemText(selected)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1346
            infos = self.Controler.GetProjectInfos()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1347
            resources = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1348
            for config in infos["configs"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1349
                if config["name"] == config_name:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1350
                    resources = config["resources"]
46
4379e98a30aa Bug on SFC generation fixed
lbessard
parents: 45
diff changeset
  1351
            dialog = wxSingleChoiceDialog(self, "Select Resource to remove:", "Remove resource", resources, wxOK|wxCANCEL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1352
            if dialog.ShowModal() == wxID_OK:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1353
                resource = dialog.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1354
                self.Controler.ProjectRemoveConfigurationResource(config_name, resource)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1355
                self.RefreshProjectTree()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1356
            dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1357
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1358
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1359
    def OnPLCOpenMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1360
        result = OpenPDFDoc()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1361
        if type(result) == StringType:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1362
            message = wxMessageDialog(self, result, "ERROR", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1363
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1364
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1365
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1366
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1367
current_num = 0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1368
def GetNewNum():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1369
    global current_num
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1370
    current_num += 1
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1371
    return current_num
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1372
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1373
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1374
#                            Create Project Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1375
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1376
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1377
[wxID_PROJECTDIALOG, wxID_PROJECTDIALOGMAINPANEL, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1378
 wxID_PROJECTDIALOGPROJECTNAME, wxID_PROJECTDIALOGCOMPANYNAME, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1379
 wxID_PROJECTDIALOGCOMPANYURL, wxID_PROJECTDIALOGPRODUCTNAME, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1380
 wxID_PROJECTDIALOGPRODUCTVERSION, wxID_PROJECTDIALOGPRODUCTRELEASE, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1381
 wxID_PROJECTDIALOGCONTENTDESCRIPTION, wxID_PROJECTDIALOGSTATICTEXT1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1382
 wxID_PROJECTDIALOGSTATICTEXT2, wxID_PROJECTDIALOGSTATICTEXT3, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1383
 wxID_PROJECTDIALOGSTATICTEXT4, wxID_PROJECTDIALOGSTATICTEXT5, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1384
 wxID_PROJECTDIALOGSTATICTEXT6, wxID_PROJECTDIALOGSTATICTEXT7, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1385
] = [wx.NewId() for _init_ctrls in range(16)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1386
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1387
class ProjectDialog(wx.Dialog):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1388
    def _init_coll_flexGridSizer1_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1389
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1390
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1391
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1392
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1393
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1394
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1395
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1396
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1397
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1398
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1399
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1400
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1401
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1402
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1403
        wx.Dialog.__init__(self, id=wxID_PROJECTDIALOG,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1404
              name='ProjectDialog', parent=prnt, pos=wx.Point(376, 223),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1405
              size=wx.Size(550, 450), style=wx.DEFAULT_DIALOG_STYLE,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1406
              title='Create a new project')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1407
        self.SetClientSize(wx.Size(550, 450))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1408
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1409
        self.MainPanel = wx.Panel(id=wxID_PROJECTDIALOGMAINPANEL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1410
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1411
              size=wx.Size(450, 400), style=wx.TAB_TRAVERSAL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1412
        self.MainPanel.SetAutoLayout(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1413
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1414
        self.staticText1 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1415
              label='Project Name (required):', name='staticText1', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1416
              pos=wx.Point(24, 24), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1417
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1418
        self.ProjectName = wx.TextCtrl(id=wxID_PROJECTDIALOGPROJECTNAME,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1419
              name='ProjectName', parent=self.MainPanel, pos=wx.Point(224, 24), 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1420
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1421
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1422
        self.staticText2 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT2,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1423
              label='Company Name (required):', name='staticText2', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1424
              pos=wx.Point(24, 64), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1425
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1426
        self.CompanyName = wx.TextCtrl(id=wxID_PROJECTDIALOGCOMPANYNAME,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1427
              name='CompanyName', parent=self.MainPanel, pos=wx.Point(224, 64),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1428
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1429
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1430
        self.staticText3 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT3,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1431
              label='Company URL (optional):', name='staticText3', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1432
              pos=wx.Point(24, 104), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1433
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1434
        self.CompanyURL = wx.TextCtrl(id=wxID_PROJECTDIALOGCOMPANYURL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1435
              name='CompanyURL', parent=self.MainPanel, pos=wx.Point(224, 104),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1436
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1437
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1438
        self.staticText4 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT4,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1439
              label='Product Name (required):', name='staticText4', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1440
              pos=wx.Point(24, 144), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1441
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1442
        self.ProductName = wx.TextCtrl(id=wxID_PROJECTDIALOGPRODUCTNAME,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1443
              name='ProductName', parent=self.MainPanel, pos=wx.Point(224, 144),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1444
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1445
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1446
        self.staticText5 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT5,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1447
              label='Product Version (required):', name='staticText5', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1448
              pos=wx.Point(24, 184), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1449
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1450
        self.ProductVersion = wx.TextCtrl(id=wxID_PROJECTDIALOGPRODUCTVERSION,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1451
              name='ProductVersion', parent=self.MainPanel, pos=wx.Point(224, 184),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1452
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1453
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1454
        self.staticText6 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT6,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1455
              label='Product Release (optional):', name='staticText6', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1456
              pos=wx.Point(24, 224), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1457
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1458
        self.ProductRelease = wx.TextCtrl(id=wxID_PROJECTDIALOGPRODUCTRELEASE,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1459
              name='ProductRelease', parent=self.MainPanel, pos=wx.Point(224, 224),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1460
              size=wx.Size(295, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1461
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1462
        self.staticText7 = wx.StaticText(id=wxID_PROJECTDIALOGSTATICTEXT7,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1463
              label='Content Description (optional):', name='staticText7', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1464
              pos=wx.Point(24, 264), size=wx.Size(215, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1465
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1466
        self.ContentDescription = wx.TextCtrl(id=wxID_PROJECTDIALOGCONTENTDESCRIPTION,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1467
              name='ProductRelease', parent=self.MainPanel, pos=wx.Point(224, 264),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1468
              size=wx.Size(295, 120), style=wxTE_MULTILINE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1469
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1470
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1471
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1472
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1473
        self._init_ctrls(parent)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1474
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1475
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1476
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1477
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1478
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1479
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1480
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1481
        if self.ProjectName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1482
            error.append("Project Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1483
        if self.CompanyName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1484
            error.append("Company Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1485
        if self.ProductName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1486
            error.append("Product Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1487
        if self.ProductVersion.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1488
            error.append("Product Version")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1489
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1490
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1491
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1492
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1493
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1494
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1495
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1496
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1497
                    text += ", %s"%item 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1498
            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
  1499
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1500
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1501
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1502
            self.EndModal(wxID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1503
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1504
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1505
        for item, value in values.items():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1506
            if item == "projectName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1507
                self.ProjectName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1508
            elif item == "companyName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1509
                self.CompanyName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1510
            elif item == "companyURL":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1511
                self.CompanyURL.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1512
            elif item == "productName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1513
                self.ProductName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1514
            elif item == "productVersion":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1515
                self.ProductVersion.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1516
            elif item == "productRelease":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1517
                self.ProductRelease.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1518
            elif item == "contentDescription":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1519
                self.ContentDescription.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1520
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1521
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1522
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1523
        values["projectName"] = self.ProjectName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1524
        values["companyName"] = self.CompanyName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1525
        if self.CompanyURL.GetValue() != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1526
            values["companyURL"] = self.CompanyURL.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1527
        values["productName"] = self.ProductName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1528
        values["productVersion"] = self.ProductVersion.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1529
        if self.ProductRelease.GetValue() != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1530
            values["productRelease"] = self.ProductRelease.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1531
        if self.ProductRelease.GetValue() != None:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1532
            values["contentDescription"] = self.ContentDescription.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1533
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1534
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1535
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1536
#                            Create Pou Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1537
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1538
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1539
[wxID_POUDIALOG, wxID_POUDIALOGMAINPANEL, wxID_POUDIALOGPOUNAME, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1540
 wxID_POUDIALOGPOUTYPE, wxID_POUDIALOGLANGUAGE, wxID_POUDIALOGSTATICTEXT1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1541
 wxID_POUDIALOGSTATICTEXT2, wxID_POUDIALOGSTATICTEXT3, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1542
] = [wx.NewId() for _init_ctrls in range(8)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1543
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1544
class PouDialog(wx.Dialog):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1545
    def _init_coll_flexGridSizer1_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1546
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1547
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1548
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1549
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1550
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1551
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1552
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1553
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1554
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1555
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1556
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1557
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1558
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1559
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1560
        wx.Dialog.__init__(self, id=wxID_POUDIALOG,
16
20dcc0dce64b Bug on block properties dialog corrected
lbessard
parents: 13
diff changeset
  1561
              name='PouDialog', parent=prnt, pos=wx.Point(376, 223),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1562
              size=wx.Size(300, 200), style=wx.DEFAULT_DIALOG_STYLE,
16
20dcc0dce64b Bug on block properties dialog corrected
lbessard
parents: 13
diff changeset
  1563
              title='Create a new POU')
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1564
        self.SetClientSize(wx.Size(300, 200))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1565
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1566
        self.MainPanel = wx.Panel(id=wxID_POUDIALOGMAINPANEL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1567
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1568
              size=wx.Size(300, 200), style=wx.TAB_TRAVERSAL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1569
        self.MainPanel.SetAutoLayout(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1570
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1571
        self.staticText1 = wx.StaticText(id=wxID_POUDIALOGSTATICTEXT1,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1572
              label='POU Name:', name='staticText1', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1573
              pos=wx.Point(24, 24), size=wx.Size(95, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1574
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1575
        self.PouName = wx.TextCtrl(id=wxID_POUDIALOGPOUNAME,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1576
              name='POUName', parent=self.MainPanel, pos=wx.Point(104, 24), 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1577
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1578
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1579
        self.staticText2 = wx.StaticText(id=wxID_POUDIALOGSTATICTEXT2,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1580
              label='POU Type:', name='staticText2', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1581
              pos=wx.Point(24, 64), size=wx.Size(95, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1582
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1583
        self.PouType = wx.Choice(id=wxID_POUDIALOGPOUTYPE,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1584
              name='POUType', parent=self.MainPanel, pos=wx.Point(104, 64),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1585
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1586
        EVT_CHOICE(self, wxID_POUDIALOGPOUTYPE, self.OnTypeChanged)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1587
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1588
        self.staticText3 = wx.StaticText(id=wxID_POUDIALOGSTATICTEXT3,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1589
              label='Language:', name='staticText3', parent=self.MainPanel,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1590
              pos=wx.Point(24, 104), size=wx.Size(95, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1591
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1592
        self.Language = wx.Choice(id=wxID_POUDIALOGLANGUAGE,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1593
              name='Language', parent=self.MainPanel, pos=wx.Point(104, 104),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1594
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1595
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1596
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1597
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1598
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1599
        self._init_ctrls(parent)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1600
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1601
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1602
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1603
        for option in ["function","functionBlock","program"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1604
            self.PouType.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1605
        self.RefreshLanguage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1606
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1607
        self.PouNames = []
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1608
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1609
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1610
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1611
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1612
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1613
        pou_name = self.PouName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1614
        if pou_name == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1615
            error.append("POU Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1616
        if self.PouType.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1617
            error.append("POU Type")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1618
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1619
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1620
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1621
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1622
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1623
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1624
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1625
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1626
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1627
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1628
                    text += ", %s"%item 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1629
            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
  1630
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1631
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1632
        elif not TestIdentifier(pou_name):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1633
            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
  1634
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1635
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1636
        elif pou_name.upper() in IEC_KEYWORDS:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1637
            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
  1638
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1639
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1640
        elif pou_name.upper() in self.PouNames:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1641
            message = wxMessageDialog(self, "\"%s\" pou already exists!"%pou_name, "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1642
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1643
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1644
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1645
            self.EndModal(wxID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1646
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1647
    def RefreshLanguage(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1648
        selection = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1649
        self.Language.Clear()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1650
        for option in ["IL","ST","LD","FBD","SFC"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1651
            if option != "SFC" or self.PouType.GetStringSelection() == "program":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1652
                self.Language.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1653
        if self.Language.FindString(selection) != wxNOT_FOUND:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1654
            self.Language.SetStringSelection(selection)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1655
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1656
    def OnTypeChanged(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1657
        self.RefreshLanguage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1658
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1659
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1660
    def SetPouNames(self, pou_names):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1661
        self.PouNames = [pou_name.upper() for pou_name in pou_names]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1662
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1663
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1664
        for item, value in values.items():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1665
            if item == "pouName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1666
                self.PouName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1667
            elif item == "pouType":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1668
                self.PouType.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1669
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1670
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1671
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1672
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1673
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1674
        values["pouName"] = self.PouName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1675
        values["pouType"] = self.PouType.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1676
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1677
        return values
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
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1681
#                          Create Pou Transition Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1682
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1683
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1684
[wxID_POUTRANSITIONDIALOG, wxID_POUTRANSITIONDIALOGMAINPANEL, 
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1685
 wxID_POUTRANSITIONDIALOGTRANSITIONNAME, wxID_POUTRANSITIONDIALOGLANGUAGE, 
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1686
 wxID_POUTRANSITIONDIALOGSTATICTEXT1, wxID_POUTRANSITIONDIALOGSTATICTEXT2,
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1687
] = [wx.NewId() for _init_ctrls in range(6)]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1688
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1689
class PouTransitionDialog(wx.Dialog):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1690
    def _init_coll_flexGridSizer1_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1691
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1692
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1693
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1694
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1695
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1696
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1697
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1698
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1699
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1700
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1701
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1702
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1703
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1704
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1705
        wx.Dialog.__init__(self, id=wxID_POUTRANSITIONDIALOG,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1706
              name='PouTransitionDialog', parent=prnt, pos=wx.Point(376, 223),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1707
              size=wx.Size(350, 200), style=wx.DEFAULT_DIALOG_STYLE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1708
              title='Create a new transition')
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1709
        self.SetClientSize(wx.Size(350, 160))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1710
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1711
        self.MainPanel = wx.Panel(id=wxID_POUTRANSITIONDIALOGMAINPANEL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1712
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1713
              size=wx.Size(350, 200), style=wx.TAB_TRAVERSAL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1714
        self.MainPanel.SetAutoLayout(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1715
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1716
        self.staticText1 = wx.StaticText(id=wxID_POUTRANSITIONDIALOGSTATICTEXT1,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1717
              label='Transition Name:', name='staticText1', parent=self.MainPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1718
              pos=wx.Point(24, 24), size=wx.Size(145, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1719
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1720
        self.TransitionName = wx.TextCtrl(id=wxID_POUTRANSITIONDIALOGTRANSITIONNAME,
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1721
              name='TransitionName', parent=self.MainPanel, pos=wx.Point(154, 24),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1722
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1723
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1724
        self.staticText2 = wx.StaticText(id=wxID_POUTRANSITIONDIALOGSTATICTEXT2,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1725
              label='Language:', name='staticText2', parent=self.MainPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1726
              pos=wx.Point(24, 64), size=wx.Size(145, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1727
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1728
        self.Language = wx.Choice(id=wxID_POUTRANSITIONDIALOGLANGUAGE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1729
              name='Language', parent=self.MainPanel, pos=wx.Point(154, 64),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1730
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1731
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1732
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1733
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1734
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1735
        self._init_ctrls(parent)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1736
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1737
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1738
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1739
        for option in ["IL","ST","LD","FBD"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1740
            self.Language.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1741
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1742
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1743
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1744
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1745
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1746
        if self.TransitionName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1747
            error.append("Transition Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1748
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1749
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1750
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1751
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1752
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1753
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1754
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1755
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1756
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1757
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1758
                    text += ", %s"%item 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1759
            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
  1760
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1761
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1762
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1763
            self.EndModal(wxID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1764
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1765
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1766
        for item, value in values.items():
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1767
            if item == "transitionName":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1768
                self.TransitionName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1769
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1770
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1771
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1772
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1773
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1774
        values["transitionName"] = self.TransitionName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1775
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1776
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1777
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1778
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1779
#                          Create Pou Action Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1780
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1781
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1782
[wxID_POUACTIONDIALOG, wxID_POUACTIONDIALOGMAINPANEL, 
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1783
 wxID_POUACTIONDIALOGACTIONNAME, wxID_POUACTIONDIALOGLANGUAGE, 
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1784
 wxID_POUACTIONDIALOGSTATICTEXT1, wxID_POUACTIONDIALOGSTATICTEXT2, 
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1785
] = [wx.NewId() for _init_ctrls in range(6)]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1786
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1787
class PouActionDialog(wx.Dialog):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1788
    def _init_coll_flexGridSizer1_Items(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1789
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1790
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1791
        parent.AddWindow(self.MainPanel, 0, border=0, flag=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1792
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1793
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1794
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1795
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1796
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1797
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1798
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1799
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1800
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1801
    def _init_ctrls(self, prnt):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1802
        # generated method, don't edit
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1803
        wx.Dialog.__init__(self, id=wxID_POUACTIONDIALOG,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1804
              name='PouActionDialog', parent=prnt, pos=wx.Point(376, 223),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1805
              size=wx.Size(320, 200), style=wx.DEFAULT_DIALOG_STYLE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1806
              title='Create a new action')
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1807
        self.SetClientSize(wx.Size(320, 160))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1808
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1809
        self.MainPanel = wx.Panel(id=wxID_POUACTIONDIALOGMAINPANEL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1810
              name='MainPanel', parent=self, pos=wx.Point(0, 0),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1811
              size=wx.Size(350, 200), style=wx.TAB_TRAVERSAL)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1812
        self.MainPanel.SetAutoLayout(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1813
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1814
        self.staticText1 = wx.StaticText(id=wxID_POUACTIONDIALOGSTATICTEXT1,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1815
              label='Action Name:', name='staticText1', parent=self.MainPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1816
              pos=wx.Point(24, 24), size=wx.Size(145, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1817
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1818
        self.ActionName = wx.TextCtrl(id=wxID_POUACTIONDIALOGACTIONNAME,
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1819
              name='ActionName', parent=self.MainPanel, pos=wx.Point(124, 24),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1820
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1821
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1822
        self.staticText3 = wx.StaticText(id=wxID_POUACTIONDIALOGSTATICTEXT2,
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1823
              label='Language:', name='staticText2', parent=self.MainPanel,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1824
              pos=wx.Point(24, 64), size=wx.Size(145, 17), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1825
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1826
        self.Language = wx.Choice(id=wxID_POUACTIONDIALOGLANGUAGE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1827
              name='Language', parent=self.MainPanel, pos=wx.Point(124, 64),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1828
              size=wx.Size(150, 24), style=0)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1829
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1830
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1831
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1832
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1833
        self._init_ctrls(parent)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
  1834
        self.ButtonSizer = self.CreateButtonSizer(wxOK|wxCANCEL|wxCENTRE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1835
        self.flexGridSizer1.Add(self.ButtonSizer, 1, wxALIGN_RIGHT)
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1836
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1837
        for option in ["IL","ST","LD","FBD"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1838
            self.Language.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1839
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1840
        EVT_BUTTON(self, self.ButtonSizer.GetAffirmativeButton().GetId(), self.OnOK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1841
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1842
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1843
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1844
        if self.ActionName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1845
            error.append("Action Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1846
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1847
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1848
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1849
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1850
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1851
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1852
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1853
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1854
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1855
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1856
                    text += ", %s"%item 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1857
            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
  1858
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1859
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1860
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1861
            self.EndModal(wxID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1862
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1863
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1864
        for item, value in values.items():
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  1865
            if item == "actionName":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1866
                self.ActionName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1867
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1868
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1869
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1870
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1871
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1872
        values["actionName"] = self.ActionName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1873
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1874
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1875
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1876
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1877
#                            Pou Interface Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1878
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1879
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1880
class VariableTable(wxPyGridTableBase):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1881
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1882
    """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1883
    A custom wxGrid Table using user supplied data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1884
    """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1885
    def __init__(self, parent, data, colnames):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1886
        # The base class must be initialized *first*
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1887
        wxPyGridTableBase.__init__(self)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1888
        self.data = data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1889
        self.colnames = colnames
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1890
        self.Parent = parent
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1891
        # XXX
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1892
        # we need to store the row length and collength to
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1893
        # see if the table has changed size
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1894
        self._rows = self.GetNumberRows()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1895
        self._cols = self.GetNumberCols()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1896
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1897
    def GetNumberCols(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1898
        return len(self.colnames)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1899
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1900
    def GetNumberRows(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1901
        return len(self.data)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1902
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1903
    def GetColLabelValue(self, col):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1904
        if col < len(self.colnames):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1905
            return self.colnames[col]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1906
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1907
    def GetRowLabelValues(self, row):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1908
        return row
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1909
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1910
    def GetValue(self, row, col):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1911
        if row < self.GetNumberRows():
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1912
            if col == 0:
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  1913
                return self.Parent.Values.index(self.data[row]) + 1
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1914
            name = str(self.data[row].get(self.GetColLabelValue(col), ""))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1915
            return name
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1916
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1917
    def GetValueByName(self, row, colname):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1918
        return self.data[row].get(colname)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1919
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1920
    def SetValue(self, row, col, value):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1921
        if col < len(self.colnames):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1922
            self.data[row][self.GetColLabelValue(col)] = value
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1923
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1924
    def ResetView(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1925
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1926
        (wxGrid) -> Reset the grid view.   Call this to
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1927
        update the grid if rows and columns have been added or deleted
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1928
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1929
        grid.BeginBatch()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1930
        for current, new, delmsg, addmsg in [
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1931
            (self._rows, self.GetNumberRows(), wxGRIDTABLE_NOTIFY_ROWS_DELETED, wxGRIDTABLE_NOTIFY_ROWS_APPENDED),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1932
            (self._cols, self.GetNumberCols(), wxGRIDTABLE_NOTIFY_COLS_DELETED, wxGRIDTABLE_NOTIFY_COLS_APPENDED),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1933
        ]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1934
            if new < current:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1935
                msg = wxGridTableMessage(self,delmsg,new,current-new)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1936
                grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1937
            elif new > current:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1938
                msg = wxGridTableMessage(self,addmsg,new-current)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1939
                grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1940
                self.UpdateValues(grid)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1941
        grid.EndBatch()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1942
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1943
        self._rows = self.GetNumberRows()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1944
        self._cols = self.GetNumberCols()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1945
        # update the column rendering scheme
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1946
        self._updateColAttrs(grid)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1947
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1948
        # update the scrollbars and the displayed part of the grid
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1949
        grid.AdjustScrollbars()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1950
        grid.ForceRefresh()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1951
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1952
    def UpdateValues(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1953
        """Update all displayed values"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1954
        # 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
  1955
        msg = wxGridTableMessage(self, wxGRIDTABLE_REQUEST_VIEW_GET_VALUES)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1956
        grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1957
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1958
    def _updateColAttrs(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1959
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1960
        wxGrid -> update the column attributes to add the
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1961
        appropriate renderer given the column name.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1962
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1963
        Otherwise default to the default renderer.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1964
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1965
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1966
        for col in range(self.GetNumberCols()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1967
            attr = wxGridCellAttr()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1968
            attr.SetAlignment(self.Parent.ColAlignements[col], wxALIGN_CENTRE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1969
            grid.SetColAttr(col, attr)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1970
            grid.SetColSize(col, self.Parent.ColSizes[col])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1971
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1972
        typelist = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1973
        accesslist = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1974
        for row in range(self.GetNumberRows()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1975
            for col in range(self.GetNumberCols()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1976
                editor = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1977
                renderer = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1978
                colname = self.GetColLabelValue(col)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1979
                grid.SetReadOnly(row, col, False)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  1980
                if col == 0:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1981
                    grid.SetReadOnly(row, col, True)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1982
                elif colname == "Name":
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1983
                    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
  1984
                        grid.SetReadOnly(row, col, True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1985
                    else:
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1986
                        editor = wxGridCellTextEditor()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1987
                        renderer = wxGridCellStringRenderer()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  1988
                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
  1989
                    editor = wxGridCellTextEditor()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1990
                    renderer = wxGridCellStringRenderer()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1991
                elif colname == "Class":
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1992
                    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
  1993
                        grid.SetReadOnly(row, col, True)
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1994
                    else:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1995
                        editor = wxGridCellChoiceEditor()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1996
                        excluded = []
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1997
                        if self.Parent.PouIsUsed:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1998
                            excluded.extend(["Input","Output","InOut"])    
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  1999
                        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
  2000
                elif colname == "Type":
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2001
                    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
  2002
                        grid.SetReadOnly(row, col, True)
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2003
                    else:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2004
                        editor = wxGridCellChoiceEditor()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2005
                        editor.SetParameters(self.Parent.TypeList)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2006
                elif colname in ["Retain", "Constant"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2007
                    editor = wxGridCellChoiceEditor()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2008
                    editor.SetParameters(self.Parent.OptionList)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2009
                    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2010
                grid.SetCellEditor(row, col, editor)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2011
                grid.SetCellRenderer(row, col, renderer)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2012
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2013
                grid.SetCellBackgroundColour(row, col, wxWHITE)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2014
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2015
    def SetData(self, data):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2016
        self.data = data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2017
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2018
    def GetData(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2019
        return self.data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2020
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2021
    def GetCurrentIndex(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2022
        return self.CurrentIndex
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2023
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2024
    def SetCurrentIndex(self, index):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2025
        self.CurrentIndex = index
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2026
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2027
    def AppendRow(self, row_content):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2028
        self.data.append(row_content)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2029
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2030
    def RemoveRow(self, row_index):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2031
        self.data.pop(row_index)
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2032
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2033
    def GetRow(self, row_index):
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2034
        return self.data[row_index]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2035
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2036
    def Empty(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2037
        self.data = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2038
        self.editors = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2039
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2040
class VariableDropTarget(wx.TextDropTarget):
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2041
    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2042
    def __init__(self, parent):
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2043
        wx.TextDropTarget.__init__(self)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2044
        self.Parent = parent
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2045
    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2046
    def OnDropText(self, x, y, data):
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2047
        col = self.Parent.VariablesGrid.XToCol(x)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2048
        row = self.Parent.VariablesGrid.YToRow(y)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2049
        if col != wxNOT_FOUND and row != wxNOT_FOUND:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2050
            if self.Parent.Table.GetColLabelValue(col) != "Location":
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2051
                return
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2052
            try:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2053
                values = eval(data)    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2054
            except:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2055
                values = None
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2056
            if values and values[1] == "location":
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2057
                dialog = wxSingleChoiceDialog(self.Parent, "Select a variable class:", "Variable class", ["Input", "Output", "Memory"], wxOK|wxCANCEL)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2058
                if dialog.ShowModal() == wxID_OK:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2059
                    selected = dialog.GetSelection()
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2060
                    if selected == 0:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2061
                        location = "%I" + values[0]
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2062
                    elif selected == 1:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2063
                        location = "%Q" + values[0]
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2064
                    else:
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2065
                        location = "%M" + values[0]
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2066
                    self.Parent.Table.SetValue(row - 1, col, location)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2067
                    self.Parent.Table.ResetView(self.Parent.VariablesGrid)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2068
                    self.Parent.SaveValues()
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2069
                dialog.Destroy()    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2070
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2071
[wxID_POUEDITORPANEL, wxID_POUEDITORPANELVIEWER, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2072
 wxID_POUEDITORPANELVARIABLESGRID, wxID_POUEDITORPANELRETURNTYPE, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2073
 wxID_POUEDITORPANELCLASSFILTER, wxID_POUEDITORPANELADDBUTTON,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2074
 wxID_POUEDITORPANELDELETEBUTTON, wxID_POUEDITORPANELUPBUTTON, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2075
 wxID_POUEDITORPANELDOWNBUTTON, wxID_POUEDITORPANELSTATICTEXT1, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2076
 wxID_POUEDITORPANELSTATICTEXT2, wxID_POUEDITORPANELSTATICTEXT3,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2077
] = [wx.NewId() for _init_ctrls in range(12)]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2078
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2079
class PouEditorPanel(wx.Panel):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2080
    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
  2081
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2082
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2083
        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
  2084
        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
  2085
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2086
    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
  2087
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2088
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2089
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2090
        parent.AddGrowableRow(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2091
    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2092
    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
  2093
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2094
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2095
        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
  2096
        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
  2097
    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2098
    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
  2099
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2100
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2101
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2102
        parent.AddGrowableRow(0)
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
    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
  2105
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2106
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2107
        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
  2108
        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
  2109
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2110
    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
  2111
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2112
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2113
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2114
        parent.AddGrowableRow(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2115
        parent.AddGrowableRow(1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2116
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2117
    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
  2118
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2119
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2120
        parent.AddWindow(self.staticText1, 0, border=0, flag=wxALIGN_BOTTOM)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2121
        parent.AddWindow(self.ReturnType, 0, border=0, flag=0)
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  2122
        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
  2123
        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
  2124
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2125
    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
  2126
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2127
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2128
        parent.AddWindow(self.UpButton, 0, border=0, flag=0)
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  2129
        parent.AddWindow(self.AddButton, 0, border=0, flag=0)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2130
        parent.AddWindow(self.DownButton, 0, border=0, flag=0)
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  2131
        parent.AddWindow(self.DeleteButton, 0, border=0, flag=0)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2132
        
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2133
    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
  2134
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2135
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2136
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2137
        parent.AddGrowableCol(1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2138
        parent.AddGrowableCol(2)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2139
        parent.AddGrowableCol(3)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2140
        parent.AddGrowableRow(0)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2141
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2142
    def _init_sizers(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2143
        # generated method, don't edit
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2144
        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
  2145
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2146
        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
  2147
        
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2148
        self.ControlPanelSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=10)
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2149
        
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2150
        self.ChoicePanelSizer = wx.GridSizer(cols=1, hgap=5, rows=4, vgap=5)
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2151
        
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2152
        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
  2153
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2154
        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
  2155
        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
  2156
        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
  2157
        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
  2158
        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
  2159
        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
  2160
        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
  2161
        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
  2162
        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
  2163
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2164
        self.SetSizer(self.MainPanelSizer)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2165
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2166
    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
  2167
        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2168
        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
  2169
              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
  2170
              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
  2171
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2172
        if element_type == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2173
            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
  2174
              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
  2175
              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
  2176
        elif element_type == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2177
            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
  2178
        elif element_type == "FBD":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2179
            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
  2180
        elif element_type == "LD":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2181
            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
  2182
        elif element_type == "SFC":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2183
            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
  2184
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2185
            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
  2186
            self.Viewer.SetTextSyntax(element_type)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2187
            if element_type == "IL":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2188
                self.Viewer.SetKeywords(IL_KEYWORDS)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2189
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2190
                self.Viewer.SetKeywords(ST_KEYWORDS)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2191
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2192
        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
  2193
              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
  2194
              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
  2195
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2196
        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
  2197
              name='ReturnType', parent=self, pos=wx.Point(0, 0),
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2198
              size=wx.Size(145, 24), style=0)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2199
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2200
        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
  2201
              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
  2202
              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
  2203
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2204
        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
  2205
              name='ClassFilter', parent=self, pos=wx.Point(0, 0),
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2206
              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
  2207
        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
  2208
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2209
        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
  2210
              name='VariablesGrid', parent=self, pos=wx.Point(0, 0), 
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2211
              size=wx.Size(0, 150), style=wxVSCROLL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2212
        self.VariablesGrid.SetFont(wx.Font(12, 77, wx.NORMAL, wx.NORMAL, False,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2213
              'Sans'))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2214
        self.VariablesGrid.SetLabelFont(wx.Font(10, 77, wx.NORMAL, wx.NORMAL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2215
              False, 'Sans'))
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2216
        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
  2217
        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
  2218
        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
  2219
        
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2220
        self.VariablesGrid.SetDropTarget(VariableDropTarget(self))
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  2221
        
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2222
        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
  2223
              name='AddButton', parent=self, pos=wx.Point(345, 340),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2224
              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
  2225
        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
  2226
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2227
        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
  2228
              name='DeleteButton', parent=self, pos=wx.Point(425, 340),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2229
              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
  2230
        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
  2231
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2232
        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
  2233
              name='UpButton', parent=self, pos=wx.Point(505, 340),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2234
              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
  2235
        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
  2236
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2237
        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
  2238
              name='DownButton', parent=self, pos=wx.Point(545, 340),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2239
              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
  2240
        EVT_BUTTON(self, wxID_POUEDITORPANELDOWNBUTTON, self.OnDownButton)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2241
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2242
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2243
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2244
    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
  2245
        self.Parent = window
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2246
        self.Controler = controler
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2247
        self.ElementType = element_type
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2248
        self.PouName = pou_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2249
        self.TransitionName = transition_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2250
        self.ActionName = action_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2251
        self.ConfigName = config_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2252
        self.ResourceName = resource_name
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2253
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2254
        if element_type == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2255
            self._init_ctrls(parent, "config")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2256
            pou_type = "config"
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2257
        elif element_type == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2258
            self._init_ctrls(parent, "resource")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2259
            pou_type = "resource"
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2260
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2261
            if element_type == "transition":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2262
                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
  2263
            elif element_type == "action":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2264
                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
  2265
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2266
                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
  2267
            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
  2268
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2269
        self.Filter = "All"
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2270
        self.FilterChoices = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2271
        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
  2272
            "   Input" : "Input", "   Output" : "Output", "   InOut" : "InOut", 
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2273
            "   External" : "External", "Variables" : "Variables", "   Local" : "Local",
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2274
            "   Temp" : "Temp", "Global" : "Global", "Access" : "Access"}
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2275
        
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2276
        if pou_type in ["config", "resource"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2277
            self.DefaultTypes = {"All" : "Global"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2278
            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
  2279
        else:
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2280
            self.DefaultTypes = {"All" : "Local", "Interface" : "Input", "Variables" : "Local"}
11
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2281
            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
  2282
        if pou_type in ["config", "resource"] or pou_type == "program":
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2283
            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
  2284
            if pou_type not in ["config", "resource"]:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2285
                self.FilterChoices = ["All","Interface","   Input","   Output","   InOut","   External","Variables","   Local","   Temp","Global","Access"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2286
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2287
                self.FilterChoices = ["All","Global","Access"]
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2288
            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
  2289
            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
  2290
        else:
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  2291
            self.Table = VariableTable(self, [], ["#", "Name", "Class", "Type", "Initial Value", "Retain", "Constant"])
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2292
            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
  2293
            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
  2294
            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
  2295
        for choice in self.FilterChoices:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2296
            self.ClassFilter.Append(choice)
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2297
        reverse_transfer = {}
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2298
        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
  2299
            reverse_transfer[choice] = filter
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2300
        self.ClassFilter.SetStringSelection(reverse_transfer[self.Filter])
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2301
        self.RefreshTypeList()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2302
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2303
        self.OptionList = "Yes,No"
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2304
        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
  2305
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2306
        if pou_type == "function":
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2307
            for value, parent in TypeHierarchy_list:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2308
                if not value.startswith("ANY"):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2309
                    self.ReturnType.Append(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2310
            self.ReturnType.Enable(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2311
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2312
            self.ReturnType.Enable(False)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2313
            self.staticText1.Hide()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2314
            self.ReturnType.Hide()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2315
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2316
        self.VariablesGrid.SetTable(self.Table)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2317
        self.VariablesGrid.SetRowLabelSize(0)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2318
    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2319
    def SetMode(self, mode):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2320
        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
  2321
            if self.ElementType == "transition":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2322
                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
  2323
            elif self.ElementType == "action":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2324
                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
  2325
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2326
                language = self.Controler.GetPouBodyType(self.PouName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2327
            if language not in ["IL", "ST"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2328
                self.Viewer.SetMode(mode)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2329
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2330
    def RefreshView(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2331
        self.PouNames = self.Controler.GetProjectPouNames()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2332
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2333
        if self.ElementType == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2334
            self.PouIsUsed = False
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2335
            returnType = None
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2336
            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
  2337
        elif self.ElementType == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2338
            self.PouIsUsed = False
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2339
            returnType = None
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2340
            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
  2341
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2342
            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
  2343
            returnType = self.Controler.GetCurrentElementEditingInterfaceReturnType()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2344
            self.Values = self.Controler.GetCurrentElementEditingInterfaceVars()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2345
            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
  2346
            if self.ElementType == "transtion":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2347
                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
  2348
                varlist.append(self.ActionName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2349
            elif self.ElementType == "action":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2350
                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
  2351
                varlist.append(self.ActionName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2352
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2353
                language = self.Controler.GetPouBodyType(self.PouName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2354
                varlist.append(self.PouName)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2355
            if language in ["IL", "ST"]:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2356
                self.Viewer.SetVariables(varlist)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2357
                self.Viewer.SetFunctions(self.Controler.GetBlockTypes())
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2358
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2359
        if returnType and self.ReturnType.IsEnabled():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2360
            self.ReturnType.SetStringSelection(returnType)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2361
        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2362
        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2363
        if self.ElementType != "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2364
            self.Viewer.RefreshView()
55
e24d2f917c7e Removed used POU warning crash
etisserant
parents: 54
diff changeset
  2365
                
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2366
    def OnClassFilter(self, event):
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2367
        self.Filter = self.FilterChoiceTransfer[self.ClassFilter.GetStringSelection()]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2368
        self.RefreshTypeList()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2369
        self.RefreshValues()
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2370
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2371
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2372
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2373
    def RefreshTypeList(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2374
        if self.Filter == "All":
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2375
            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
  2376
        elif self.Filter == "Interface":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2377
            self.ClassList = ["Input","Output","InOut","External"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2378
        elif self.Filter == "Variables":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2379
            self.ClassList = ["Local","Temp"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2380
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2381
            self.ClassList = [self.Filter]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2382
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2383
    def RefreshButtons(self):
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2384
        table_length = len(self.Table.data)
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2385
        row_class = None
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2386
        if table_length and self.PouIsUsed:
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2387
            row = self.VariablesGrid.GetGridCursorRow()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2388
            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
  2389
        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
  2390
        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
  2391
        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
  2392
        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
  2393
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2394
    def OnAddButton(self, event):
11
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2395
        new_row = self.DefaultValue.copy()
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2396
        if self.Filter in self.DefaultTypes:
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2397
            new_row["Class"] = self.DefaultTypes[self.Filter]
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2398
        else:
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  2399
            new_row["Class"] = self.Filter
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2400
        self.Values.append(new_row)
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2401
        self.RefreshValues()
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2402
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2403
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2404
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2405
    def OnDeleteButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2406
        row = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2407
        self.Values.remove(row)
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2408
        self.RefreshValues()
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2409
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2410
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2411
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2412
    def OnUpButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2413
        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
  2414
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2415
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2416
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2417
    def OnDownButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2418
        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
  2419
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2420
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2421
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2422
    def OnVariablesGridCellChange(self, event):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2423
        row, col = event.GetRow(), event.GetCol()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2424
        colname = self.Table.GetColLabelValue(col)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2425
        value = self.Table.GetValue(row, col)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2426
        if colname == "Name":
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2427
            if not TestIdentifier(value):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2428
                message = wxMessageDialog(self, "\"%s\" is not a valid identifier!"%value, "Error", wxOK|wxICON_ERROR)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2429
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2430
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2431
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2432
            elif value.upper() in IEC_KEYWORDS:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2433
                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
  2434
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2435
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2436
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2437
            elif value.upper() in self.PouNames:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2438
                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
  2439
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2440
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2441
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2442
            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
  2443
                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
  2444
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2445
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2446
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2447
            else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2448
                self.SaveValues()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2449
                event.Skip()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2450
        else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2451
            self.SaveValues()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2452
            event.Skip()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2453
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2454
    def OnVariablesGridCellLeftClick(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2455
        if event.GetCol() == 0:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2456
            row = event.GetRow()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2457
            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
  2458
            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
  2459
            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
  2460
            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
  2461
            dragSource = wxDropSource(self.VariablesGrid)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2462
            dragSource.SetData(data)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2463
            dragSource.DoDragDrop()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2464
        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2465
    
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2466
    def OnVariablesGridSelectCell(self, event):
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2467
        wxCallAfter(self.RefreshButtons)
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2468
        event.Skip()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2469
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2470
    def MoveValue(self, value_index, move):
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2471
        new_index = max(0, min(value_index + move, len(self.Values) - 1))
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2472
        if new_index != value_index:
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2473
            self.Values.insert(new_index, self.Values.pop(value_index))
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2474
            self.RefreshValues()
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  2475
            self.VariablesGrid.SetGridCursor(new_index, self.VariablesGrid.GetGridCursorCol())
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2476
        else:
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  2477
            self.RefreshValues()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2478
        self.SaveValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2479
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2480
    def RefreshValues(self):
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  2481
        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
  2482
            self.VariablesGrid.SetGridCursor(0, 1)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2483
        data = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2484
        for variable in self.Values:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2485
            if variable["Class"] in self.ClassList:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2486
                data.append(variable)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2487
        self.Table.SetData(data)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2488
        self.Table.ResetView(self.VariablesGrid)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2489
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2490
    def SaveValues(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2491
        if self.ElementType == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2492
            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
  2493
        elif self.ElementType == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2494
            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
  2495
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2496
            if self.ReturnType.IsEnabled():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2497
                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
  2498
            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
  2499
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2500
##[wxID_EDITVARIABLEDIALOG, wxID_EDITVARIABLEDIALOGMAINPANEL, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2501
## wxID_EDITVARIABLEDIALOGVARIABLESGRID, wxID_EDITVARIABLEDIALOGRETURNTYPE, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2502
## wxID_EDITVARIABLEDIALOGCLASSFILTER, wxID_EDITVARIABLEDIALOGADDBUTTON,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2503
## wxID_EDITVARIABLEDIALOGDELETEBUTTON, wxID_EDITVARIABLEDIALOGUPBUTTON, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2504
## wxID_EDITVARIABLEDIALOGDOWNBUTTON, wxID_EDITVARIABLEDIALOGSTATICTEXT1, 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2505
## wxID_EDITVARIABLEDIALOGSTATICTEXT2, wxID_EDITVARIABLEDIALOGSTATICTEXT3,
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2506
##] = [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
  2507
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2508
##class EditVariableDialog(wx.Dialog):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2509
##    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
  2510
##        # generated method, don't edit
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
##        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
  2513
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2514
##    def _init_sizers(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2515
##        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2516
##        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
  2517
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2518
##        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
  2519
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2520
##        self.SetSizer(self.flexGridSizer1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2521
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2522
##    def _init_ctrls(self, prnt, name):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2523
##        # generated method, don't edit
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2524
##        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
  2525
##              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
  2526
##              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
  2527
##              title='Edit variables of %s'%name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2528
##        self.SetClientSize(wx.Size(600, 440))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2529
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2530
##        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
  2531
##              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
  2532
##              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
  2533
##        self.MainPanel.SetAutoLayout(True)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2534
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2535
##        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
  2536
##              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
  2537
##              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
  2538
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2539
##        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
  2540
##              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
  2541
##              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
  2542
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2543
##        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
  2544
##              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
  2545
##              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
  2546
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2547
##        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
  2548
##              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
  2549
##              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
  2550
##        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
  2551
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2552
##        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
  2553
##              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
  2554
##              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
  2555
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2556
##        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
  2557
##              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
  2558
##              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
  2559
##        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
  2560
##              'Sans'))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2561
##        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
  2562
##              False, 'Sans'))
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2563
##        self.VariablesGrid.DisableDragGridSize()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2564
##        self.VariablesGrid.EnableScrolling(False, True)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2565
##        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
  2566
##        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
  2567
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2568
##        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
  2569
##              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
  2570
##              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
  2571
##        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
  2572
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2573
##        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
  2574
##              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
  2575
##              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
  2576
##        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
  2577
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2578
##        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
  2579
##              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
  2580
##              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
  2581
##        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
  2582
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2583
##        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
  2584
##              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
  2585
##              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
  2586
##        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
  2587
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2588
##        self._init_sizers()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2589
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2590
##    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
  2591
##        self._init_ctrls(parent, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2592
##        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
  2593
##        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
  2594
##        self.Filter = filter
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2595
##        self.PouIsUsed = pou_is_used
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2596
##        self.FilterChoices = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2597
##        self.FilterChoiceTransfer = {"All" : "All", "Interface" : "Interface", 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2598
##            "   Input" : "Input", "   Output" : "Output", "   InOut" : "InOut", 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2599
##            "   External" : "External", "Variables" : "Variables", "   Local" : "Local",
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2600
##            "   Temp" : "Temp", "Global" : "Global", "Access" : "Access"}
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:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2603
##            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
  2604
##            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
  2605
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2606
##            self.DefaultTypes = {"All" : "Global"}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2607
##            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
  2608
##        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
  2609
##            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
  2610
##            if pou_type:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2611
##                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
  2612
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2613
##                self.FilterChoices = ["All","Global","Access"]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2614
##            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
  2615
##            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
  2616
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2617
##            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
  2618
##            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
  2619
##            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
  2620
##            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
  2621
##        for choice in self.FilterChoices:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2622
##            self.ClassFilter.Append(choice)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2623
##        reverse_transfer = {}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2624
##        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
  2625
##            reverse_transfer[choice] = filter
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2626
##        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
  2627
##        self.RefreshTypeList()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2628
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2629
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2630
##        self.OptionList = "Yes,No"
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2631
##        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
  2632
##        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2633
##        if pou_type == "function":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2634
##            for value, parent in TypeHierarchy_list:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2635
##                if not value.startswith("ANY"):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2636
##                    self.ReturnType.Append(value)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2637
##            self.ReturnType.Enable(True)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2638
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2639
##            self.ReturnType.Enable(False)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2640
##            self.staticText2.Hide()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2641
##            self.ReturnType.Hide()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2642
##        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2643
##        self.VariablesGrid.SetTable(self.Table)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2644
##        self.VariablesGrid.SetRowLabelSize(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2645
##        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2646
##        self.Table.ResetView(self.VariablesGrid)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2647
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2648
##        self.PouNames = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2649
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2650
##        if self.PouIsUsed:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2651
##            wxCallAfter(self.WarningMessage, name)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2652
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2653
##        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
  2654
##    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2655
##    def WarningMessage(self, name):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2656
##        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
  2657
##        message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2658
##        message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2659
##    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2660
##    def OnOK(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2661
##        self.VariablesGrid.SetGridCursor(0, 0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2662
##        error = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2663
##        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
  2664
##            error.append("Return Type")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2665
##        if len(error) > 0:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2666
##            text = ""
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2667
##            for i, item in enumerate(error):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2668
##                if i == 0:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2669
##                    text += item
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2670
##                elif i == len(error) - 1:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2671
##                    text += " and %s"%item
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2672
##                else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2673
##                    text += ", %s"%item 
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2674
##            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
  2675
##            message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2676
##            message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2677
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2678
##            self.EndModal(wxID_OK)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2679
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2680
##    def OnClassFilter(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2681
##        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
  2682
##        self.RefreshTypeList()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2683
##        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2684
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2685
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2686
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2687
##    def RefreshTypeList(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2688
##        if self.Filter == "All":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2689
##            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
  2690
##        elif self.Filter == "Interface":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2691
##            self.ClassList = ["Input","Output","InOut","External"]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2692
##        elif self.Filter == "Variables":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2693
##            self.ClassList = ["Local","Temp"]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2694
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2695
##            self.ClassList = [self.Filter]
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2696
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2697
##    def RefreshButtons(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2698
##        table_length = len(self.Table.data)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2699
##        row_class = None
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2700
##        if table_length and self.PouIsUsed:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2701
##            row = self.VariablesGrid.GetGridCursorRow()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2702
##            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
  2703
##        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
  2704
##        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
  2705
##        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
  2706
##        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
  2707
##    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2708
##    def OnAddButton(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2709
##        new_row = self.DefaultValue.copy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2710
##        if self.Filter in self.DefaultTypes:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2711
##            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
  2712
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2713
##            new_row["Class"] = self.Filter
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2714
##        self.Values.append(new_row)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2715
##        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2716
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2717
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2718
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2719
##    def OnDeleteButton(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2720
##        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
  2721
##        self.Values.remove(row)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2722
##        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2723
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2724
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2725
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2726
##    def OnUpButton(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2727
##        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), -1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2728
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2729
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2730
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2731
##    def OnDownButton(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2732
##        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), 1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2733
##        self.RefreshButtons()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2734
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2735
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2736
##    def OnVariablesGridCellChange(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2737
##        row, col = event.GetRow(), event.GetCol()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2738
##        colname = self.Table.GetColLabelValue(col)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2739
##        value = self.Table.GetValue(row, col)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2740
##        if colname == "Name":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2741
##            if not TestIdentifier(value):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2742
##                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
  2743
##                message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2744
##                message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2745
##                event.Veto()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2746
##            elif value.upper() in IEC_KEYWORDS:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2747
##                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
  2748
##                message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2749
##                message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2750
##                event.Veto()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2751
##            elif value.upper() in self.PouNames:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2752
##                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
  2753
##                message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2754
##                message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2755
##                event.Veto()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2756
##            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
  2757
##                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
  2758
##                message.ShowModal()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2759
##                message.Destroy()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2760
##                event.Veto()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2761
##            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2762
##                event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2763
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2764
##            event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2765
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2766
##    def OnVariablesGridSelectCell(self, event):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2767
##        wxCallAfter(self.RefreshButtons)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2768
##        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2769
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2770
##    def SetPouNames(self, pou_names):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2771
##        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
  2772
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2773
##    def SetValues(self, values):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2774
##        for item, value in values.items():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2775
##            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
  2776
##                self.ReturnType.SetStringSelection(value)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2777
##            if item == "data":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2778
##                self.Values = value
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2779
##        self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2780
##
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2781
##    def MoveValue(self, value_index, move):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2782
##        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
  2783
##        if new_index != value_index:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2784
##            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
  2785
##            self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2786
##            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
  2787
##        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2788
##            self.RefreshValues()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2789
##    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2790
##    def RefreshValues(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2791
##        if len(self.Table.data) > 0:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2792
##            self.VariablesGrid.SetGridCursor(0, 0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2793
##        data = []
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2794
##        for variable in self.Values:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2795
##            if variable["Class"] in self.ClassList:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2796
##                data.append(variable)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2797
##        self.Table.SetData(data)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2798
##        self.Table.ResetView(self.VariablesGrid)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2799
##                
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2800
##    def GetValues(self):
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2801
##        values = {}
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2802
##        if self.ReturnType.IsEnabled():
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2803
##            values["returnType"] = self.ReturnType.GetStringSelection()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2804
##        values["data"] = self.Values
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  2805
##        return values
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2806
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2807
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2808
#                               Exception Handler
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2809
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2810
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2811
Max_Traceback_List_Size = 20
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2812
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2813
def Display_Exception_Dialog(e_type,e_value,e_tb):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2814
    trcbck_lst = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2815
    for i,line in enumerate(traceback.extract_tb(e_tb)):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2816
        trcbck = " " + str(i+1) + ". "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2817
        if line[0].find(os.getcwd()) == -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2818
            trcbck += "file : " + str(line[0]) + ",   "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2819
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2820
            trcbck += "file : " + str(line[0][len(os.getcwd()):]) + ",   "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2821
        trcbck += "line : " + str(line[1]) + ",   " + "function : " + str(line[2])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2822
        trcbck_lst.append(trcbck)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2823
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2824
    # Allow clicking....
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2825
    cap = wx.Window_GetCapture()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2826
    if cap:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2827
        cap.ReleaseMouse()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2828
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2829
    dlg = wx.SingleChoiceDialog(None, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2830
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2831
An error happens.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2832
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2833
Click on OK for saving an error report.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2834
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2835
Please contact LOLITech at:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2836
+33 (0)3 29 52 95 67
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2837
bugs_PLCOpenEditor@lolitech.fr
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2838
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2839
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2840
Error:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2841
""" +
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2842
        str(e_type) + " : " + str(e_value), 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2843
        "Error",
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2844
        trcbck_lst)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2845
    try:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2846
        res = (dlg.ShowModal() == wx.ID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2847
    finally:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2848
        dlg.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2849
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2850
    return res
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2851
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2852
def Display_Error_Dialog(e_value):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2853
    message = wxMessageDialog(None, str(e_value), "Error", wxOK|wxICON_ERROR)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2854
    message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2855
    message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2856
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2857
def get_last_traceback(tb):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2858
    while tb.tb_next:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2859
        tb = tb.tb_next
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2860
    return tb
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2861
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2862
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2863
def format_namespace(d, indent='    '):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2864
    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
  2865
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2866
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2867
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
  2868
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2869
def wxAddExceptHook(path, app_version='[No version]'):#, ignored_exceptions=[]):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2870
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2871
    def handle_exception(e_type, e_value, e_traceback):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2872
        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
  2873
        last_tb = get_last_traceback(e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2874
        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
  2875
        if str(e_value).startswith("!!!"):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2876
            Display_Error_Dialog(e_value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2877
        elif ex not in ignored_exceptions:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2878
            result = Display_Exception_Dialog(e_type,e_value,e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2879
            if result:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2880
                ignored_exceptions.append(ex)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2881
                info = {
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2882
                    'app-title' : wx.GetApp().GetAppName(), # app_title
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2883
                    'app-version' : app_version,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2884
                    'wx-version' : wx.VERSION_STRING,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2885
                    'wx-platform' : wx.Platform,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2886
                    'python-version' : platform.python_version(), #sys.version.split()[0],
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2887
                    'platform' : platform.platform(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2888
                    'e-type' : e_type,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2889
                    'e-value' : e_value,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2890
                    'date' : time.ctime(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2891
                    'cwd' : os.getcwd(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2892
                    }
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2893
                if e_traceback:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2894
                    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
  2895
                    last_tb = get_last_traceback(e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2896
                    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
  2897
                    info['locals'] = format_namespace(exception_locals)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2898
                    if 'self' in exception_locals:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2899
                        info['self'] = format_namespace(exception_locals['self'].__dict__)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2900
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2901
                output = open(path+os.sep+"bug_report_"+info['date'].replace(':','-').replace(' ','_')+".txt",'w')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2902
                lst = info.keys()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2903
                lst.sort()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2904
                for a in lst:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2905
                    output.write(a+":\n"+str(info[a])+"\n\n")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2906
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2907
    #sys.excepthook = lambda *args: wx.CallAfter(handle_exception, *args)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2908
    sys.excepthook = handle_exception
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2909
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2910
if __name__ == '__main__':
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2911
    app = wxPySimpleApp()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2912
    wxInitAllImageHandlers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2913
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2914
    # Install a exception handle for bug reports
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2915
    wxAddExceptHook(os.getcwd(),__version__)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2916
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2917
    frame = PLCOpenEditor(None)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2918
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2919
    frame.Show()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2920
    app.MainLoop()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2921