PLCOpenEditor.py
author greg
Fri, 22 May 2009 14:44:03 +0200
changeset 359 363af30a8b83
parent 357 e5501b3337db
child 361 62570186dad4
permissions -rw-r--r--
enable declared variables without name
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
#
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
     7
#Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD
0
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
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
    19
#General Public License for more details.
0
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 datetime import datetime
120
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
    26
import wx, wx.grid
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
    27
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
    28
if wx.VERSION >= (2, 8, 0):
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
    29
    import wx.aui
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
    30
    USE_AUI = True
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
    31
else:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
    32
    USE_AUI = False
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    33
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    34
from SFCViewer import *
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    35
from LDViewer import *
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    36
from Viewer import *
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    37
from TextViewer import *
301
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
    38
from GraphicViewer import *
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    39
from RessourceEditor import *
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
    40
from DataTypeEditor import *
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    41
from PLCControler import *
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
    42
from plcopen.structures import LOCATIONDATATYPES
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    43
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    44
import os, re, platform, sys, time, traceback, getopt
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    45
190
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
    46
base_folder = os.path.split(sys.path[0])[0]
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
    47
sys.path.append(base_folder)
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
    48
from docutils import *
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
    49
218
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
    50
from types import TupleType
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
    51
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    52
__version__ = "$Revision$"
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    53
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
    54
CWD = os.path.split(os.path.realpath(__file__))[0]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    55
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
    56
[ID_PLCOPENEDITOR, ID_PLCOPENEDITORTREENOTEBOOK,
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
    57
 ID_PLCOPENEDITORTYPESTREE, ID_PLCOPENEDITORINSTANCESTREE, 
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
    58
 ID_PLCOPENEDITORMAINSPLITTER, ID_PLCOPENEDITORSECONDSPLITTER, 
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
    59
 ID_PLCOPENEDITORTHIRDSPLITTER, ID_PLCOPENEDITORLIBRARYPANEL, 
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
    60
 ID_PLCOPENEDITORLIBRARYTREE, ID_PLCOPENEDITORLIBRARYCOMMENT, 
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
    61
 ID_PLCOPENEDITORTABSOPENED, ID_PLCOPENEDITORTABSOPENED,
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
    62
 ID_PLCOPENEDITORTOOLBAR, ID_PLCOPENEDITORDEFAULTTOOLBAR, 
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
    63
 ID_PLCOPENEDITORSFCTOOLBAR, ID_PLCOPENEDITORFBDTOOLBAR, 
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
    64
 ID_PLCOPENEDITORLDTOOLBAR,
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
    65
] = [wx.NewId() for _init_ctrls in range(17)]
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
    66
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
    67
[ID_PLCOPENEDITORFILEMENUGENERATE, 
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
    68
] = [wx.NewId() for _init_coll_FileMenu_Items in range(1)]
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
    69
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
    70
[ID_PLCOPENEDITOREDITMENUENABLEUNDOREDO, ID_PLCOPENEDITOREDITMENUADDDATATYPE, 
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
    71
 ID_PLCOPENEDITOREDITMENUADDFUNCTION, ID_PLCOPENEDITOREDITMENUADDFUNCTIONBLOCK, 
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
    72
 ID_PLCOPENEDITOREDITMENUADDPROGRAM, ID_PLCOPENEDITOREDITMENUADDCONFIGURATION, 
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
    73
] = [wx.NewId() for _init_coll_EditMenu_Items in range(6)]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
    74
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    75
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    76
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    77
#                            ToolBars definitions
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    78
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    79
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    80
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    81
[ID_PLCOPENEDITORTOOLBARSELECTION, ID_PLCOPENEDITORTOOLBARCOMMENT,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    82
 ID_PLCOPENEDITORTOOLBARVARIABLE, ID_PLCOPENEDITORTOOLBARBLOCK,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    83
 ID_PLCOPENEDITORTOOLBARCONNECTION, ID_PLCOPENEDITORTOOLBARWIRE,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    84
 ID_PLCOPENEDITORTOOLBARPOWERRAIL, ID_PLCOPENEDITORTOOLBARRUNG,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    85
 ID_PLCOPENEDITORTOOLBARCOIL, ID_PLCOPENEDITORTOOLBARCONTACT,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    86
 ID_PLCOPENEDITORTOOLBARBRANCH, ID_PLCOPENEDITORTOOLBARINITIALSTEP,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    87
 ID_PLCOPENEDITORTOOLBARSTEP, ID_PLCOPENEDITORTOOLBARTRANSITION,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    88
 ID_PLCOPENEDITORTOOLBARACTIONBLOCK, ID_PLCOPENEDITORTOOLBARDIVERGENCE,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
    89
 ID_PLCOPENEDITORTOOLBARJUMP,
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    90
] = [wx.NewId() for _init_coll_DefaultToolBar_Items in range(17)]
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    91
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
    92
ToolBarItems = {
184
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
    93
    "FBD" : [(True, FREEDRAWING_MODE|DRIVENDRAWING_MODE,
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
    94
              ID_PLCOPENEDITORTOOLBARCOMMENT, "OnCommentTool",
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
    95
              "add_comment.png", "Create a new comment"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
    96
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE,
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
    97
              ID_PLCOPENEDITORTOOLBARVARIABLE, "OnVariableTool",
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
    98
              "add_variable.png", "Create a new variable"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
    99
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE,
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   100
              ID_PLCOPENEDITORTOOLBARBLOCK, "OnBlockTool",
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   101
              "add_block.png", "Create a new block"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   102
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   103
              ID_PLCOPENEDITORTOOLBARCONNECTION, "OnConnectionTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   104
              "add_connection.png", "Create a new connection")],
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   105
    "LD"  : [(True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   106
              ID_PLCOPENEDITORTOOLBARCOMMENT, "OnCommentTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   107
              "add_comment.png", "Create a new comment"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   108
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   109
              ID_PLCOPENEDITORTOOLBARPOWERRAIL, "OnPowerRailTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   110
              "add_powerrail.png", "Create a new power rail"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   111
             (False, DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   112
              ID_PLCOPENEDITORTOOLBARRUNG, "OnRungTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   113
              "add_rung.png", "Create a new rung"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   114
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   115
              ID_PLCOPENEDITORTOOLBARCOIL, "OnCoilTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   116
              "add_coil.png", "Create a new coil"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   117
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   118
              ID_PLCOPENEDITORTOOLBARCONTACT, "OnContactTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   119
              "add_contact.png", "Create a new contact"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   120
             (False, DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   121
              ID_PLCOPENEDITORTOOLBARBRANCH, "OnBranchTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   122
              "add_branch.png", "Create a new branch"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   123
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   124
              ID_PLCOPENEDITORTOOLBARVARIABLE, "OnVariableTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   125
              "add_variable.png", "Create a new variable"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   126
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   127
              ID_PLCOPENEDITORTOOLBARBLOCK, "OnBlockTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   128
              "add_block.png", "Create a new block"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   129
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   130
              ID_PLCOPENEDITORTOOLBARCONNECTION, "OnConnectionTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   131
              "add_connection.png", "Create a new connection")],
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   132
    "SFC" : [(True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   133
              ID_PLCOPENEDITORTOOLBARCOMMENT, "OnCommentTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   134
              "add_comment.png", "Create a new comment"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   135
             (True, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   136
              ID_PLCOPENEDITORTOOLBARINITIALSTEP, "OnInitialStepTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   137
              "add_initial_step.png", "Create a new initial step"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   138
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   139
              ID_PLCOPENEDITORTOOLBARSTEP, "OnStepTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   140
              "add_step.png", "Create a new step"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   141
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   142
              ID_PLCOPENEDITORTOOLBARTRANSITION, "OnTransitionTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   143
              "add_transition.png", "Create a new transition"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   144
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   145
              ID_PLCOPENEDITORTOOLBARACTIONBLOCK, "OnActionBlockTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   146
              "add_action.png", "Create a new action block"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   147
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   148
              ID_PLCOPENEDITORTOOLBARDIVERGENCE, "OnDivergenceTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   149
              "add_divergence.png", "Create a new divergence"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   150
             (False, FREEDRAWING_MODE|DRIVENDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   151
              ID_PLCOPENEDITORTOOLBARJUMP, "OnJumpTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   152
              "add_jump.png", "Create a new jump"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   153
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   154
              ID_PLCOPENEDITORTOOLBARVARIABLE, "OnVariableTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   155
              "add_variable.png", "Create a new variable"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   156
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   157
              ID_PLCOPENEDITORTOOLBARBLOCK, "OnBlockTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   158
              "add_block.png", "Create a new block"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   159
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   160
              ID_PLCOPENEDITORTOOLBARCONNECTION, "OnConnectionTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   161
              "add_connection.png", "Create a new connection"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   162
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   163
              ID_PLCOPENEDITORTOOLBARPOWERRAIL, "OnPowerRailTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   164
              "add_powerrail.png", "Create a new power rail"),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   165
             (True, FREEDRAWING_MODE, 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   166
              ID_PLCOPENEDITORTOOLBARCONTACT, "OnContactTool", 
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   167
              "add_contact.png", "Create a new contact")],
82
119b62c73085 PLCOpenEditor SplitterWindow names changed
lbessard
parents: 80
diff changeset
   168
    "ST"  : [],
119b62c73085 PLCOpenEditor SplitterWindow names changed
lbessard
parents: 80
diff changeset
   169
    "IL"  : []
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   170
}
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   171
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   172
def AppendMenu(parent, help, id, kind, text):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   173
    if wx.VERSION >= (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   174
        parent.Append(help=help, id=id, kind=kind, text=text)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   175
    else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   176
        parent.Append(helpString=help, id=id, kind=kind, item=text)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   177
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   178
class PLCOpenEditor(wx.Frame):
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   179
    
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   180
    CopyBuffer = None
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   181
    
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   182
    if wx.VERSION < (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   183
        def Bind(self, event, function, id = None):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   184
            if id is not None:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   185
                event(self, id, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   186
            else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   187
                event(self, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   188
    
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   189
    def _init_coll_MenuBar_Menus(self, parent):
220
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   190
        parent.Append(menu=self.FileMenu, title=u'File')
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   191
        if not self.Debug:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   192
            parent.Append(menu=self.EditMenu, title=u'Edit')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   193
        parent.Append(menu=self.DisplayMenu, title=u'Display')
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   194
        parent.Append(menu=self.HelpMenu, title=u'Help')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   195
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   196
    def _init_coll_FileMenu_Items(self, parent):
220
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   197
        if self.ModeSolo:
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   198
            AppendMenu(parent, help='', id=wx.ID_NEW,
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   199
                  kind=wx.ITEM_NORMAL, text=u'New\tCTRL+N')
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   200
            AppendMenu(parent, help='', id=wx.ID_OPEN,
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   201
                  kind=wx.ITEM_NORMAL, text=u'Open\tCTRL+O')
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   202
        AppendMenu(parent, help='', id=wx.ID_CLOSE,
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   203
              kind=wx.ITEM_NORMAL, text=u'Close Tab\tCTRL+W')
220
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   204
        if self.ModeSolo:
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   205
            AppendMenu(parent, help='', id=wx.ID_CLOSE_ALL,
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   206
                  kind=wx.ITEM_NORMAL, text=u'Close Project')
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   207
            parent.AppendSeparator()
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   208
        if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   209
            AppendMenu(parent, help='', id=wx.ID_SAVE,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   210
                  kind=wx.ITEM_NORMAL, text=u'Save\tCTRL+S')
220
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   211
        if self.ModeSolo:
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   212
            AppendMenu(parent, help='', id=wx.ID_SAVEAS,
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   213
                  kind=wx.ITEM_NORMAL, text=u'Save As...\tCTRL+SHIFT+S')
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   214
            AppendMenu(parent, help='', id=ID_PLCOPENEDITORFILEMENUGENERATE,
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   215
                  kind=wx.ITEM_NORMAL, text=u'Generate Program\tCTRL+G')
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   216
            parent.AppendSeparator()
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   217
        AppendMenu(parent, help='', id=wx.ID_PAGE_SETUP,
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   218
              kind=wx.ITEM_NORMAL, text=u'Page Setup')
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   219
        AppendMenu(parent, help='', id=wx.ID_PREVIEW,
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   220
              kind=wx.ITEM_NORMAL, text=u'Preview')
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   221
        AppendMenu(parent, help='', id=wx.ID_PRINT,
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   222
              kind=wx.ITEM_NORMAL, text=u'Print')
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   223
        if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   224
            parent.AppendSeparator()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   225
            AppendMenu(parent, help='', id=wx.ID_PROPERTIES,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   226
                  kind=wx.ITEM_NORMAL, text=u'Properties')
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   227
        parent.AppendSeparator()
220
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   228
        if self.ModeSolo:
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   229
            AppendMenu(parent, help='', id=wx.ID_EXIT,
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   230
                  kind=wx.ITEM_NORMAL, text=u'Quit\tCTRL+Q')
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   231
        else:
298
1b1a3ee785da Bug while closing PLCOpenEditor with Beremiz fixed (closing Beremiz project)
lbessard
parents: 294
diff changeset
   232
            AppendMenu(parent, help='', id=wx.ID_STOP,
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   233
                  kind=wx.ITEM_NORMAL, text=u'Close\tCTRL+Q')
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   234
        
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   235
        if self.ModeSolo:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   236
            self.Bind(wx.EVT_MENU, self.OnNewProjectMenu, id=wx.ID_NEW)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   237
            self.Bind(wx.EVT_MENU, self.OnOpenProjectMenu, id=wx.ID_OPEN)
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   238
        self.Bind(wx.EVT_MENU, self.OnCloseTabMenu, id=wx.ID_CLOSE)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   239
        if self.ModeSolo:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   240
            self.Bind(wx.EVT_MENU, self.OnCloseProjectMenu, id=wx.ID_CLOSE_ALL)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   241
        if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   242
            self.Bind(wx.EVT_MENU, self.OnSaveProjectMenu, id=wx.ID_SAVE)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   243
        if self.ModeSolo:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   244
            self.Bind(wx.EVT_MENU, self.OnSaveProjectAsMenu, id=wx.ID_SAVEAS)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   245
            self.Bind(wx.EVT_MENU, self.OnGenerateProgramMenu,
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   246
                  id=ID_PLCOPENEDITORFILEMENUGENERATE)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   247
        self.Bind(wx.EVT_MENU, self.OnPageSetupMenu, id=wx.ID_PAGE_SETUP)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   248
        self.Bind(wx.EVT_MENU, self.OnPreviewMenu, id=wx.ID_PREVIEW)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   249
        self.Bind(wx.EVT_MENU, self.OnPrintMenu, id=wx.ID_PRINT)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   250
        if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   251
            self.Bind(wx.EVT_MENU, self.OnPropertiesMenu, id=wx.ID_PROPERTIES)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   252
        if self.ModeSolo:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   253
            self.Bind(wx.EVT_MENU, self.OnQuitMenu, id=wx.ID_EXIT)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   254
        else:
298
1b1a3ee785da Bug while closing PLCOpenEditor with Beremiz fixed (closing Beremiz project)
lbessard
parents: 294
diff changeset
   255
            self.Bind(wx.EVT_MENU, self.OnQuitMenu, id=wx.ID_STOP)
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   256
    
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   257
    def _init_coll_EditMenu_Items(self, parent):
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   258
        AppendMenu(parent, help='', id=wx.ID_UNDO,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   259
              kind=wx.ITEM_NORMAL, text=u'Undo\tCTRL+Z')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   260
        AppendMenu(parent, help='', id=wx.ID_REDO,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   261
              kind=wx.ITEM_NORMAL, text=u'Redo\tCTRL+Y')
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
   262
        AppendMenu(parent, help='', id=ID_PLCOPENEDITOREDITMENUENABLEUNDOREDO,
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
   263
              kind=wx.ITEM_CHECK, text=u'Enable Undo/Redo')
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   264
        parent.AppendSeparator()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   265
        AppendMenu(parent, help='', id=wx.ID_CUT,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   266
              kind=wx.ITEM_NORMAL, text=u'Cut\tCTRL+X')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   267
        AppendMenu(parent, help='', id=wx.ID_COPY,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   268
              kind=wx.ITEM_NORMAL, text=u'Copy\tCTRL+C')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   269
        AppendMenu(parent, help='', id=wx.ID_PASTE,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   270
              kind=wx.ITEM_NORMAL, text=u'Paste\tCTRL+V')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   271
        parent.AppendSeparator()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   272
        addmenu = wx.Menu(title='')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   273
        parent.AppendMenu(wx.ID_ADD, "Add Element", addmenu)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   274
        AppendMenu(addmenu, help='', id=ID_PLCOPENEDITOREDITMENUADDDATATYPE,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   275
              kind=wx.ITEM_NORMAL, text=u'Data Type')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   276
        AppendMenu(addmenu, help='', id=ID_PLCOPENEDITOREDITMENUADDFUNCTION,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   277
              kind=wx.ITEM_NORMAL, text=u'Function')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   278
        AppendMenu(addmenu, help='', id=ID_PLCOPENEDITOREDITMENUADDFUNCTIONBLOCK,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   279
              kind=wx.ITEM_NORMAL, text=u'Function Block')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   280
        AppendMenu(addmenu, help='', id=ID_PLCOPENEDITOREDITMENUADDPROGRAM,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   281
              kind=wx.ITEM_NORMAL, text=u'Program')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   282
        AppendMenu(addmenu, help='', id=ID_PLCOPENEDITOREDITMENUADDCONFIGURATION,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   283
              kind=wx.ITEM_NORMAL, text=u'Configuration')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   284
        AppendMenu(parent, help='', id=wx.ID_SELECTALL,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   285
              kind=wx.ITEM_NORMAL, text=u'Select All\tCTRL+A')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   286
        AppendMenu(parent, help='', id=wx.ID_DELETE,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   287
              kind=wx.ITEM_NORMAL, text=u'Delete')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   288
        self.Bind(wx.EVT_MENU, self.OnUndoMenu, id=wx.ID_UNDO)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   289
        self.Bind(wx.EVT_MENU, self.OnRedoMenu, id=wx.ID_REDO)
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
   290
        self.Bind(wx.EVT_MENU, self.OnEnableUndoRedoMenu, id=ID_PLCOPENEDITOREDITMENUENABLEUNDOREDO)
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   291
        self.Bind(wx.EVT_MENU, self.OnCutMenu, id=wx.ID_CUT)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   292
        self.Bind(wx.EVT_MENU, self.OnCopyMenu, id=wx.ID_COPY)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   293
        self.Bind(wx.EVT_MENU, self.OnPasteMenu, id=wx.ID_PASTE)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   294
        self.Bind(wx.EVT_MENU, self.OnAddDataTypeMenu,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   295
              id=ID_PLCOPENEDITOREDITMENUADDDATATYPE)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   296
        self.Bind(wx.EVT_MENU, self.GenerateAddPouFunction("function"),
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   297
              id=ID_PLCOPENEDITOREDITMENUADDFUNCTION)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   298
        self.Bind(wx.EVT_MENU, self.GenerateAddPouFunction("functionBlock"),
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   299
              id=ID_PLCOPENEDITOREDITMENUADDFUNCTIONBLOCK)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   300
        self.Bind(wx.EVT_MENU, self.GenerateAddPouFunction("program"),
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   301
              id=ID_PLCOPENEDITOREDITMENUADDPROGRAM)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   302
        self.Bind(wx.EVT_MENU, self.OnAddConfigurationMenu,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   303
              id=ID_PLCOPENEDITOREDITMENUADDCONFIGURATION)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   304
        self.Bind(wx.EVT_MENU, self.OnSelectAllMenu, id=wx.ID_SELECTALL)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   305
        self.Bind(wx.EVT_MENU, self.OnDeleteMenu, id=wx.ID_DELETE)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   306
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   307
    def _init_coll_DisplayMenu_Items(self, parent):
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   308
        AppendMenu(parent, help='', id=wx.ID_REFRESH,
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   309
              kind=wx.ITEM_NORMAL, text=u'Refresh\tF5')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   310
        if not self.Debug and not self.ModeSolo:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   311
            AppendMenu(parent, help='', id=wx.ID_CLEAR,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   312
                  kind=wx.ITEM_NORMAL, text=u'Clear Errors\tCTRL+K')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   313
        parent.AppendSeparator()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   314
        zoommenu = wx.Menu(title='')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   315
        parent.AppendMenu(wx.ID_ZOOM_FIT, "ZOOM", zoommenu)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   316
        for idx, value in enumerate(ZOOM_FACTORS):
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   317
            new_id = wx.NewId()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   318
            AppendMenu(zoommenu, help='', id=new_id,
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   319
                  kind=wx.ITEM_RADIO, text=str(int(round(value * 100))) + "%")
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   320
            self.Bind(wx.EVT_MENU, self.GenerateZoomFunction(idx), id=new_id)
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   321
        self.Bind(wx.EVT_MENU, self.OnRefreshMenu, id=wx.ID_REFRESH)
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   322
        if not self.Debug and not self.ModeSolo:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   323
            self.Bind(wx.EVT_MENU, self.OnClearErrorsMenu, id=wx.ID_CLEAR)
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   324
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   325
    def _init_coll_HelpMenu_Items(self, parent):
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   326
        AppendMenu(parent, help='', id=wx.ID_HELP, 
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   327
            kind=wx.ITEM_NORMAL, text=u'PLCOpenEditor\tF1')
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
   328
        #AppendMenu(parent, help='', id=wx.ID_HELP_CONTENTS,
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
   329
        #      kind=wx.ITEM_NORMAL, text=u'PLCOpen\tF2')
190
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
   330
        #AppendMenu(parent, help='', id=wx.ID_HELP_CONTEXT,
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
   331
        #      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
   332
        if self.ModeSolo:
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   333
            AppendMenu(parent, help='', id=wx.ID_ABOUT,
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   334
                  kind=wx.ITEM_NORMAL, text=u'About')
190
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
   335
        self.Bind(wx.EVT_MENU, self.OnPLCOpenEditorMenu, id=wx.ID_HELP)
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
   336
        #self.Bind(wx.EVT_MENU, self.OnPLCOpenMenu, id=wx.ID_HELP_CONTENTS)
190
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
   337
        self.Bind(wx.EVT_MENU, self.OnAboutMenu, id=wx.ID_ABOUT)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   338
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   339
    def _init_utils(self):
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   340
        self.MenuBar = wx.MenuBar()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   341
220
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   342
        self.FileMenu = wx.Menu(title='')
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   343
        if not self.Debug:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   344
            self.EditMenu = wx.Menu(title='')
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   345
        self.DisplayMenu = wx.Menu(title='')
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   346
        self.HelpMenu = wx.Menu(title='')
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   347
        
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   348
        self._init_coll_MenuBar_Menus(self.MenuBar)
220
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
   349
        self._init_coll_FileMenu_Items(self.FileMenu)
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   350
        if not self.Debug:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   351
            self._init_coll_EditMenu_Items(self.EditMenu)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   352
        self._init_coll_DisplayMenu_Items(self.DisplayMenu)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   353
        self._init_coll_HelpMenu_Items(self.HelpMenu)
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   354
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   355
    def _init_coll_MainLibrarySizer_Items(self, parent):
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   356
        parent.AddWindow(self.LibraryTree, 0, border=0, flag=wx.GROW)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   357
        parent.AddSizer(self.LibraryComment, 0, border=0, flag=wx.GROW)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   358
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   359
    def _init_coll_MainLibrarySizer_Growables(self, parent):
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   360
        parent.AddGrowableCol(0)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   361
        parent.AddGrowableRow(0)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   362
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   363
    def _init_sizers(self):
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   364
        self.MainLibrarySizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=0)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   365
        
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   366
        self._init_coll_MainLibrarySizer_Growables(self.MainLibrarySizer)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   367
        self._init_coll_MainLibrarySizer_Items(self.MainLibrarySizer)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   368
        
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   369
        self.LibraryPanel.SetSizer(self.MainLibrarySizer)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   370
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   371
    def _init_ctrls(self, prnt):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   372
        wx.Frame.__init__(self, id=ID_PLCOPENEDITOR, name=u'PLCOpenEditor',
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   373
              parent=prnt, pos=wx.DefaultPosition, size=wx.Size(1000, 600),
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   374
              style=wx.DEFAULT_FRAME_STYLE, title=u'PLCOpenEditor')
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   375
        self._init_utils()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   376
        self.SetClientSize(wx.Size(1000, 600))
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   377
        self.SetMenuBar(self.MenuBar)
92
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
   378
        self.Bind(wx.EVT_CLOSE, self.OnCloseFrame)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   379
        
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   380
        if USE_AUI:
120
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   381
            self.AUIManager = wx.aui.AuiManager(self)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   382
            self.AUIManager.SetDockSizeConstraint(0.5, 0.5)
120
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   383
            self.Panes = {}
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   384
        
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   385
            self.TreeNoteBook = wx.aui.AuiNotebook(self)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   386
            self.AUIManager.AddPane(self.TreeNoteBook, wx.aui.AuiPaneInfo().Caption("Project").Left().Layer(1).BestSize(wx.Size(200, 500)).CloseButton(False))
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   387
        
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   388
        else:
120
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   389
            self.MainSplitter = wx.SplitterWindow(id=ID_PLCOPENEDITORMAINSPLITTER,
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   390
                  name='MainSplitter', parent=self, point=wx.Point(0, 0),
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   391
                  size=wx.Size(0, 0), style=wx.SP_3D)
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   392
            self.MainSplitter.SetNeedUpdating(True)
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   393
            self.MainSplitter.SetMinimumPaneSize(1)
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   394
            
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   395
            self.TreeNoteBook = wx.Notebook(id=ID_PLCOPENEDITORTREENOTEBOOK,
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   396
                  name='TreeNoteBook', parent=self.MainSplitter, pos=wx.Point(0,
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   397
                  0), size=wx.Size(0, 0), style=0)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   398
            
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   399
        typestreestyle = wx.TR_HAS_BUTTONS|wx.TR_SINGLE|wx.SUNKEN_BORDER
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   400
        if not self.Debug:
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   401
            typestreestyle |= wx.TR_EDIT_LABELS
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   402
        self.TypesTree = wx.TreeCtrl(id=ID_PLCOPENEDITORTYPESTREE,
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   403
                  name='TypesTree', parent=self.TreeNoteBook, 
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   404
                  pos=wx.Point(0, 0), size=wx.Size(0, 0),
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   405
                  style=typestreestyle)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   406
        if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   407
            if wx.Platform == '__WXMSW__':
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   408
                self.Bind(wx.EVT_TREE_ITEM_RIGHT_CLICK, self.OnTypesTreeRightUp,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   409
                      id=ID_PLCOPENEDITORTYPESTREE)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   410
                self.Bind(wx.EVT_TREE_SEL_CHANGED, self.OnTypesTreeItemSelected,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   411
                      id=ID_PLCOPENEDITORTYPESTREE)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   412
            else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   413
                if wx.VERSION >= (2, 6, 0):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   414
                    self.TypesTree.Bind(wx.EVT_RIGHT_UP, self.OnTypesTreeRightUp)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   415
                    self.TypesTree.Bind(wx.EVT_LEFT_UP, self.OnTypesTreeLeftUp)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   416
                else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   417
                    wx.EVT_RIGHT_UP(self.TypesTree, self.OnTypesTreeRightUp)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   418
                    wx.EVT_LEFT_UP(self.TypesTree, self.OnTypesTreeLeftUp)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   419
                self.Bind(wx.EVT_TREE_SEL_CHANGING, self.OnTypesTreeItemChanging,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   420
                      id=ID_PLCOPENEDITORTYPESTREE)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   421
            self.Bind(wx.EVT_TREE_BEGIN_DRAG, self.OnTypesTreeBeginDrag,
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   422
                  id=ID_PLCOPENEDITORTYPESTREE)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   423
            self.Bind(wx.EVT_TREE_BEGIN_LABEL_EDIT, self.OnTypesTreeItemBeginEdit,
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   424
                  id=ID_PLCOPENEDITORTYPESTREE)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   425
            self.Bind(wx.EVT_TREE_END_LABEL_EDIT, self.OnTypesTreeItemEndEdit,
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   426
                  id=ID_PLCOPENEDITORTYPESTREE)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   427
            self.Bind(wx.EVT_TREE_ITEM_ACTIVATED, self.OnTypesTreeItemActivated,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   428
                  id=ID_PLCOPENEDITORTYPESTREE)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   429
        
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   430
        self.InstancesTree = wx.TreeCtrl(id=ID_PLCOPENEDITORINSTANCESTREE,
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   431
                  name='InstancesTree', parent=self.TreeNoteBook, 
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   432
                  pos=wx.Point(0, 0), size=wx.Size(0, 0),
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   433
                  style=wx.TR_HAS_BUTTONS|wx.TR_SINGLE|wx.SUNKEN_BORDER)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   434
        if self.Debug:
301
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
   435
            if wx.VERSION >= (2, 6, 0):
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
   436
                self.InstancesTree.Bind(wx.EVT_RIGHT_UP, self.OnInstancesTreeRightUp)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
   437
            else:
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
   438
                wx.EVT_RIGHT_UP(self.InstancesTree, self.OnInstancesTreeRightUp)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   439
            self.Bind(wx.EVT_TREE_BEGIN_DRAG, self.OnInstancesTreeBeginDrag,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   440
                  id=ID_PLCOPENEDITORINSTANCESTREE)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   441
            self.Bind(wx.EVT_TREE_ITEM_ACTIVATED, self.OnInstancesTreeItemActivated,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   442
                  id=ID_PLCOPENEDITORINSTANCESTREE)
120
add8e391e00c Adding support for wxAUI in wx 2.8
lbessard
parents: 118
diff changeset
   443
            
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   444
            self.TreeNoteBook.AddPage(self.InstancesTree, "Instances")
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   445
            self.TreeNoteBook.AddPage(self.TypesTree, "Types")
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   446
            
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   447
            if USE_AUI:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   448
                self.TabsOpened = wx.aui.AuiNotebook(self)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   449
                self.TabsOpened.Bind(wx.aui.EVT_AUINOTEBOOK_PAGE_CHANGED,
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   450
                        self.OnPouSelectedChanged)
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   451
                self.TabsOpened.Bind(wx.aui.EVT_AUINOTEBOOK_PAGE_CLOSE,
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   452
                        self.OnPageClose)
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   453
                self.TabsOpened.Bind(wx.aui.EVT_AUINOTEBOOK_END_DRAG,
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   454
                        self.OnPageDragged)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   455
                self.AUIManager.AddPane(self.TabsOpened, wx.aui.AuiPaneInfo().CentrePane())
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   456
                
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   457
                self.DebugVariablePanel = DebugVariablePanel(self, self.Controler)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   458
                self.AUIManager.AddPane(self.DebugVariablePanel, wx.aui.AuiPaneInfo().Caption("Variables").Right().Layer(0).BestSize(wx.Size(250, 600)).CloseButton(False))
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   459
            else:
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   460
                self.SecondSplitter = wx.SplitterWindow(id=ID_PLCOPENEDITORSECONDSPLITTER,
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   461
                      name='SecondSplitter', parent=self.MainSplitter, point=wx.Point(0, 0),
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   462
                      size=wx.Size(0, 0), style=wx.SP_3D)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   463
                self.SecondSplitter.SetMinimumPaneSize(1)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   464
                
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   465
                self.MainSplitter.SplitVertically(self.TreeNoteBook, self.SecondSplitter, 200)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   466
                
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   467
                self.TabsOpened = wx.Notebook(id=ID_PLCOPENEDITORTABSOPENED,
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   468
                      name='TabsOpened', parent=self.SecondSplitter, pos=wx.Point(0,
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   469
                      0), size=wx.Size(0, 0), style=0)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   470
                if wx.VERSION >= (2, 6, 0):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   471
                    self.TabsOpened.Bind(wx.EVT_NOTEBOOK_PAGE_CHANGED,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   472
                        self.OnPouSelectedChanged, id=ID_PLCOPENEDITORTABSOPENED)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   473
                else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   474
                    wx.EVT_NOTEBOOK_PAGE_CHANGED(self.TabsOpened, ID_PLCOPENEDITORTABSOPENED,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   475
                        self.OnPouSelectedChanged)
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   476
                
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   477
                self.DebugVariablePanel = DebugVariablePanel(self.SecondSplitter, self.Controler)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   478
                
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   479
                self.SecondSplitter.SplitVertically(self.TabsOpened, self.DebugVariablePanel, -250)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   480
        else:
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   481
            self.TreeNoteBook.AddPage(self.TypesTree, "Types")
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   482
            self.TreeNoteBook.AddPage(self.InstancesTree, "Instances")
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   483
            
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   484
            if USE_AUI:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   485
                ToolBar = wx.ToolBar(self, ID_PLCOPENEDITORTOOLBAR, wx.DefaultPosition, wx.DefaultSize,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   486
                        wx.TB_FLAT | wx.TB_NODIVIDER | wx.NO_BORDER)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   487
                ToolBar.SetToolBitmapSize(wx.Size(25, 25))
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   488
                ToolBar.AddRadioTool(ID_PLCOPENEDITORTOOLBARSELECTION, 
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   489
                      wx.Bitmap(os.path.join(CWD, 'Images', 'select.png')), wx.NullBitmap, "Select an object")
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   490
                ToolBar.Realize()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   491
                self.Panes["ToolBar"] = ToolBar
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   492
                self.AUIManager.AddPane(ToolBar, wx.aui.AuiPaneInfo().
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   493
                          Name("ToolBar").Caption("Toolbar").
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   494
                          ToolbarPane().Top().
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   495
                          LeftDockable(False).RightDockable(False))
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   496
            else:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   497
                self.ToolBar = self.CreateToolBar(wx.TB_HORIZONTAL|wx.TB_FLAT|wx.NO_BORDER, 
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   498
                      ID_PLCOPENEDITORTOOLBAR, 'ToolBar')
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   499
                self.ToolBar.SetToolBitmapSize(wx.Size(25, 25))
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   500
                self.ToolBar.AddRadioTool(ID_PLCOPENEDITORTOOLBARSELECTION, 
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   501
                      wx.Bitmap(os.path.join(CWD, 'Images', 'select.png')), wx.NullBitmap, "Select an object")
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   502
                self.ToolBar.Realize()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   503
            
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   504
            self.Bind(wx.EVT_TOOL, self.OnSelectionTool, 
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   505
                  id=ID_PLCOPENEDITORTOOLBARSELECTION)
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   506
            
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   507
            if USE_AUI:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   508
                self.VariablePanelIndexer = VariablePanelIndexer(self, self, self.Controler)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   509
                self.AUIManager.AddPane(self.VariablePanelIndexer, wx.aui.AuiPaneInfo().Caption("Variables").Bottom().Layer(0).BestSize(wx.Size(800, 200)).CloseButton(False))
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   510
            
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   511
                self.TabsOpened = wx.aui.AuiNotebook(self)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   512
                self.TabsOpened.Bind(wx.aui.EVT_AUINOTEBOOK_PAGE_CHANGED,
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   513
                        self.OnPouSelectedChanged)
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   514
                self.TabsOpened.Bind(wx.aui.EVT_AUINOTEBOOK_PAGE_CLOSE,
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   515
                        self.OnPageClose)
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   516
                self.TabsOpened.Bind(wx.aui.EVT_AUINOTEBOOK_END_DRAG,
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   517
                        self.OnPageDragged)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   518
                self.AUIManager.AddPane(self.TabsOpened, wx.aui.AuiPaneInfo().CentrePane().MinSize(wx.Size(0, 0)))
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   519
            
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   520
                self.LibraryPanel = wx.Panel(id=ID_PLCOPENEDITORLIBRARYPANEL,
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   521
                      name='LibraryPanel', parent=self, pos=wx.Point(0,
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   522
                      0), size=wx.Size(0, 0), style=0)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   523
                self.AUIManager.AddPane(self.LibraryPanel, wx.aui.AuiPaneInfo().Caption("Library").Right().Layer(0).BestSize(wx.Size(250, 400)).CloseButton(False))
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   524
            else:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   525
                self.SecondSplitter = wx.SplitterWindow(id=ID_PLCOPENEDITORSECONDSPLITTER,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   526
                      name='SecondSplitter', parent=self.MainSplitter, point=wx.Point(0, 0),
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   527
                      size=wx.Size(0, 0), style=wx.SP_3D)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   528
                self.SecondSplitter.SetMinimumPaneSize(1)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   529
                
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   530
                self.MainSplitter.SplitVertically(self.TreeNoteBook, self.SecondSplitter, 200)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   531
                
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   532
                self.VariablePanelIndexer = VariablePanelIndexer(self.SecondSplitter, self, self.Controler)
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   533
            
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   534
                self.ThirdSplitter = wx.SplitterWindow(id=ID_PLCOPENEDITORTHIRDSPLITTER,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   535
                      name='ThirdSplitter', parent=self.SecondSplitter, point=wx.Point(0, 0),
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   536
                      size=wx.Size(0, 0), style=wx.SP_3D)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   537
                self.ThirdSplitter.SetMinimumPaneSize(1)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   538
                
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   539
                self.SecondSplitter.SplitHorizontally(self.ThirdSplitter, self.VariablePanelIndexer, -200)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   540
                
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   541
                self.TabsOpened = wx.Notebook(id=ID_PLCOPENEDITORTABSOPENED,
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   542
                      name='TabsOpened', parent=self.ThirdSplitter, pos=wx.Point(0,
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   543
                      0), size=wx.Size(0, 0), style=0)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   544
                self.TabsImageList = wx.ImageList(16, 31)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   545
                self.TabsOpened.SetImageList(self.TabsImageList)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   546
                self.TabsImageListIndexes = {}
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   547
                if wx.VERSION >= (2, 6, 0):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   548
                    self.TabsOpened.Bind(wx.EVT_NOTEBOOK_PAGE_CHANGED,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   549
                        self.OnPouSelectedChanged, id=ID_PLCOPENEDITORTABSOPENED)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   550
                else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   551
                    wx.EVT_NOTEBOOK_PAGE_CHANGED(self.TabsOpened, ID_PLCOPENEDITORTABSOPENED,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   552
                        self.OnPouSelectedChanged)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   553
            
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   554
                self.LibraryPanel = wx.Panel(id=ID_PLCOPENEDITORLIBRARYPANEL,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   555
                      name='LibraryPanel', parent=self.ThirdSplitter, pos=wx.Point(0,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   556
                      0), size=wx.Size(0, 0), style=wx.SUNKEN_BORDER)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   557
                
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   558
                self.ThirdSplitter.SplitVertically(self.TabsOpened, self.LibraryPanel, -250)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   559
                
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   560
            if wx.Platform == '__WXMSW__':
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   561
                librarytreestyle = wx.TR_HAS_BUTTONS|wx.TR_SINGLE|wx.SUNKEN_BORDER
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   562
            else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   563
                librarytreestyle = wx.TR_HAS_BUTTONS|wx.TR_HIDE_ROOT|wx.TR_SINGLE|wx.SUNKEN_BORDER
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   564
            self.LibraryTree = wx.TreeCtrl(id=ID_PLCOPENEDITORLIBRARYTREE,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   565
                      name='LibraryTree', parent=self.LibraryPanel, 
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   566
                      pos=wx.Point(0, 0), size=wx.Size(0, 0),
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   567
                      style=librarytreestyle)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   568
            self.Bind(wx.EVT_TREE_SEL_CHANGED, self.OnLibraryTreeItemSelected,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   569
                  id=ID_PLCOPENEDITORLIBRARYTREE)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   570
            self.Bind(wx.EVT_TREE_BEGIN_DRAG, self.OnLibraryTreeBeginDrag,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   571
                  id=ID_PLCOPENEDITORLIBRARYTREE)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   572
            
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   573
            self.LibraryComment = wx.TextCtrl(id=ID_PLCOPENEDITORLIBRARYCOMMENT,
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   574
                      name='LibraryComment', parent=self.LibraryPanel, 
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   575
                      pos=wx.Point(0, 0), size=wx.Size(0, 60), 
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   576
                      style=wx.TE_READONLY|wx.TE_MULTILINE)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   577
            
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   578
            self._init_sizers()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   579
        
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   580
        if USE_AUI:
241
64e584348a5b Bug on Windows with LibraryTree fixed
lbessard
parents: 240
diff changeset
   581
            self.AUIManager.Update()
64e584348a5b Bug on Windows with LibraryTree fixed
lbessard
parents: 240
diff changeset
   582
    
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   583
    def __init__(self, parent, controler = None, fileOpen = None, debug = False):
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
   584
        self.ModeSolo = controler == None
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   585
        self.Debug = debug
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   586
        if self.ModeSolo:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   587
            self.Controler = PLCControler()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   588
            if fileOpen is not None:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   589
                self.Controler.OpenXMLFile(fileOpen)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   590
        else:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   591
            self.Controler = controler
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   592
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   593
        self._init_ctrls(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   594
        
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   595
        self.SetIcon(wx.Icon(os.path.join(CWD,"Images","poe.ico"),wx.BITMAP_TYPE_ICO))
176
18af41faafd1 add icon support in init
greg
parents: 171
diff changeset
   596
        
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   597
        self.TypesTreeImageList = wx.ImageList(16, 16)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   598
        self.InstancesTreeImageList = wx.ImageList(16, 16)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   599
        self.TypesTreeImageDict = {}
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   600
        self.InstancesTreeImageDict = {}
184
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   601
        for language in LANGUAGES:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   602
            self.TypesTreeImageDict[language]=self.TypesTreeImageList.Add(wx.Bitmap(os.path.join(CWD, 'Images', '%s.png'%language)))
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   603
            self.InstancesTreeImageDict[language]=self.InstancesTreeImageList.Add(wx.Bitmap(os.path.join(CWD, 'Images', '%s.png'%language)))
184
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   604
        
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   605
        for imgname, itemtype in [
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   606
            #editables
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   607
            ("PROJECT",        ITEM_PROJECT),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   608
            #("POU",            ITEM_POU),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   609
            #("VARIABLE",       ITEM_VARIABLE),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   610
            ("TRANSITION",     ITEM_TRANSITION),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   611
            ("ACTION",         ITEM_ACTION),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   612
            ("CONFIGURATION",  ITEM_CONFIGURATION),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   613
            ("RESOURCE",       ITEM_RESOURCE),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   614
            ("DATATYPE",       ITEM_DATATYPE),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   615
            # uneditables
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   616
            ("DATATYPES",      ITEM_DATATYPES),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   617
            ("FUNCTION",       ITEM_FUNCTION),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   618
            ("FUNCTIONBLOCK",  ITEM_FUNCTIONBLOCK),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   619
            ("PROGRAM",        ITEM_PROGRAM),
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   620
            ("VAR_LOCAL",      ITEM_VAR_LOCAL),
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   621
            ("VAR_LOCAL",      ITEM_VAR_GLOBAL),
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   622
            ("VAR_LOCAL",      ITEM_VAR_EXTERNAL),
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   623
            ("VAR_LOCAL",      ITEM_VAR_TEMP),
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   624
            ("VAR_INPUT",      ITEM_VAR_INPUT),
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   625
            ("VAR_OUTPUT",     ITEM_VAR_OUTPUT),
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   626
            ("VAR_INOUT",      ITEM_VAR_INOUT),
184
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   627
            ("TRANSITIONS",    ITEM_TRANSITIONS),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   628
            ("ACTIONS",        ITEM_ACTIONS),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   629
            ("CONFIGURATIONS", ITEM_CONFIGURATIONS),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   630
            ("RESOURCES",      ITEM_RESOURCES),
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
   631
            ("PROPERTIES",     ITEM_PROPERTIES)]:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   632
            self.TypesTreeImageDict[itemtype]=self.TypesTreeImageList.Add(wx.Bitmap(os.path.join(CWD, 'Images', '%s.png'%imgname)))
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   633
            self.InstancesTreeImageDict[itemtype]=self.InstancesTreeImageList.Add(wx.Bitmap(os.path.join(CWD, 'Images', '%s.png'%imgname)))
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   634
        self.TypesTree.AssignImageList(self.TypesTreeImageList)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   635
        self.InstancesTree.AssignImageList(self.InstancesTreeImageList)
9
b29105e29081 Adding test on step names in SFC Editor
lbessard
parents: 8
diff changeset
   636
        
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   637
        self.CurrentToolBar = []
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   638
        self.CurrentLanguage = ""
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
   639
        self.SelectedItem = None
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
   640
        self.Errors = []
71
0578bc212c20 Adding Dialog for Step in free drawing
lbessard
parents: 70
diff changeset
   641
        self.DrawingMode = FREEDRAWING_MODE
0578bc212c20 Adding Dialog for Step in free drawing
lbessard
parents: 70
diff changeset
   642
        #self.DrawingMode = DRIVENDRAWING_MODE
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   643
        if USE_AUI:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   644
            self.AuiTabCtrl = []
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
   645
        
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   646
        self.PrintData = wx.PrintData()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   647
        self.PrintData.SetPaperId(wx.PAPER_A4)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   648
        self.PrintData.SetPrintMode(wx.PRINT_MODE_PRINTER)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   649
        self.PageSetupData = wx.PageSetupDialogData(self.PrintData)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   650
        self.PageSetupData.SetMarginTopLeft(wx.Point(10, 15))
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   651
        self.PageSetupData.SetMarginBottomRight(wx.Point(10, 20))
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   652
        
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   653
        if not self.ModeSolo or fileOpen is not None:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   654
            self.RefreshTypesTree()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   655
            self.RefreshInstancesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   656
            self.RefreshLibraryTree()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   657
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   658
        self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   659
        self.RefreshEditMenu()
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   660
        self.RefreshDisplayMenu()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   661
        self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   662
        self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   663
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
   664
    def ResetSelectedItem(self):
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
   665
        self.SelectedItem = None
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
   666
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   667
    def OnPageClose(self, event):
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   668
        selected = event.GetSelection()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   669
        if selected >= 0:
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   670
            if not self.Debug:
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   671
                tagname = self.TabsOpened.GetPage(selected).GetTagName()
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   672
                self.VariablePanelIndexer.RemoveVariablePanel(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   673
            if self.TabsOpened.GetPageCount() > 0:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   674
                new_index = min(selected, self.TabsOpened.GetPageCount() - 1)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   675
                self.TabsOpened.SetSelection(new_index)
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   676
                if not self.Debug:
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   677
                    tagname = self.TabsOpened.GetPage(new_index).GetTagName()
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   678
                    self.VariablePanelIndexer.ChangeVariablePanel(tagname)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   679
            self.RefreshTitle()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   680
            self.RefreshFileMenu()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   681
            self.RefreshEditMenu()
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   682
            self.RefreshDisplayMenu()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   683
            self.RefreshToolBar()
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   684
        wx.CallAfter(self.RefreshTabCtrlEvent)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   685
        event.Skip()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   686
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   687
    def OnPageDragged(self, event):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   688
        wx.CallAfter(self.RefreshTabCtrlEvent)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   689
        event.Skip()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   690
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   691
    def GetCopyBuffer(self):
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   692
        return PLCOpenEditor.CopyBuffer
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   693
    
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   694
    def SetCopyBuffer(self, element):
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   695
        PLCOpenEditor.CopyBuffer = element
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   696
        self.RefreshEditMenu()
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
   697
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   698
    def GetDrawingMode(self):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   699
        return self.DrawingMode
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   700
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   701
    def RefreshTitle(self):
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   702
        name = "PLCOpenEditor"
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   703
        if self.Debug:
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   704
            name += " (Debug)"
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   705
        if self.Controler.HasOpenedProject() > 0:
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   706
            self.SetTitle("%s - %s"%(name, self.Controler.GetFilename()))
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   707
        else:
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
   708
            self.SetTitle(name)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   709
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
   710
    def RefreshScaling(self):
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
   711
        for i in xrange(self.TabsOpened.GetPageCount()):
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
   712
            editor = self.TabsOpened.GetPage(i)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
   713
            editor.RefreshScaling()
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
   714
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   715
    def ShowProperties(self):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   716
        old_values = self.Controler.GetProjectProperties(self.Debug)
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   717
        dialog = ProjectDialog(self)
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   718
        dialog.SetValues(old_values)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   719
        if dialog.ShowModal() == wx.ID_OK:
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   720
            new_values = dialog.GetValues()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   721
            new_values["creationDateTime"] = old_values["creationDateTime"]
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
   722
            if new_values != old_values:
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
   723
                self.Controler.SetProjectProperties(None, new_values)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
   724
                self.RefreshTitle()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
   725
                self.RefreshFileMenu()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
   726
                self.RefreshEditMenu()
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
   727
                self.RefreshDisplayMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   728
                self.RefreshTypesTree()
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
   729
                self.RefreshScaling()
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   730
        dialog.Destroy()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
   731
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   732
    def OnCloseFrame(self, event):
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
   733
        if not self.ModeSolo and getattr(self, "_onclose", None) is not None:
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   734
            self.AUIManager.UnInit()
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
   735
            self._onclose()
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
   736
            event.Skip()
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
   737
        elif not self.Controler.ProjectIsSaved():
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
   738
            dialog = wx.MessageDialog(self, "There are changes, do you want to save?", "Close Application", wx.YES_NO|wx.CANCEL|wx.ICON_QUESTION)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   739
            answer = dialog.ShowModal()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   740
            dialog.Destroy()
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   741
            if answer == wx.ID_YES:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   742
                self.SaveProject()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   743
                event.Skip()
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   744
            elif answer == wx.ID_NO:
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
   745
                self.Controler.Reset()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   746
                self.AUIManager.UnInit()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   747
                event.Skip()
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
   748
            else:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
   749
                event.Veto()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   750
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   751
            event.Skip()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   752
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   753
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   754
#                            Notebook Unified Functions
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   755
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   756
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   757
    def GenerateBitmap(self, icon1_name, icon2_name = None):
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   758
        if not USE_AUI:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   759
            index = self.TabsImageListIndexes.get((icon1_name, icon2_name), None)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   760
            if index is not None:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   761
                return index
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   762
        if icon2_name is None:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   763
            tmp_bitmap = wx.Bitmap(os.path.join(CWD, 'Images', '%s.png'%icon1_name))
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   764
        else:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   765
            icon1 = wx.Bitmap(os.path.join(CWD, 'Images', '%s.png'%icon1_name))
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   766
            icon2 = wx.Bitmap(os.path.join(CWD, 'Images', '%s.png'%icon2_name))
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   767
            width = icon1.GetWidth() + icon2.GetWidth() - 1
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   768
            height = max(icon1.GetHeight(), icon2.GetHeight())
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   769
            tmp_bitmap = wx.EmptyBitmap(width, height)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   770
            dc = wx.MemoryDC()
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   771
            dc.SelectObject(tmp_bitmap)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   772
            dc.Clear()
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   773
            dc.DrawBitmap(icon1, 0, 0)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   774
            dc.DrawBitmap(icon2, icon1.GetWidth() - 1, 0)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   775
        if USE_AUI:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   776
            return tmp_bitmap
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   777
        else:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   778
            index = self.TabsImageList.Add(tmp_bitmap)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   779
            self.TabsImageListIndexes[(icon1_name, icon2_name)] = index
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   780
            return index
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
   781
    
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
   782
    def AddPage(self, window, text):
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
   783
        self.TabsOpened.AddPage(window, text)
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   784
        self.RefreshTabCtrlEvent()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   785
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   786
    def RefreshTabCtrlEvent(self):
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
   787
        if USE_AUI:
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   788
            auitabctrl = []
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   789
            for child in self.TabsOpened.GetChildren():
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   790
                if isinstance(child, wx.aui.AuiTabCtrl):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   791
                    auitabctrl.append(child)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   792
                    if child not in self.AuiTabCtrl:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   793
                        child.Bind(wx.EVT_LEFT_DCLICK, self.GetTabsOpenedDClickFunction(child))
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   794
            self.AuiTabCtrl = auitabctrl
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   795
            if self.TabsOpened.GetPageCount() == 0:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   796
                pane = self.AUIManager.GetPane(self.TabsOpened)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   797
                if pane.IsMaximized():
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   798
                    self.AUIManager.RestorePane(pane)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
   799
                self.AUIManager.Update()
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
   800
    
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   801
    def DeleteAllPages(self):
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   802
        if USE_AUI:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   803
            for idx in xrange(self.TabsOpened.GetPageCount()):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   804
                self.TabsOpened.DeletePage(0)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   805
        else:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   806
            self.TabsOpened.DeleteAllPages()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   807
203
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
   808
    def SetPageBitmap(self, idx, bitmap):
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
   809
        if USE_AUI:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   810
            return self.TabsOpened.SetPageBitmap(idx, bitmap)
203
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
   811
        else:
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
   812
            return self.TabsOpened.SetPageImage(idx, bitmap)
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
   813
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   814
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   815
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   816
#                            File Menu Functions
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   817
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   818
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   819
    def RefreshFileMenu(self):
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   820
        if self.Controler.HasOpenedProject():
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   821
            selected = self.TabsOpened.GetSelection()
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   822
            if selected >= 0:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   823
                graphic_viewer = isinstance(self.TabsOpened.GetPage(selected), Viewer)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   824
            else:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   825
                graphic_viewer = False
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   826
            if self.TabsOpened.GetPageCount() > 0:
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   827
                self.FileMenu.Enable(wx.ID_CLOSE, True)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   828
                if graphic_viewer:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   829
                    self.FileMenu.Enable(wx.ID_PREVIEW, True)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   830
                    self.FileMenu.Enable(wx.ID_PRINT, True)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   831
                else:
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   832
                    self.FileMenu.Enable(wx.ID_PREVIEW, False)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
   833
                    self.FileMenu.Enable(wx.ID_PRINT, False)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   834
            else:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   835
                self.FileMenu.Enable(wx.ID_CLOSE, False)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   836
                self.FileMenu.Enable(wx.ID_PREVIEW, False)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   837
                self.FileMenu.Enable(wx.ID_PRINT, False)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   838
            self.FileMenu.Enable(wx.ID_PAGE_SETUP, True)
309
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
   839
            if not self.Debug:
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
   840
                self.FileMenu.Enable(wx.ID_SAVE, True)
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
   841
                self.FileMenu.Enable(wx.ID_PROPERTIES, True)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   842
            if self.ModeSolo:
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   843
                self.FileMenu.Enable(wx.ID_CLOSE_ALL, True)
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   844
                self.FileMenu.Enable(wx.ID_SAVEAS, True)
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   845
                self.FileMenu.Enable(ID_PLCOPENEDITORFILEMENUGENERATE, True)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   846
        else:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   847
            self.FileMenu.Enable(wx.ID_CLOSE, False)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   848
            self.FileMenu.Enable(wx.ID_PAGE_SETUP, False)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   849
            self.FileMenu.Enable(wx.ID_PREVIEW, False)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   850
            self.FileMenu.Enable(wx.ID_PRINT, False)
309
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
   851
            if not self.Debug:
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
   852
                self.FileMenu.Enable(wx.ID_SAVE, False)
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
   853
                self.FileMenu.Enable(wx.ID_PROPERTIES, False)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
   854
            if self.ModeSolo:
185
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   855
                self.FileMenu.Enable(wx.ID_CLOSE_ALL, False)
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   856
                self.FileMenu.Enable(wx.ID_SAVEAS, False)
fdc8a59b02bd Adding icon to menus
lbessard
parents: 184
diff changeset
   857
                self.FileMenu.Enable(ID_PLCOPENEDITORFILEMENUGENERATE, False)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
   858
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   859
    def OnNewProjectMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   860
        dialog = ProjectDialog(self)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   861
        if dialog.ShowModal() == wx.ID_OK:
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
   862
            properties = dialog.GetValues()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
   863
            self.Controler.CreateNewProject(properties)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   864
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   865
            self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   866
            self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   867
            self.RefreshTypesTree()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   868
            self.RefreshInstancesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   869
            self.RefreshLibraryTree()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   870
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   871
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   872
    def OnOpenProjectMenu(self, event):
144
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   873
        if not self.Controler.ProjectIsSaved():
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   874
            dialog = wx.MessageDialog(self, "There are changes, do you want to save?", "Close Application", wx.YES_NO|wx.CANCEL|wx.ICON_QUESTION)
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   875
            answer = dialog.ShowModal()
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   876
            dialog.Destroy()
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   877
            if answer == wx.ID_YES:
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   878
                self.SaveProject()
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   879
            elif answer == wx.ID_CANCEL:
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   880
                return
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   881
        filepath = self.Controler.GetFilePath()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   882
        if filepath != "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   883
            directory = os.path.dirname(filepath)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   884
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   885
            directory = os.getcwd()
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   886
        dialog = wx.FileDialog(self, "Choose a file", directory, "",  "PLCOpen files (*.xml)|*.xml|All files|*.*", wx.OPEN)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   887
        if dialog.ShowModal() == wx.ID_OK:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   888
            filepath = dialog.GetPath()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   889
            if os.path.isfile(filepath):
144
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   890
                self.DeleteAllPages()
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   891
                self.VariablePanelIndexer.RemoveAllPanels()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   892
                self.Controler.OpenXMLFile(filepath)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   893
                self.RefreshTypesTree()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   894
                self.RefreshInstancesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
   895
                self.RefreshLibraryTree()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   896
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   897
            self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   898
            self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   899
            self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   900
        dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   901
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   902
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   903
    def OnCloseTabMenu(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   904
        selected = self.TabsOpened.GetSelection()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   905
        if selected >= 0:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   906
            if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   907
                tagname = self.TabsOpened.GetPage(selected).GetTagName()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   908
                self.VariablePanelIndexer.RemoveVariablePanel(tagname)
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
   909
            self.TabsOpened.DeletePage(selected)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   910
            if self.TabsOpened.GetPageCount() > 0:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   911
                new_index = min(selected, self.TabsOpened.GetPageCount() - 1)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   912
                self.TabsOpened.SetSelection(new_index)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   913
                if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   914
                    tagname = self.TabsOpened.GetPage(new_index).GetTagName()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   915
                    self.VariablePanelIndexer.ChangeVariablePanel(tagname)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   916
            self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   917
            self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   918
            self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   919
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   920
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   921
    def OnCloseProjectMenu(self, event):
144
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   922
        if not self.Controler.ProjectIsSaved():
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   923
            dialog = wx.MessageDialog(self, "There are changes, do you want to save?", "Close Application", wx.YES_NO|wx.CANCEL|wx.ICON_QUESTION)
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   924
            answer = dialog.ShowModal()
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   925
            dialog.Destroy()
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   926
            if answer == wx.ID_YES:
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   927
                self.SaveProject()
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   928
            elif answer == wx.ID_CANCEL:
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
   929
                return
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   930
        self.DeleteAllPages()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
   931
        self.VariablePanelIndexer.RemoveAllPanels()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   932
        self.TypesTree.DeleteAllItems()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
   933
        self.InstancesTree.DeleteAllItems()
102
85875dcb7754 Adding edit user's POU by double click on block instance
lbessard
parents: 98
diff changeset
   934
        self.Controler.Reset()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   935
        self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   936
        self.RefreshFileMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   937
        self.RefreshEditMenu()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   938
        self.RefreshToolBar()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   939
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   940
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   941
    def OnSaveProjectMenu(self, event):
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
   942
        if not self.ModeSolo and getattr(self, "_onsave", None) != None:
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
   943
            self._onsave()
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
   944
        else:
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
   945
            self.SaveProject()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   946
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   947
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   948
    def OnSaveProjectAsMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   949
        self.SaveProjectAs()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   950
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   951
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   952
    def OnGenerateProgramMenu(self, event):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   953
        dialog = wx.FileDialog(self, "Choose a file", os.getcwd(), self.Controler.GetProgramFilePath(),  "ST files (*.st)|*.st|All files|*.*", wx.SAVE|wx.CHANGE_DIR)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   954
        if dialog.ShowModal() == wx.ID_OK:
4
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   955
            filepath = dialog.GetPath()
307
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   956
            message_text = ""
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   957
            header, icon = "Done", wx.ICON_INFORMATION
4
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   958
            if os.path.isdir(os.path.dirname(filepath)):
307
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   959
                program, errors, warnings = self.Controler.GenerateProgram(filepath)
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   960
                message_text += "".join(["warning: %s\n" for warning in warnings])
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   961
                if len(errors) > 0:
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   962
                    message_text += "".join(["error: %s\n" for warning in warnings])
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   963
                    message_text += "Can't generate program to file %s!"%filepath
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   964
                    header, icon = "Error", wx.ICON_ERROR
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 65
diff changeset
   965
                else:
307
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   966
                    message_text += "Program was successfully generated!"
4
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   967
            else:
307
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   968
                message_text += "%s is not a valid folder!"%os.path.dirname(filepath)
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   969
                header, icon = "Error", wx.ICON_ERROR
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   970
            message = wx.MessageDialog(self, message_text, header, wx.OK|icon)
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   971
            message.ShowModal()
fd1f6ae26d4f Adding support for cancelling code generation of function with no input connected
lbessard
parents: 304
diff changeset
   972
            message.Destroy()
4
2de7fd952fdd Adding File Dialog for choosing path to generated program
lbessard
parents: 3
diff changeset
   973
        dialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   974
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   975
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   976
    def SaveProject(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   977
        result = self.Controler.SaveXMLFile()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   978
        if not result:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   979
            self.SaveProjectAs()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   980
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
   981
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   982
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   983
    def SaveProjectAs(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   984
        filepath = self.Controler.GetFilePath()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   985
        if filepath != "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   986
            directory, filename = os.path.split(filepath)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   987
        else:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
   988
            directory, filename = os.getcwd(), "%(projectName)s.xml"%self.Controler.GetProjectProperties(self.Debug)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   989
        dialog = wx.FileDialog(self, "Choose a file", directory, filename,  "PLCOpen files (*.xml)|*.xml|All files|*.*", wx.SAVE|wx.OVERWRITE_PROMPT)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   990
        if dialog.ShowModal() == wx.ID_OK:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   991
            filepath = dialog.GetPath()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   992
            if os.path.isdir(os.path.dirname(filepath)):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   993
                result = self.Controler.SaveXMLFile(filepath)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   994
                if not result:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   995
                    message = wx.MessageDialog(self, "Can't save project to file %s!"%filepath, "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   996
                    message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   997
                    message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
   998
            else:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
   999
                message = wx.MessageDialog(self, "%s is not a valid folder!"%os.path.dirname(filepath), "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1000
                message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1001
                message.Destroy()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1002
            self.RefreshTitle()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1003
        dialog.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1004
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1005
    def OnPageSetupMenu(self, event):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1006
        dialog = wx.PageSetupDialog(self, self.PageSetupData)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1007
        if dialog.ShowModal() == wx.ID_OK:
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1008
            self.PageSetupData = wx.PageSetupDialogData(dialog.GetPageSetupData())
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1009
            self.PrintData = wx.PrintData(self.PageSetupData.GetPrintData())
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1010
        dialog.Destroy()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1011
        event.Skip()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1012
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1013
    def OnPreviewMenu(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1014
        selected = self.TabsOpened.GetSelection()        
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1015
        if selected != -1:
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1016
            data = wx.PrintDialogData(self.PrintData)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1017
            properties = self.Controler.GetProjectProperties(self.Debug)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1018
            page_size = map(int, properties["pageSize"])
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1019
            margins = (self.PageSetupData.GetMarginTopLeft(), self.PageSetupData.GetMarginBottomRight())
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1020
            printout = GraphicPrintout(self.TabsOpened.GetPage(selected), page_size, margins, True)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1021
            printout2 = GraphicPrintout(self.TabsOpened.GetPage(selected), page_size, margins, True)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1022
            preview = wx.PrintPreview(printout, printout2, data)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1023
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1024
            if preview.Ok():
220
127d1323e5e0 Added File menu, even in non-solo mode.
etisserant
parents: 219
diff changeset
  1025
                preview_frame = wx.PreviewFrame(preview, self, "Print preview")
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1026
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1027
                preview_frame.Initialize()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1028
                
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1029
                preview_frame.Show(True)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1030
        event.Skip()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1031
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1032
    def OnPrintMenu(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1033
        selected = self.TabsOpened.GetSelection()        
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1034
        if selected != -1:
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1035
            dialog_data = wx.PrintDialogData(self.PrintData)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1036
            dialog_data.SetToPage(1)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1037
            properties = self.Controler.GetProjectProperties(self.Debug)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1038
            page_size = map(int, properties["pageSize"])
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1039
            margins = (self.PageSetupData.GetMarginTopLeft(), self.PageSetupData.GetMarginBottomRight())
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1040
            printer = wx.Printer(dialog_data)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1041
            printout = GraphicPrintout(self.TabsOpened.GetPage(selected), page_size, margins)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1042
            
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1043
            if not printer.Print(self, printout, True):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1044
                wx.MessageBox("There was a problem printing.\nPerhaps your current printer is not set correctly?", "Printing", wx.OK)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1045
            printout.Destroy()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1046
        event.Skip()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  1047
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1048
    def OnPropertiesMenu(self, event):
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1049
        self.ShowProperties()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1050
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1051
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1052
    def OnQuitMenu(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1053
        self.Close()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1054
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1055
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1056
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1057
#-------------------------------------------------------------------------------
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1058
#                            Edit Menu Functions
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1059
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1060
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1061
    def RefreshEditMenu(self):
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1062
        if not self.Debug:
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1063
            self.EditMenu.Check(ID_PLCOPENEDITOREDITMENUENABLEUNDOREDO, 
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1064
                                self.Controler.IsProjectBufferEnabled())
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1065
            if self.Controler.HasOpenedProject():
309
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1066
                undo, redo = self.Controler.GetBufferState()
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1067
                self.EditMenu.Enable(wx.ID_UNDO, undo)
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1068
                self.EditMenu.Enable(wx.ID_REDO, redo)
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1069
                self.EditMenu.Enable(wx.ID_ADD, True)
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1070
                self.EditMenu.Enable(wx.ID_DELETE, True)
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1071
                if self.TabsOpened.GetPageCount() > 0:
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1072
                    self.EditMenu.Enable(wx.ID_CUT, True)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1073
                    self.EditMenu.Enable(wx.ID_COPY, True)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1074
                    if self.CopyBuffer is not None:
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1075
                        self.EditMenu.Enable(wx.ID_PASTE, True)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1076
                    else:
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1077
                        self.EditMenu.Enable(wx.ID_PASTE, False)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1078
                    self.EditMenu.Enable(wx.ID_SELECTALL, True)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1079
                else:
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1080
                    self.EditMenu.Enable(wx.ID_CUT, False)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1081
                    self.EditMenu.Enable(wx.ID_COPY, False)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1082
                    self.EditMenu.Enable(wx.ID_PASTE, False)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1083
                    self.EditMenu.Enable(wx.ID_SELECTALL, False)
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1084
            else:
309
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1085
                self.EditMenu.Enable(wx.ID_UNDO, False)
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1086
                self.EditMenu.Enable(wx.ID_REDO, False)
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1087
                self.EditMenu.Enable(wx.ID_CUT, False)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1088
                self.EditMenu.Enable(wx.ID_COPY, False)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1089
                self.EditMenu.Enable(wx.ID_PASTE, False)
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1090
                self.EditMenu.Enable(wx.ID_SELECTALL, False)
309
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1091
                self.EditMenu.Enable(wx.ID_ADD, False)
aef88ffa5fbc Bug with undefined menu items in File and Edit menus in Debug mode fixed
lbessard
parents: 307
diff changeset
  1092
                self.EditMenu.Enable(wx.ID_DELETE, False)
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1093
    
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1094
    def OnUndoMenu(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1095
        self.Controler.LoadPrevious()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1096
        idxs = range(self.TabsOpened.GetPageCount())
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1097
        idxs.reverse()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1098
        for idx in idxs:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1099
            tagname = self.TabsOpened.GetPage(idx).GetTagName()
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1100
            if self.Controler.GetEditedElement(tagname, self.Debug) is None:
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1101
                self.VariablePanelIndexer.RemoveVariablePanel(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1102
                self.TabsOpened.DeletePage(idx)
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1103
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1104
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1105
            window = self.TabsOpened.GetPage(selected)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1106
            window.RefreshView()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1107
            self.VariablePanelIndexer.RefreshVariablePanel(window.GetTagName())
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1108
        self.RefreshTitle()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1109
        self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1110
        self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1111
        self.RefreshInstancesTree()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1112
        self.RefreshLibraryTree()
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1113
        self.RefreshScaling()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1114
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1115
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1116
    def OnRedoMenu(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1117
        self.Controler.LoadNext()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1118
        idxs = range(self.TabsOpened.GetPageCount())
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1119
        idxs.reverse()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1120
        for idx in idxs:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1121
            tagname = self.TabsOpened.GetPage(idx).GetTagName()
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1122
            if self.Controler.GetEditedElement(tagname, self.Debug) is None:
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1123
                self.VariablePanelIndexer.RemoveVariablePanel(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1124
                self.TabsOpened.DeletePage(idx)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1125
        selected = self.TabsOpened.GetSelection()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1126
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1127
            window = self.TabsOpened.GetPage(selected)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1128
            window.RefreshView()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1129
            self.VariablePanelIndexer.RefreshVariablePanel(window.GetTagName())
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1130
        self.RefreshTitle()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1131
        self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1132
        self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1133
        self.RefreshInstancesTree()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1134
        self.RefreshLibraryTree()
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1135
        self.RefreshScaling()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1136
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1137
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1138
    def OnEnableUndoRedoMenu(self, event):
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1139
        self.Controler.EnableProjectBuffer(event.IsChecked())
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1140
        self.RefreshEditMenu()
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1141
        event.Skip()
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1142
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1143
    def OnCutMenu(self, event):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1144
        control = self.FindFocus()
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  1145
        if isinstance(control, (Viewer, TextViewer)):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1146
            control.Cut()
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  1147
        elif isinstance(control, wx.TextCtrl):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1148
            control.ProcessEvent(event)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1149
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1150
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1151
    def OnCopyMenu(self, event):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1152
        control = self.FindFocus()
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  1153
        if isinstance(control, (Viewer, TextViewer)):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1154
            control.Copy()
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  1155
        elif isinstance(control, wx.TextCtrl):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1156
            control.ProcessEvent(event)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1157
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1158
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1159
    def OnPasteMenu(self, event):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1160
        control = self.FindFocus()
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  1161
        if isinstance(control, (Viewer, TextViewer)):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1162
            control.Paste()
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  1163
        elif isinstance(control, wx.TextCtrl):
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  1164
            control.ProcessEvent(event)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1165
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1166
    
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1167
    def OnSelectAllMenu(self, event):
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1168
        control = self.FindFocus()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1169
        if isinstance(control, (Viewer, TextViewer)):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1170
            control.SelectAll()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1171
        elif isinstance(control, wx.TextCtrl):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1172
            control.SetSelection(0, control.GetLastPosition())
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1173
        elif isinstance(control, wx.ComboBox):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1174
            control.SetMark(0, control.GetLastPosition() + 1)
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1175
        event.Skip()
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1176
    
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1177
    def OnDeleteMenu(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1178
        window = self.FindFocus()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1179
        if window == self.TypesTree:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1180
            selected = self.TypesTree.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1181
            if selected.IsOk():
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1182
                type = self.TypesTree.GetPyData(selected)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1183
                tagname = ""
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1184
                if type == ITEM_DATATYPE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1185
                    name = self.TypesTree.GetItemText(selected)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1186
                    if not self.Controler.DataTypeIsUsed(name, self.Debug):
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1187
                        self.Controler.ProjectRemoveDataType(name)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1188
                        tagname = self.Controler.ComputeDataTypeName(name)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1189
                    else:
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1190
                        message = wx.MessageDialog(self, "\"%s\" is used by one or more POUs. It can't be removed!"%name, "Error", wx.OK|wx.ICON_ERROR)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1191
                        message.ShowModal()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1192
                        message.Destroy()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1193
                elif type == ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1194
                    name = self.TypesTree.GetItemText(selected)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1195
                    if not self.Controler.PouIsUsed(name, self.Debug):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1196
                        self.Controler.ProjectRemovePou(name)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1197
                        tagname = self.Controler.ComputePouName(name)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1198
                    else:
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1199
                        message = wx.MessageDialog(self, "\"%s\" is used by one or more POUs. It can't be removed!"%name, "Error", wx.OK|wx.ICON_ERROR)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1200
                        message.ShowModal()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1201
                        message.Destroy()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1202
                elif type in [ITEM_TRANSITION, ITEM_ACTION]:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1203
                    item = self.TypesTree.GetItemParent(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1204
                    item_type = self.TypesTree.GetPyData(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1205
                    while item_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1206
                        item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1207
                        item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1208
                    pou_name = self.TypesTree.GetItemText(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1209
                    if type == ITEM_TRANSITION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1210
                        transition = self.TypesTree.GetItemText(selected)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1211
                        self.Controler.ProjectRemovePouTransition(pou_name, transition)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1212
                        tagname = self.Controler.ComputePouTransitionName(pou_name, transition)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1213
                    elif type == ITEM_ACTION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1214
                        action = self.TypesTree.GetItemText(selected)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1215
                        self.Controler.ProjectRemovePouAction(pou_name, action)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1216
                        tagname = self.Controler.ComputePouActionName(pou_name, action)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1217
                elif type == ITEM_CONFIGURATION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1218
                    name = self.TypesTree.GetItemText(selected)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1219
                    self.Controler.ProjectRemoveConfiguration(name)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1220
                    tagname = self.Controler.ComputeConfigurationName(name)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1221
                elif type == ITEM_RESOURCE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1222
                    resource = self.TypesTree.GetItemText(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1223
                    item = self.TypesTree.GetItemParent(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1224
                    item_type = self.TypesTree.GetPyData(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1225
                    while item_type != ITEM_CONFIGURATION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1226
                        item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1227
                        item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1228
                    config_name = self.TypesTree.GetItemText(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1229
                    self.Controler.ProjectRemoveConfigurationResource(config_name, resource)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1230
                    tagname = self.Controler.ComputeConfigurationResourceName(config_name, selected)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1231
                idx = self.IsOpened(tagname)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1232
                if idx is not None:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1233
                    self.VariablePanelIndexer.RemoveVariablePanel(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1234
                    self.TabsOpened.DeletePage(idx)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1235
                self.RefreshTitle()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1236
                self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1237
                self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1238
                self.RefreshInstancesTree()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1239
                self.RefreshLibraryTree()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1240
                self.RefreshToolBar()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1241
        elif isinstance(window, (Viewer, TextViewer)):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1242
            event = wx.KeyEvent(wx.EVT_CHAR._getEvtType())
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1243
            event.m_keyCode = wx.WXK_DELETE
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1244
            window.ProcessEvent(event)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1245
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1246
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1247
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1248
#-------------------------------------------------------------------------------
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1249
#                             Display Menu Functions
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1250
#-------------------------------------------------------------------------------
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1251
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1252
    def RefreshDisplayMenu(self):
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1253
        if self.Controler.HasOpenedProject():
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1254
            if self.TabsOpened.GetPageCount() > 0:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1255
                self.DisplayMenu.Enable(wx.ID_REFRESH, True)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1256
                selected = self.TabsOpened.GetSelection()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1257
                if selected != -1:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1258
                    window = self.TabsOpened.GetPage(selected)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1259
                    if isinstance(window, Viewer):
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1260
                        self.DisplayMenu.Enable(wx.ID_ZOOM_FIT, True)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1261
                        zoommenu = self.DisplayMenu.FindItemById(wx.ID_ZOOM_FIT).GetSubMenu()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1262
                        zoomitem = zoommenu.FindItemByPosition(window.GetScale())
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1263
                        zoomitem.Check(True)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1264
                    else:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1265
                        self.DisplayMenu.Enable(wx.ID_ZOOM_FIT, False)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1266
                else:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1267
                    self.DisplayMenu.Enable(wx.ID_ZOOM_FIT, False)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1268
            else:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1269
                self.DisplayMenu.Enable(wx.ID_REFRESH, False)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1270
                self.DisplayMenu.Enable(wx.ID_ZOOM_FIT, False)
352
5cd60f7e510c fixed some bugs:
greg
parents: 350
diff changeset
  1271
            if not self.Debug and not self.ModeSolo:
5cd60f7e510c fixed some bugs:
greg
parents: 350
diff changeset
  1272
                self.DisplayMenu.Enable(wx.ID_CLEAR, True)
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1273
        else:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1274
            self.DisplayMenu.Enable(wx.ID_REFRESH, False)
352
5cd60f7e510c fixed some bugs:
greg
parents: 350
diff changeset
  1275
            if not self.Debug and not self.ModeSolo:
5cd60f7e510c fixed some bugs:
greg
parents: 350
diff changeset
  1276
                self.DisplayMenu.Enable(wx.ID_CLEAR, False)
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1277
            self.DisplayMenu.Enable(wx.ID_ZOOM_FIT, False)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1278
        
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1279
    def OnRefreshMenu(self, event):
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1280
        selected = self.TabsOpened.GetSelection()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1281
        if selected != -1:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1282
            window = self.TabsOpened.GetPage(selected)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1283
            window.RefreshView()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1284
            if not self.Debug:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1285
                self.VariablePanelIndexer.RefreshVariablePanel(window.GetTagName())
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1286
        event.Skip()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1287
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1288
    def OnClearErrorsMenu(self, event):
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1289
        self.ClearErrors()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1290
        event.Skip()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1291
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1292
    def GenerateZoomFunction(self, idx):
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1293
        def ZoomFunction(event):
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1294
            selected = self.TabsOpened.GetSelection()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1295
            if selected != -1:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1296
                window = self.TabsOpened.GetPage(selected)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1297
                window.SetScale(idx)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1298
            event.Skip()
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1299
        return ZoomFunction
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1300
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1301
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1302
#-------------------------------------------------------------------------------
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1303
#                      Project Editor Panels Management Functions
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1304
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1305
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1306
    def OnPouSelectedChanged(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1307
        old_selected = self.TabsOpened.GetSelection()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1308
        if old_selected >= 0:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1309
            if self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1310
                pass
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1311
            else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1312
                self.TabsOpened.GetPage(old_selected).ResetBuffer()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1313
        selected = event.GetSelection()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1314
        if selected >= 0:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1315
            window = self.TabsOpened.GetPage(selected)
260
ad7ced0e5662 Bug with configutationEditor and ResourceEditor fixed
lbessard
parents: 258
diff changeset
  1316
            if not self.Debug:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1317
                self.SelectTypesTreeItem(window.GetTagName())
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1318
            else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1319
                self.SelectInstancesTreeItem(self.InstancesTree.GetRootItem(), window.GetInstancePath())
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1320
            window.RefreshView()
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1321
            if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1322
                self.VariablePanelIndexer.ChangeVariablePanel(window.GetTagName())
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1323
            self.RefreshFileMenu()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1324
            self.RefreshEditMenu()
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  1325
            self.RefreshDisplayMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1326
            self.RefreshToolBar()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1327
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1328
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1329
    def RefreshEditor(self, variablepanel = True):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1330
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1331
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1332
            window = self.TabsOpened.GetPage(selected)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1333
            window.RefreshView()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1334
            if variablepanel:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1335
                self.RefreshVariablePanel(window.GetTagName())
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1336
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1337
    def RefreshVariablePanel(self, tagname):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1338
        self.VariablePanelIndexer.RefreshVariablePanel(tagname)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1339
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1340
    def RefreshEditorNames(self, old_tagname, new_tagname):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1341
        for i in xrange(self.TabsOpened.GetPageCount()):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1342
            editor = self.TabsOpened.GetPage(i)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1343
            if editor.GetTagName() == old_tagname:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1344
                editor.SetTagName(new_tagname)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1345
        self.VariablePanelIndexer.UpdateVariablePanelTagName(old_tagname, new_tagname)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1346
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1347
    def IsOpened(self, tagname):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1348
        for idx in xrange(self.TabsOpened.GetPageCount()):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1349
            if self.TabsOpened.GetPage(idx).IsViewing(tagname):
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1350
                return idx
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1351
        return None
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1352
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1353
    def RefreshPageTitles(self):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1354
        for idx in xrange(self.TabsOpened.GetPageCount()):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1355
            window = self.TabsOpened.GetPage(idx)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1356
            words = window.GetTagName().split("::")
203
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
  1357
            if words[0] == "P":
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1358
                pou_type = self.Controler.GetEditedElementType(window.GetTagName(), self.Debug)[1].upper()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1359
                pou_body_type = self.Controler.GetEditedElementBodyType(window.GetTagName(), self.Debug)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  1360
                self.SetPageBitmap(idx, self.GenerateBitmap(pou_type, pou_body_type))
203
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
  1361
            elif words[0] == "T":
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1362
                pou_body_type = self.Controler.GetEditedElementBodyType(window.GetTagName(), self.Debug)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  1363
                self.SetPageBitmap(idx, self.GenerateBitmap("TRANSITION", pou_body_type))
203
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
  1364
            elif words[0] == "A":
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1365
                pou_body_type = self.Controler.GetEditedElementBodyType(window.GetTagName(), self.Debug)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  1366
                self.SetPageBitmap(idx, self.GenerateBitmap("ACTION", pou_body_type))
203
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
  1367
            elif words[0] == "C":
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  1368
                self.SetPageBitmap(idx, self.GenerateBitmap("CONFIGURATION"))
203
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
  1369
            elif words[0] == "R":
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  1370
                self.SetPageBitmap(idx, self.GenerateBitmap("RESOURCE"))
203
76c407fb33fe Adding icons on viewers tabs
lbessard
parents: 190
diff changeset
  1371
            elif words[0] == "D":
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  1372
                self.SetPageBitmap(idx, self.GenerateBitmap("DATATYPE"))
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1373
            if self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1374
                self.TabsOpened.SetPageText(idx, window.GetInstancePath())
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1375
            else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1376
                self.TabsOpened.SetPageText(idx, "-".join(words[1:]))
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1377
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1378
    def GetTabsOpenedDClickFunction(self, tabctrl):
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1379
        def OnTabsOpenedDClick(event):
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1380
            pos = event.GetPosition()
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1381
            if tabctrl.TabHitTest(pos.x, pos.y, None):
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1382
                pane = self.AUIManager.GetPane(self.TabsOpened)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1383
                if pane.IsMaximized():
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1384
                    self.AUIManager.RestorePane(pane)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1385
                else:
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1386
                    self.AUIManager.MaximizePane(pane)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  1387
                self.AUIManager.Update()
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1388
            event.Skip()
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  1389
        return OnTabsOpenedDClick
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1390
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1391
#-------------------------------------------------------------------------------
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1392
#                         Types Tree Management Functions
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1393
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1394
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1395
    def RefreshTypesTree(self):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1396
        infos = self.Controler.GetProjectInfos(self.Debug)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1397
        root = self.TypesTree.GetRootItem()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1398
        if not root.IsOk():
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1399
            root = self.TypesTree.AddRoot(infos["name"])
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1400
        self.GenerateTypesTreeBranch(root, infos)
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1401
        self.TypesTree.Expand(root)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1402
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1403
    def GenerateTypesTreeBranch(self, root, infos, topology=False):
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1404
        to_delete = []
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1405
        self.TypesTree.SetItemText(root, infos["name"])
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1406
        self.TypesTree.SetPyData(root, infos["type"])
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1407
        if infos.get("tagname", None) in self.Errors:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1408
            self.TypesTree.SetItemBackgroundColour(root, wx.Colour(255, 255, 0))
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1409
            self.TypesTree.SetItemTextColour(root, wx.RED)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1410
        else:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1411
            self.TypesTree.SetItemBackgroundColour(root, wx.WHITE)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1412
            self.TypesTree.SetItemTextColour(root, wx.BLACK)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1413
        if infos["type"] == ITEM_POU:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1414
            self.TypesTree.SetItemImage(root, self.TypesTreeImageDict[self.Controler.GetPouBodyType(infos["name"], self.Debug)])
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1415
        else:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1416
            self.TypesTree.SetItemImage(root, self.TypesTreeImageDict[infos["type"]])      
184
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
  1417
            
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1418
        if wx.VERSION >= (2, 6, 0):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1419
            item, root_cookie = self.TypesTree.GetFirstChild(root)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1420
        else:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1421
            item, root_cookie = self.TypesTree.GetFirstChild(root, 0)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1422
        for values in infos["values"]:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1423
            if not item.IsOk():
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1424
                item = self.TypesTree.AppendItem(root, "")
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1425
                if wx.Platform != '__WXMSW__':
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1426
                    item, root_cookie = self.TypesTree.GetNextChild(root, root_cookie)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1427
            self.GenerateTypesTreeBranch(item, values)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1428
            item, root_cookie = self.TypesTree.GetNextChild(root, root_cookie)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1429
        while item.IsOk():
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1430
            to_delete.append(item)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1431
            item, root_cookie = self.TypesTree.GetNextChild(root, root_cookie)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1432
        for item in to_delete:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1433
            self.TypesTree.Delete(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1434
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1435
    def SelectTypesTreeItem(self, tagname):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1436
        if self.TypesTree is not None:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1437
            root = self.TypesTree.GetRootItem()
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1438
            words = tagname.split("::")
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1439
            if words[0] == "D":
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1440
                return self.RecursiveTypesTreeItemSelection(root, [(words[1], ITEM_DATATYPE)])
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1441
            elif words[0] == "P":
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1442
                return self.RecursiveTypesTreeItemSelection(root, [(words[1], ITEM_POU)])
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1443
            elif words[0] == "T":
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1444
                return self.RecursiveTypesTreeItemSelection(root, [(words[1], ITEM_POU), (words[2], ITEM_TRANSITION)])
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1445
            elif words[0] == "A":
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1446
                return self.RecursiveTypesTreeItemSelection(root, [(words[1], ITEM_POU), (words[2], ITEM_ACTION)])
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1447
            elif words[0] == "C":
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1448
                return self.RecursiveTypesTreeItemSelection(root, [(words[1], ITEM_CONFIGURATION)])
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1449
            elif words[0] == "R":
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1450
                return self.RecursiveTypesTreeItemSelection(root, [(words[1], ITEM_CONFIGURATION), (words[2], ITEM_RESOURCE)])
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1451
        return False
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  1452
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1453
    def RecursiveTypesTreeItemSelection(self, root, items):
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1454
        found = False
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1455
        if self.TypesTree is not None:
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1456
            if wx.VERSION >= (2, 6, 0):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1457
                item, root_cookie = self.TypesTree.GetFirstChild(root)
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1458
            else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1459
                item, root_cookie = self.TypesTree.GetFirstChild(root, 0)
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1460
            while item.IsOk() and not found:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1461
                if (self.TypesTree.GetItemText(item), self.TypesTree.GetPyData(item)) == items[0]:
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1462
                    if len(items) == 1:
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1463
                        self.SelectedItem = item
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1464
                        self.TypesTree.SelectItem(item)
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1465
                        wx.CallAfter(self.ResetSelectedItem)
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1466
                        return True
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1467
                    else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1468
                        found = self.RecursiveTypesTreeItemSelection(item, items[1:])
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1469
                else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1470
                    found = self.RecursiveTypesTreeItemSelection(item, items)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1471
                item, root_cookie = self.TypesTree.GetNextChild(root, root_cookie)
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1472
        return found
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1473
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1474
    def OnTypesTreeBeginDrag(self, event):
131
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1475
        if wx.Platform == '__WXMSW__':
134
6715fd958477 Bug on Drag and Drop fixed
lbessard
parents: 133
diff changeset
  1476
            self.SelectedItem = event.GetItem()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1477
        if self.SelectedItem is not None and self.TypesTree.GetPyData(self.SelectedItem) == ITEM_POU:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1478
            block_name = self.TypesTree.GetItemText(self.SelectedItem)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1479
            block_type = self.Controler.GetPouType(block_name, self.Debug)
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  1480
            if block_type != "program":
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  1481
                data = wx.TextDataObject(str((block_name, block_type, "")))
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1482
                dragSource = wx.DropSource(self.TypesTree)
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  1483
                dragSource.SetData(data)
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  1484
                dragSource.DoDragDrop()
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1485
            self.ResetSelectedItem()
7
f1691e685c49 Adding error messages on LD editor
lbessard
parents: 6
diff changeset
  1486
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1487
    def OnTypesTreeItemBeginEdit(self, event):
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1488
        selected = event.GetItem()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1489
        if self.TypesTree.GetPyData(selected) in ITEMS_UNEDITABLE:
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1490
            event.Veto()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1491
        else:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1492
            event.Skip()
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1493
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1494
    def OnTypesTreeItemEndEdit(self, event):
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1495
        message = None
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1496
        abort = False
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1497
        new_name = event.GetLabel()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1498
        if new_name != "":
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1499
            if not TestIdentifier(new_name):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1500
                message = "\"%s\" is not a valid identifier!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1501
            elif new_name.upper() in IEC_KEYWORDS:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1502
                message = "\"%s\" is a keyword. It can't be used!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1503
            else:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1504
                item = event.GetItem()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1505
                old_name = self.TypesTree.GetItemText(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1506
                itemtype = self.TypesTree.GetPyData(item)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1507
                if itemtype == ITEM_PROJECT:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  1508
                    self.Controler.SetProjectProperties(name = new_name)
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1509
                elif itemtype == ITEM_DATATYPE:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1510
                    if new_name.upper() in [name.upper() for name in self.Controler.GetProjectDataTypeNames(self.Debug) if name != old_name]:
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1511
                        message = "\"%s\" data type already exists!"%new_name
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1512
                        abort = True
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1513
                    if not abort:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1514
                        self.Controler.ChangeDataTypeName(old_name, new_name)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1515
                        self.RefreshEditorNames(self.Controler.ComputeDataTypeName(old_name), 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1516
                                                self.Controler.ComputeDataTypeName(new_name))
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1517
                        self.RefreshPageTitles()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1518
                elif itemtype == ITEM_POU:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1519
                    if new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouNames(self.Debug) if name != old_name]:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1520
                        message = "\"%s\" pou already exists!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1521
                        abort = True
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1522
                    elif new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouVariables(debug = self.Debug)]:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  1523
                        messageDialog = wx.MessageDialog(self, "A variable is defined with \"%s\" as name. It can generate a conflict. Do you wish to continue?"%new_name, "Error", wx.YES_NO|wx.ICON_QUESTION)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  1524
                        if messageDialog.ShowModal() == wx.ID_NO:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1525
                            abort = True
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1526
                        messageDialog.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1527
                    if not abort:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1528
                        self.Controler.ChangePouName(old_name, new_name)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1529
                        self.RefreshEditorNames(self.Controler.ComputePouName(old_name), 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1530
                                                self.Controler.ComputePouName(new_name))
357
e5501b3337db Little bugs fixed
greg
parents: 352
diff changeset
  1531
                        self.RefreshLibraryTree()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1532
                        self.RefreshPageTitles()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1533
                elif itemtype == ITEM_TRANSITION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1534
                    parent = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1535
                    parent_type = self.TypesTree.GetPyData(parent)
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1536
                    while parent_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1537
                        parent = self.TypesTree.GetItemParent(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1538
                        parent_type = self.TypesTree.GetPyData(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1539
                    pou_name = self.TypesTree.GetItemText(parent)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1540
                    if new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouNames(self.Debug)]:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1541
                        message = "A pou with \"%s\" as name exists!"%new_name
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1542
                    elif new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouVariables(pou_name, self.Debug) if name != old_name]:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1543
                        message = "A variable with \"%s\" as name already exists in this pou!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1544
                    else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1545
                        self.Controler.ChangePouTransitionName(pou_name, old_name, new_name)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1546
                        self.RefreshEditorNames(self.Controler.ComputePouTransitionName(pou_name, old_name), 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1547
                                                self.Controler.ComputePouTransitionName(pou_name, new_name))
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1548
                        self.RefreshPageTitles()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1549
                elif itemtype == ITEM_ACTION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1550
                    parent = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1551
                    parent_type = self.TypesTree.GetPyData(parent)
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1552
                    while parent_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1553
                        parent = self.TypesTree.GetItemParent(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1554
                        parent_type = self.TypesTree.GetPyData(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1555
                    pou_name = self.TypesTree.GetItemText(parent)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1556
                    if new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouNames(self.Debug)]:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1557
                        message = "A pou with \"%s\" as name exists!"%new_name
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1558
                    elif new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouVariables(pou_name, self.Debug) if name != old_name]:
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1559
                        message = "A variable with \"%s\" as name already exists in this pou!"%new_name
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1560
                    else:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1561
                        self.Controler.ChangePouActionName(pou_name, old_name, new_name)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1562
                        self.RefreshEditorNames(self.Controler.ComputePouActionName(pou_name, old_name), 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1563
                                                self.Controler.ComputePouActionName(pou_name, new_name))
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1564
                        self.RefreshPageTitles()
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1565
                elif itemtype == ITEM_CONFIGURATION:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1566
                    if new_name.upper() in [name.upper() for name in self.Controler.GetProjectConfigNames(self.Debug) if name != old_name]:
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1567
                        message = "\"%s\" config already exists!"%new_name
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1568
                        abort = True
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1569
                    elif new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouNames(self.Debug)]:
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1570
                        messageDialog = wx.MessageDialog(self, "A pou is defined with \"%s\" as name. It can generate a conflict. Do you wish to continue?"%new_name, "Error", wx.YES_NO|wx.ICON_QUESTION)
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1571
                        if messageDialog.ShowModal() == wx.ID_NO:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1572
                            abort = True
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1573
                        messageDialog.Destroy()
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1574
                    elif new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouVariables(debug = self.Debug)]:
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1575
                        messageDialog = wx.MessageDialog(self, "A variable is defined with \"%s\" as name. It can generate a conflict. Do you wish to continue?"%new_name, "Error", wx.YES_NO|wx.ICON_QUESTION)
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1576
                        if messageDialog.ShowModal() == wx.ID_NO:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1577
                            abort = True
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1578
                        messageDialog.Destroy()
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1579
                    if not abort:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1580
                        self.Controler.ChangeConfigurationName(old_name, new_name)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1581
                        self.RefreshEditorNames(self.Controler.ComputeConfigurationName(old_name), 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1582
                                                self.Controler.ComputeConfigurationName(new_name))
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1583
                        self.RefreshPageTitles()
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1584
                elif itemtype == ITEM_RESOURCE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1585
                    parent = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1586
                    parent_type = self.TypesTree.GetPyData(parent)
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1587
                    while parent_type != ITEM_CONFIGURATION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1588
                        parent = self.TypesTree.GetItemParent(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1589
                        parent_type = self.TypesTree.GetPyData(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1590
                    config_name = self.TypesTree.GetItemText(parent)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1591
                    if new_name.upper() in [name.upper() for name in self.Controler.GetProjectConfigNames(self.Debug)]:
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1592
                        message = "\"%s\" config already exists!"%new_name
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1593
                        abort = True
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1594
                    elif new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouNames(self.Debug)]:
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1595
                        messageDialog = wx.MessageDialog(self, "A pou is defined with \"%s\" as name. It can generate a conflict. Do you wish to continue?"%new_name, "Error", wx.YES_NO|wx.ICON_QUESTION)
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1596
                        if messageDialog.ShowModal() == wx.ID_NO:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1597
                            abort = True
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1598
                        messageDialog.Destroy()
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1599
                    elif new_name.upper() in [name.upper() for name in self.Controler.GetProjectPouVariables(debug = self.Debug)]:
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1600
                        messageDialog = wx.MessageDialog(self, "A variable is defined with \"%s\" as name. It can generate a conflict. Do you wish to continue?"%new_name, "Error", wx.YES_NO|wx.ICON_QUESTION)
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1601
                        if messageDialog.ShowModal() == wx.ID_NO:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1602
                            abort = True
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1603
                        messageDialog.Destroy()
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1604
                    if not abort:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  1605
                        self.Controler.ChangeConfigurationResourceName(config_name, old_name, new_name)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1606
                        self.RefreshEditorNames(self.Controler.ComputeConfigurationResourceName(config_name, old_name), 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  1607
                                                self.Controler.ComputeConfigurationResourceName(config_name, new_name))
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1608
                        self.RefreshPageTitles()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1609
            if message or abort:
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1610
                if message:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  1611
                    messageDialog = wx.MessageDialog(self, message, "Error", wx.OK|wx.ICON_ERROR)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1612
                    messageDialog.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1613
                    messageDialog.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1614
                item = event.GetItem()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1615
                wx.CallAfter(self.TypesTree.EditLabel, item)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1616
                event.Veto()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1617
            else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1618
                wx.CallAfter(self.RefreshTypesTree)
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1619
                self.RefreshEditor()
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1620
                self.RefreshFileMenu()
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1621
                self.RefreshEditMenu()
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  1622
                self.RefreshTitle()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  1623
                event.Skip()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1624
    
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1625
    def OnTypesTreeItemActivated(self, event):
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1626
        selected = event.GetItem()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1627
        name = self.TypesTree.GetItemText(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1628
        data = self.TypesTree.GetPyData(selected)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1629
        if name == "Properties":
27
dae55dd9ee14 Current developping version
lbessard
parents: 16
diff changeset
  1630
            self.ShowProperties()
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1631
        if data == ITEM_DATATYPE:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1632
            self.EditProjectElement(data, self.Controler.ComputeDataTypeName(name))
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1633
        elif data == ITEM_POU:
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1634
            self.EditProjectElement(data, self.Controler.ComputePouName(name))
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1635
        elif data == ITEM_CONFIGURATION:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1636
            self.EditProjectElement(data, self.Controler.ComputeConfigurationName(name))
102
85875dcb7754 Adding edit user's POU by double click on block instance
lbessard
parents: 98
diff changeset
  1637
        elif data == ITEM_RESOURCE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1638
            item = self.TypesTree.GetItemParent(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1639
            item_type = self.TypesTree.GetPyData(item)
102
85875dcb7754 Adding edit user's POU by double click on block instance
lbessard
parents: 98
diff changeset
  1640
            while item_type != ITEM_CONFIGURATION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1641
                item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1642
                item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1643
            config_name = self.TypesTree.GetItemText(item)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1644
            self.EditProjectElement(data, self.Controler.ComputeConfigurationResourceName(config_name, name))
102
85875dcb7754 Adding edit user's POU by double click on block instance
lbessard
parents: 98
diff changeset
  1645
        elif data in [ITEM_TRANSITION, ITEM_ACTION]:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1646
            item = self.TypesTree.GetItemParent(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1647
            item_type = self.TypesTree.GetPyData(item)
102
85875dcb7754 Adding edit user's POU by double click on block instance
lbessard
parents: 98
diff changeset
  1648
            while item_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1649
                item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1650
                item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1651
            pou_name = self.TypesTree.GetItemText(item)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1652
            if data == ITEM_TRANSITION:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1653
                tagname = self.Controler.ComputePouTransitionName(pou_name, name)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1654
            elif data == ITEM_ACTION:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1655
                tagname = self.Controler.ComputePouActionName(pou_name, name)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1656
            self.EditProjectElement(data, tagname)
129
ae2421aa0aa4 Some bugs fixed
lbessard
parents: 128
diff changeset
  1657
        event.Skip()
102
85875dcb7754 Adding edit user's POU by double click on block instance
lbessard
parents: 98
diff changeset
  1658
    
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1659
    def TypesTreeItemSelect(self, select_item):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1660
        name = self.TypesTree.GetItemText(select_item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1661
        data = self.TypesTree.GetPyData(select_item)
131
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1662
        if data == ITEM_DATATYPE:
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1663
            self.EditProjectElement(data, self.Controler.ComputeDataTypeName(name), True)
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1664
        elif data == ITEM_POU:
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1665
            self.EditProjectElement(data, self.Controler.ComputePouName(name), True)
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1666
        elif data == ITEM_CONFIGURATION:
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1667
            self.EditProjectElement(data, self.Controler.ComputeConfigurationName(name), True)
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1668
        elif data == ITEM_RESOURCE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1669
            item = self.TypesTree.GetItemParent(select_item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1670
            item_type = self.TypesTree.GetPyData(item)
131
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1671
            while item_type != ITEM_CONFIGURATION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1672
                item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1673
                item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1674
            config_name = self.TypesTree.GetItemText(item)
131
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1675
            self.EditProjectElement(data, self.Controler.ComputeConfigurationResourceName(config_name, name), True)
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1676
        elif data in [ITEM_TRANSITION, ITEM_ACTION]:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1677
            item = self.TypesTree.GetItemParent(select_item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1678
            item_type = self.TypesTree.GetPyData(item)
131
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1679
            while item_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1680
                item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1681
                item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1682
            pou_name = self.TypesTree.GetItemText(item)
131
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1683
            if data == ITEM_TRANSITION:
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1684
                tagname = self.Controler.ComputePouTransitionName(pou_name, name)
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1685
            elif data == ITEM_ACTION:
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1686
                tagname = self.Controler.ComputePouActionName(pou_name, name)
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1687
            self.EditProjectElement(data, tagname, True)
bc534997aecc Bug on Project Tree with Windows fixed
lbessard
parents: 129
diff changeset
  1688
    
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1689
    def OnTypesTreeLeftUp(self, event):
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1690
        if self.SelectedItem is not None:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1691
            self.TypesTree.SelectItem(self.SelectedItem)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1692
            self.TypesTreeItemSelect(self.SelectedItem)
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1693
            wx.CallAfter(self.ResetSelectedItem)
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1694
        event.Skip()
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1695
    
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1696
    def OnTypesTreeItemSelected(self, event):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1697
        self.TypesTreeItemSelect(event.GetItem())
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1698
        event.Skip()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1699
    
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1700
    def OnTypesTreeItemChanging(self, event):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1701
        if self.TypesTree.GetPyData(event.GetItem()) not in ITEMS_UNEDITABLE and self.SelectedItem is None:
122
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1702
            self.SelectedItem = event.GetItem()
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1703
            event.Veto()
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1704
        else:
e6faee0c271b Adding support for Project Tree selected item following current item edited.
lbessard
parents: 121
diff changeset
  1705
            event.Skip()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1706
    
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1707
    def EditProjectElement(self, elementtype, tagname, onlyopened = False):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1708
        openedidx = self.IsOpened(tagname)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1709
        if openedidx is not None:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1710
            old_selected = self.TabsOpened.GetSelection()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1711
            if old_selected != openedidx:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1712
                if old_selected >= 0:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1713
                    self.TabsOpened.GetPage(old_selected).ResetBuffer()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1714
                self.TabsOpened.SetSelection(openedidx)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1715
            self.TabsOpened.GetPage(openedidx).RefreshView()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1716
            self.VariablePanelIndexer.ChangeVariablePanel(tagname)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1717
            self.RefreshPageTitles()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1718
            self.RefreshFileMenu()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1719
            self.RefreshEditMenu()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1720
            self.RefreshToolBar()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1721
        elif not onlyopened:
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1722
            if elementtype == ITEM_CONFIGURATION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1723
                new_window = ConfigurationEditor(self.TabsOpened, tagname, self, self.Controler)
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  1724
                self.AddPage(new_window, "")
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1725
                self.VariablePanelIndexer.AddVariablePanel(tagname, "config")
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1726
            elif elementtype == ITEM_RESOURCE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1727
                new_window = ResourceEditor(self.TabsOpened, tagname, self, self.Controler)
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  1728
                self.AddPage(new_window, "")
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1729
                self.VariablePanelIndexer.AddVariablePanel(tagname, "resource")
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  1730
            elif elementtype in [ITEM_POU, ITEM_TRANSITION, ITEM_ACTION]:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1731
                bodytype = self.Controler.GetEditedElementBodyType(tagname, self.Debug)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1732
                if bodytype == "FBD":
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1733
                    new_window = Viewer(self.TabsOpened, tagname, self, self.Controler)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1734
                    new_window.RefreshScaling(False)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1735
                elif bodytype == "LD":
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1736
                    new_window = LD_Viewer(self.TabsOpened, tagname, self, self.Controler)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1737
                    new_window.RefreshScaling(False)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1738
                elif bodytype == "SFC":
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1739
                    new_window = SFC_Viewer(self.TabsOpened, tagname, self, self.Controler)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1740
                    new_window.RefreshScaling(False)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1741
                else:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1742
                    new_window = TextViewer(self.TabsOpened, tagname, self, self.Controler)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1743
                    new_window.SetTextSyntax(bodytype)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1744
                    if bodytype == "IL":
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1745
                        new_window.SetKeywords(IL_KEYWORDS)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1746
                    else:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1747
                        new_window.SetKeywords(ST_KEYWORDS)
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  1748
                self.AddPage(new_window, "")
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1749
                words = tagname.split("::")
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1750
                self.VariablePanelIndexer.AddVariablePanel(tagname, self.Controler.GetPouType(words[1], self.Debug))
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1751
            elif elementtype == ITEM_DATATYPE:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1752
                new_window = DataTypeEditor(self.TabsOpened, tagname, self, self.Controler)
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  1753
                self.AddPage(new_window, "")
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1754
            self.VariablePanelIndexer.ChangeVariablePanel(tagname)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1755
            openedidx = self.IsOpened(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1756
            old_selected = self.TabsOpened.GetSelection()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1757
            if old_selected != openedidx:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1758
                if old_selected >= 0:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1759
                    self.TabsOpened.GetPage(old_selected).ResetBuffer()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1760
            for i in xrange(self.TabsOpened.GetPageCount()):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1761
                window = self.TabsOpened.GetPage(i)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1762
                if window.GetTagName() == tagname:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1763
                    self.TabsOpened.SetSelection(i)
129
ae2421aa0aa4 Some bugs fixed
lbessard
parents: 128
diff changeset
  1764
                    window.SetFocus()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  1765
                    self.RefreshPageTitles()
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  1766
                    self.RefreshFileMenu()
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  1767
                    self.RefreshEditMenu()
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  1768
                    self.RefreshToolBar()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  1769
    
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1770
    def OnTypesTreeRightUp(self, event):
159
76b2facf14a2 Bug on TreeCtrl right click on Windows fixed
lbessard
parents: 145
diff changeset
  1771
        if wx.Platform == '__WXMSW__':
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1772
            item = event.GetItem()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1773
        else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1774
            item = self.TypesTree.GetSelection()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1775
        name = self.TypesTree.GetItemText(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1776
        type = self.TypesTree.GetPyData(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1777
        if type == ITEM_POU:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1778
            menu = wx.Menu(title='')
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1779
            if self.Controler.GetPouBodyType(name, self.Debug) == "SFC":
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1780
                new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1781
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add Transition")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1782
                self.Bind(wx.EVT_MENU, self.GenerateAddTransitionFunction(name), id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1783
                new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1784
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add Action")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1785
                self.Bind(wx.EVT_MENU, self.GenerateAddActionFunction(name), id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1786
                menu.AppendSeparator()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1787
            new_id = wx.NewId()
275
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1788
            AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Create A New POU From")
274
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  1789
            self.Bind(wx.EVT_MENU, self.OnCreatePouFromMenu, id=new_id)
275
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1790
            pou_type = self.Controler.GetPouType(name, self.Debug)
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1791
            if pou_type in ["function", "functionBlock"]:
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1792
                change_menu = wx.Menu(title='')
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1793
                if pou_type == "function":
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1794
                    new_id = wx.NewId()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1795
                    AppendMenu(change_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Function Block")
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1796
                    self.Bind(wx.EVT_MENU, self.GenerateChangePouTypeFunction(name, "functionBlock"), id=new_id)
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1797
                new_id = wx.NewId()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1798
                AppendMenu(change_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Program")
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1799
                self.Bind(wx.EVT_MENU, self.GenerateChangePouTypeFunction(name, "program"), id=new_id)
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  1800
                menu.AppendMenu(wx.NewId(), "Change POU Type To", change_menu)
274
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  1801
            new_id = wx.NewId()
311
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  1802
            AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Rename")
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  1803
            self.Bind(wx.EVT_MENU, self.OnRenamePouMenu, id=new_id)
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  1804
            new_id = wx.NewId()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1805
            AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Delete")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1806
            self.Bind(wx.EVT_MENU, self.OnRemovePouMenu, id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1807
            self.PopupMenu(menu)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1808
        elif type == ITEM_CONFIGURATION:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1809
            menu = wx.Menu(title='')
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1810
            new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1811
            AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add Resource")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1812
            self.Bind(wx.EVT_MENU, self.GenerateAddResourceFunction(name), id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1813
            new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1814
            AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Delete")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1815
            self.Bind(wx.EVT_MENU, self.OnRemoveConfigurationMenu, id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1816
            self.PopupMenu(menu)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1817
        elif type in [ITEM_DATATYPE, ITEM_TRANSITION, ITEM_ACTION, ITEM_RESOURCE]:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1818
            menu = wx.Menu(title='')
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1819
            new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1820
            AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Delete")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1821
            if type == ITEM_DATATYPE:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1822
                self.Bind(wx.EVT_MENU, self.OnRemoveDataTypeMenu, id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1823
            elif type == ITEM_TRANSITION:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1824
                self.Bind(wx.EVT_MENU, self.OnRemoveTransitionMenu, id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1825
            elif type == ITEM_ACTION:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1826
                self.Bind(wx.EVT_MENU, self.OnRemoveActionMenu, id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1827
            elif type == ITEM_RESOURCE:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1828
                self.Bind(wx.EVT_MENU, self.OnRemoveResourceMenu, id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1829
            self.PopupMenu(menu)
184
d3e6484ebe85 changed the way icons are loaded for both toolbars and treectrl. Now, non editable items have different pyData.
etisserant
parents: 183
diff changeset
  1830
        elif type in ITEMS_UNEDITABLE:
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1831
            if name == "Data Types":
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1832
                menu = wx.Menu(title='')
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1833
                new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1834
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add DataType")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1835
                self.Bind(wx.EVT_MENU, self.OnAddDataTypeMenu, id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1836
                self.PopupMenu(menu)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1837
            elif name in ["Functions", "Function Blocks", "Programs"]:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1838
                menu = wx.Menu(title='')
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1839
                new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1840
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add Pou")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1841
                self.Bind(wx.EVT_MENU, self.GenerateAddPouFunction({"Functions" : "function", "Function Blocks" : "functionBlock", "Programs" : "program"}[name]), id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1842
                self.PopupMenu(menu)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1843
            elif name == "Configurations":
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1844
                menu = wx.Menu(title='')
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1845
                new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1846
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add Configuration")
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1847
                self.Bind(wx.EVT_MENU, self.OnAddConfigurationMenu, id=new_id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1848
                self.PopupMenu(menu)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1849
            elif name == "Transitions":
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1850
                menu = wx.Menu(title='')
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1851
                new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1852
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add Transition")
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1853
                parent = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1854
                parent_type = self.TypesTree.GetPyData(parent)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1855
                while parent_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1856
                    parent = self.TypesTree.GetItemParent(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1857
                    parent_type = self.TypesTree.GetPyData(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1858
                self.Bind(wx.EVT_MENU, self.GenerateAddTransitionFunction(self.TypesTree.GetItemText(parent)), id=new_id)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1859
                self.PopupMenu(menu)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1860
            elif name == "Actions":
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1861
                menu = wx.Menu(title='')
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1862
                new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1863
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add Action")
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1864
                parent = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1865
                parent_type = self.TypesTree.GetPyData(parent)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1866
                while parent_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1867
                    parent = self.TypesTree.GetItemParent(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1868
                    parent_type = self.TypesTree.GetPyData(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1869
                self.Bind(wx.EVT_MENU, self.GenerateAddActionFunction(self.TypesTree.GetItemText(parent)), id=new_id)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1870
                self.PopupMenu(menu)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1871
            elif name == "Resources":
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1872
                menu = wx.Menu(title='')
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1873
                new_id = wx.NewId()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1874
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Add Resource")
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1875
                parent = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1876
                parent_type = self.TypesTree.GetPyData(parent)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1877
                while parent_type != ITEM_CONFIGURATION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1878
                    parent = self.TypesTree.GetItemParent(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1879
                    parent_type = self.TypesTree.GetPyData(parent)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1880
                self.Bind(wx.EVT_MENU, self.GenerateAddResourceFunction(self.TypesTree.GetItemText(parent)), id=new_id)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1881
                self.PopupMenu(menu)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1882
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1883
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1884
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  1885
#-------------------------------------------------------------------------------
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1886
#                         Instances Tree Management Functions
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1887
#-------------------------------------------------------------------------------
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1888
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1889
    def RefreshInstancesTree(self):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1890
        infos = self.Controler.GetProjectTopology(self.Debug)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1891
        root = self.InstancesTree.GetRootItem()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1892
        if not root.IsOk():
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1893
            root = self.InstancesTree.AddRoot(infos["name"])
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1894
        self.GenerateInstancesTreeBranch(root, infos)
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  1895
        self.InstancesTree.Expand(root)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1896
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1897
    def GenerateInstancesTreeBranch(self, root, infos):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1898
        to_delete = []
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1899
        if infos.get("elmt_type", None) is not None:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1900
            self.InstancesTree.SetItemText(root, "%s (%s)"%(infos["name"], infos["elmt_type"]))
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1901
        else:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1902
            self.InstancesTree.SetItemText(root, infos["name"])
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1903
        self.InstancesTree.SetPyData(root, (infos["type"], infos.get("tagname", None)))
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1904
        self.InstancesTree.SetItemImage(root, self.InstancesTreeImageDict[infos["type"]])      
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1905
            
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1906
        if wx.VERSION >= (2, 6, 0):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1907
            item, root_cookie = self.InstancesTree.GetFirstChild(root)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1908
        else:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1909
            item, root_cookie = self.InstancesTree.GetFirstChild(root, 0)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1910
        for values in infos["values"]:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1911
            if not item.IsOk():
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1912
                item = self.InstancesTree.AppendItem(root, "")
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1913
                if wx.Platform != '__WXMSW__':
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1914
                    item, root_cookie = self.InstancesTree.GetNextChild(root, root_cookie)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1915
            self.GenerateInstancesTreeBranch(item, values)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1916
            item, root_cookie = self.InstancesTree.GetNextChild(root, root_cookie)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1917
        while item.IsOk():
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1918
            to_delete.append(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1919
            item, root_cookie = self.InstancesTree.GetNextChild(root, root_cookie)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1920
        for item in to_delete:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1921
            self.InstancesTree.Delete(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  1922
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1923
    def OnInstancesTreeBeginDrag(self, event):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1924
        selected_item = event.GetItem()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1925
        selected_infos = self.InstancesTree.GetPyData(selected_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1926
        if selected_item is not None and selected_infos[0] in ITEMS_VARIABLE:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1927
            var_path = self.InstancesTree.GetItemText(selected_item).split(" (")[0]
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1928
            parent_item = self.InstancesTree.GetItemParent(selected_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1929
            while self.InstancesTree.GetPyData(parent_item)[0] != ITEM_PROJECT:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1930
                parent_name = self.InstancesTree.GetItemText(parent_item).split(" (")[0]
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1931
                var_path = "%s.%s"%(parent_name, var_path)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1932
                parent_item = self.InstancesTree.GetItemParent(parent_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1933
            data = wx.TextDataObject(str((var_path, "debug")))
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1934
            dragSource = wx.DropSource(self.InstancesTree)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1935
            dragSource.SetData(data)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1936
            dragSource.DoDragDrop()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1937
        event.Skip()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1938
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1939
    def OnInstancesTreeItemActivated(self, event):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1940
        selected_item = event.GetItem()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1941
        selected_infos = self.InstancesTree.GetPyData(selected_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1942
        if selected_item is not None and selected_infos[0] in [ITEM_FUNCTIONBLOCK, ITEM_PROGRAM, ITEM_TRANSITION, ITEM_ACTION]:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1943
            instance_path = self.InstancesTree.GetItemText(selected_item).split(" (")[0]
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1944
            parent_item = self.InstancesTree.GetItemParent(selected_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1945
            while self.InstancesTree.GetPyData(parent_item)[0] != ITEM_PROJECT:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1946
                parent_name = self.InstancesTree.GetItemText(parent_item).split(" (")[0]
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1947
                instance_path = "%s.%s"%(parent_name, instance_path)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1948
                parent_item = self.InstancesTree.GetItemParent(parent_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1949
            openedidx = self.IsOpened(instance_path)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1950
            if openedidx is not None:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1951
                old_selected = self.TabsOpened.GetSelection()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1952
                if old_selected != openedidx:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1953
                    if old_selected >= 0:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1954
                        self.TabsOpened.GetPage(old_selected).ResetBuffer()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1955
                    self.TabsOpened.SetSelection(openedidx)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1956
            elif selected_infos[1] is not None:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1957
                bodytype = self.Controler.GetEditedElementBodyType(selected_infos[1], self.Debug)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1958
                if bodytype == "FBD":
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1959
                    new_window = Viewer(self.TabsOpened, selected_infos[1], self, self.Controler, True, instance_path)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1960
                    new_window.RefreshScaling(False)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1961
                elif bodytype == "LD":
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1962
                    new_window = LD_Viewer(self.TabsOpened, selected_infos[1], self, self.Controler, True, instance_path)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1963
                    new_window.RefreshScaling(False)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1964
                elif bodytype == "SFC":
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1965
                    new_window = SFC_Viewer(self.TabsOpened, selected_infos[1], self, self.Controler, True, instance_path)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1966
                    new_window.RefreshScaling(False)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1967
                else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1968
                    new_window = TextViewer(self.TabsOpened, selected_infos[1], self, self.Controler, True, instance_path)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1969
                    new_window.SetTextSyntax(bodytype)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1970
                    if bodytype == "IL":
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1971
                        new_window.SetKeywords(IL_KEYWORDS)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1972
                    else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1973
                        new_window.SetKeywords(ST_KEYWORDS)
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  1974
                self.AddPage(new_window, "")
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1975
                new_window.SetFocus()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  1976
                self.RefreshPageTitles()
301
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1977
        if selected_item is not None and selected_infos[0] in ITEMS_VARIABLE:
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1978
            var_path, var_type = self.InstancesTree.GetItemText(selected_item).split(" (")
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1979
            var_type = var_type.split(")")[0]
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1980
            
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1981
            if self.Controler.IsOfType(var_type, "ANY_NUM", self.Debug) or\
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1982
               self.Controler.IsOfType(var_type, "ANY_BIT", self.Debug):
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1983
                parent_item = self.InstancesTree.GetItemParent(selected_item)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1984
                while self.InstancesTree.GetPyData(parent_item)[0] != ITEM_PROJECT:
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1985
                    parent_name = self.InstancesTree.GetItemText(parent_item).split(" (")[0]
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1986
                    var_path = "%s.%s"%(parent_name, var_path)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1987
                    parent_item = self.InstancesTree.GetItemParent(parent_item)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1988
                
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1989
                self.OpenGraphicViewer(var_path)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1990
        event.Skip()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1991
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1992
    def OpenGraphicViewer(self, var_path):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1993
        new_window = GraphicViewer(self.TabsOpened, self, self.Controler, var_path)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1994
        self.AddPage(new_window, "")
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1995
        new_window.SetFocus()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  1996
        self.RefreshPageTitles()
301
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1997
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1998
    def OnInstancesTreeRightUp(self, event):
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  1999
        if wx.Platform == '__WXMSW__':
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2000
            selected_item = event.GetItem()
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2001
        else:
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2002
            selected_item = self.InstancesTree.GetSelection()
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2003
        selected_infos = self.InstancesTree.GetPyData(selected_item)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2004
        if selected_item is not None and selected_infos[0] in ITEMS_VARIABLE:
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2005
            var_path, var_type = self.InstancesTree.GetItemText(selected_item).split(" (")
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2006
            var_type = var_type.split(")")[0]
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2007
            
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2008
            if self.Controler.IsOfType(var_type, "ANY_NUM", self.Debug) or\
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2009
               self.Controler.IsOfType(var_type, "ANY_BIT", self.Debug):
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2010
                parent_item = self.InstancesTree.GetItemParent(selected_item)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2011
                while self.InstancesTree.GetPyData(parent_item)[0] != ITEM_PROJECT:
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2012
                    parent_name = self.InstancesTree.GetItemText(parent_item).split(" (")[0]
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2013
                    var_path = "%s.%s"%(parent_name, var_path)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2014
                    parent_item = self.InstancesTree.GetItemParent(parent_item)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2015
                
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2016
                menu = wx.Menu(title='')
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2017
                new_id = wx.NewId()
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2018
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="Graphic Panel")
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2019
                self.Bind(wx.EVT_MENU, self.AddVariableGraphicFunction(var_path), id=new_id)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2020
                new_id = wx.NewId()
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2021
                AppendMenu(menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text="CSV Log")
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2022
                self.PopupMenu(menu)
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2023
        event.Skip()
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2024
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2025
    def AddVariableGraphicFunction(self, iec_path):
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2026
        def AddVariableGraphic(event):
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  2027
            self.OpenGraphicViewer(iec_path)
301
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2028
            event.Skip()
b5e564608b9e Adding support for Graphic for variable in Debug mode
lbessard
parents: 298
diff changeset
  2029
        return AddVariableGraphic
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2030
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2031
    def SelectInstancesTreeItem(self, root, instancepath):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2032
        found = False
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2033
        if self.InstancesTree is not None:
262
3b92f0b96d31 Bug with item selection on InstancesTree fixed
lbessard
parents: 260
diff changeset
  2034
            paths = instancepath.split(".", 1)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2035
            if wx.VERSION >= (2, 6, 0):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2036
                item, root_cookie = self.InstancesTree.GetFirstChild(root)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2037
            else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2038
                item, root_cookie = self.InstancesTree.GetFirstChild(root, 0)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2039
            while item.IsOk() and not found:
262
3b92f0b96d31 Bug with item selection on InstancesTree fixed
lbessard
parents: 260
diff changeset
  2040
                name = self.InstancesTree.GetItemText(item).split(" (")[0]
3b92f0b96d31 Bug with item selection on InstancesTree fixed
lbessard
parents: 260
diff changeset
  2041
                if name == paths[0]:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2042
                    if len(paths) == 1:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2043
                        self.InstancesTree.SelectItem(item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2044
                        return True
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2045
                    else:
262
3b92f0b96d31 Bug with item selection on InstancesTree fixed
lbessard
parents: 260
diff changeset
  2046
                        found = self.SelectInstancesTreeItem(item, paths[1])
3b92f0b96d31 Bug with item selection on InstancesTree fixed
lbessard
parents: 260
diff changeset
  2047
                item, root_cookie = self.InstancesTree.GetNextChild(root, root_cookie)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2048
        return found
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2049
337
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  2050
    def ResetGraphicViewers(self):
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  2051
        for i in xrange(self.TabsOpened.GetPageCount()):
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  2052
            editor = self.TabsOpened.GetPage(i)
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  2053
            if isinstance(editor, GraphicViewer):
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  2054
                editor.ResetView()
388a00b05b6b Bug with maximize on Tab Double Click fixed
lbessard
parents: 335
diff changeset
  2055
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2056
#-------------------------------------------------------------------------------
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2057
#                         Library Tree Management Functions
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2058
#-------------------------------------------------------------------------------
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2059
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2060
    def RefreshLibraryTree(self):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2061
        if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2062
            to_delete = []
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2063
            blocktypes = self.Controler.GetBlockTypes(debug = self.Debug)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2064
            root = self.LibraryTree.GetRootItem()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2065
            if not root.IsOk():
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2066
                if wx.Platform == '__WXMSW__':
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2067
                    root = self.LibraryTree.AddRoot("Block Types")
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2068
                    self.LibraryTree.SetPyData(root, {"type" : CATEGORY})
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2069
                else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2070
                    root = self.LibraryTree.AddRoot("")
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2071
            if wx.VERSION >= (2, 6, 0):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2072
                category_item, root_cookie = self.LibraryTree.GetFirstChild(root)
245
fdd05081c966 Bug when reopen files on Windows fixed
lbessard
parents: 241
diff changeset
  2073
            else:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2074
                category_item, root_cookie = self.LibraryTree.GetFirstChild(root, 0)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2075
            for category in blocktypes:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2076
                if not category_item.IsOk():
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2077
                    category_item = self.LibraryTree.AppendItem(root, category["name"])
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2078
                    if wx.Platform != '__WXMSW__':
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2079
                        category_item, root_cookie = self.LibraryTree.GetNextChild(root, root_cookie)
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2080
                else:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2081
                    self.LibraryTree.SetItemText(category_item, category["name"])
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2082
                self.LibraryTree.SetPyData(category_item, {"type" : CATEGORY})
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2083
                if wx.VERSION >= (2, 6, 0):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2084
                    blocktype_item, category_cookie = self.LibraryTree.GetFirstChild(category_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2085
                else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2086
                    blocktype_item, category_cookie = self.LibraryTree.GetFirstChild(category_item, 0)        
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2087
                for blocktype in category["list"]:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2088
                    if not blocktype_item.IsOk():
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2089
                        blocktype_item = self.LibraryTree.AppendItem(category_item, blocktype["name"])
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2090
                        if wx.Platform != '__WXMSW__':
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2091
                            blocktype_item, category_cookie = self.LibraryTree.GetNextChild(category_item, category_cookie)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2092
                    else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2093
                        self.LibraryTree.SetItemText(blocktype_item, blocktype["name"])
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2094
                    self.LibraryTree.SetPyData(blocktype_item, {"type" : BLOCK, "block_type" : blocktype["type"], "inputs" : tuple([type for name, type, modifier in blocktype["inputs"]])})
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2095
                    blocktype_item, category_cookie = self.LibraryTree.GetNextChild(category_item, category_cookie)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2096
                while blocktype_item.IsOk():
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2097
                    to_delete.append(blocktype_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2098
                    blocktype_item, category_cookie = self.LibraryTree.GetNextChild(category_item, category_cookie)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2099
                category_item, root_cookie = self.LibraryTree.GetNextChild(root, root_cookie)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2100
            while category_item.IsOk():
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2101
                to_delete.append(category_item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2102
                category_item, root_cookie = self.LibraryTree.GetNextChild(root, root_cookie)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2103
            for item in to_delete:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2104
                self.LibraryTree.Delete(item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2105
            if wx.Platform == '__WXMSW__':        
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2106
                self.LibraryTree.Expand(root)
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2107
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2108
    def OnLibraryTreeItemSelected(self, event):
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2109
        selected = event.GetItem()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2110
        pydata = self.LibraryTree.GetPyData(selected)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2111
        if pydata["type"] != CATEGORY:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2112
            blocktype = self.Controler.GetBlockType(self.LibraryTree.GetItemText(selected), pydata["inputs"], debug = self.Debug)
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2113
            if blocktype:
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2114
                self.LibraryComment.SetValue(blocktype["comment"])
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2115
            else:
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2116
                self.LibraryComment.SetValue("")
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2117
        else:
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2118
            self.LibraryComment.SetValue("")
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2119
        event.Skip()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2120
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2121
    def OnLibraryTreeBeginDrag(self, event):
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2122
        selected = event.GetItem()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2123
        pydata = self.LibraryTree.GetPyData(selected)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2124
        if selected is not None and pydata["type"] == BLOCK:
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2125
            data = wx.TextDataObject(str((self.LibraryTree.GetItemText(selected), 
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2126
                pydata["block_type"], "", pydata["inputs"])))
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2127
            dragSource = wx.DropSource(self.LibraryTree)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2128
            dragSource.SetData(data)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2129
            dragSource.DoDragDrop()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2130
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2131
#-------------------------------------------------------------------------------
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2132
#                          ToolBar Management Functions
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2133
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2134
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  2135
    def ResetToolBar(self):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2136
        if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2137
            for item in self.CurrentToolBar:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2138
                if wx.VERSION >= (2, 6, 0):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2139
                    self.Unbind(wx.EVT_MENU, id=item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2140
                else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2141
                    self.Disconnect(id=item, eventType=wx.wxEVT_COMMAND_MENU_SELECTED) 
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2142
                
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2143
                if USE_AUI:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2144
                    ToolBar = self.Panes["ToolBar"]
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2145
                else:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2146
                    ToolBar = self.ToolBar
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2147
                if ToolBar:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2148
                    ToolBar.DeleteTool(item)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2149
                    ToolBar.Realize()
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2150
                    if USE_AUI:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2151
                        self.AUIManager.GetPane("ToolBar").BestSize(ToolBar.GetBestSize())
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2152
                        self.AUIManager.Update()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2153
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2154
    def RefreshToolBar(self):
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2155
        if not self.Debug:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2156
            selected = self.TabsOpened.GetSelection()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2157
            if selected != -1:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2158
                language = self.Controler.GetEditedElementBodyType(self.TabsOpened.GetPage(selected).GetTagName(), self.Debug)
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  2159
            else:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2160
                language = None
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2161
            if language is not None and language != self.CurrentLanguage:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2162
                self.ResetToolBar()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2163
                self.CurrentLanguage = language
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2164
                self.CurrentToolBar = []
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2165
                if USE_AUI:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2166
                    ToolBar = self.Panes["ToolBar"]
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2167
                else:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2168
                    ToolBar = self.ToolBar
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2169
                if ToolBar:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2170
                    for radio, modes, id, method, picture, help in ToolBarItems[language]:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2171
                        if modes & self.DrawingMode:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2172
                            if radio or self.DrawingMode == FREEDRAWING_MODE:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2173
                                ToolBar.AddRadioTool(id, wx.Bitmap(os.path.join(CWD, "Images", picture)), wx.NullBitmap, help)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2174
                            else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2175
                                ToolBar.AddSimpleTool(id, wx.Bitmap(os.path.join(CWD, "Images", picture)), help)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2176
                            self.Bind(wx.EVT_TOOL, getattr(self, method), id=id)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2177
                            self.CurrentToolBar.append(id)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2178
                    ToolBar.Realize()
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2179
                    if USE_AUI:
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2180
                        self.AUIManager.GetPane("ToolBar").BestSize(ToolBar.GetBestSize())
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2181
                        self.AUIManager.Update()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2182
            elif not language:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2183
                self.ResetToolBar()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2184
                self.CurrentLanguage = language
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2185
            self.ResetCurrentMode()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2186
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2187
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2188
#-------------------------------------------------------------------------------
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2189
#                           ToolBar Items Functions
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2190
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2191
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2192
    def ResetCurrentMode(self):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2193
        selected = self.TabsOpened.GetSelection()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2194
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2195
            window = self.TabsOpened.GetPage(selected)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2196
            window.SetMode(MODE_SELECTION)
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2197
        if USE_AUI:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2198
            ToolBar = self.Panes["ToolBar"]
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2199
        else:
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2200
            ToolBar = self.ToolBar
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2201
        if ToolBar:
324
9f240641e3f0 Bug with TypesTree Contextual Item Delete item disappear fixed
lbessard
parents: 322
diff changeset
  2202
            ToolBar.ToggleTool(ID_PLCOPENEDITORTOOLBARSELECTION, False)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2203
            ToolBar.ToggleTool(ID_PLCOPENEDITORTOOLBARSELECTION, True)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2204
        
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2205
    def ResetToolToggle(self, id):
292
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2206
        if USE_AUI:
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2207
            tool = self.Panes["ToolBar"].FindById(id)
800e100038ae Bug on Viewer ScrollBar with AUI fixed
lbessard
parents: 275
diff changeset
  2208
        else:
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2209
            tool = self.ToolBar.FindById(id)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2210
        tool.SetToggle(False)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2211
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2212
    def OnSelectionTool(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2213
        selected = self.TabsOpened.GetSelection()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2214
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2215
            self.TabsOpened.GetPage(selected).SetMode(MODE_SELECTION)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2216
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2217
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2218
    def OnCommentTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2219
        self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARCOMMENT)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2220
        selected = self.TabsOpened.GetSelection()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  2221
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2222
            self.TabsOpened.GetPage(selected).SetMode(MODE_COMMENT)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2223
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2224
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2225
    def OnVariableTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2226
        self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARVARIABLE)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2227
        selected = self.TabsOpened.GetSelection()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2228
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2229
            self.TabsOpened.GetPage(selected).SetMode(MODE_VARIABLE)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2230
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2231
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2232
    def OnBlockTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2233
        self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARBLOCK)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2234
        selected = self.TabsOpened.GetSelection()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2235
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2236
            self.TabsOpened.GetPage(selected).SetMode(MODE_BLOCK)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2237
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2238
        
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2239
    def OnConnectionTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2240
        self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARCONNECTION)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2241
        selected = self.TabsOpened.GetSelection()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2242
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2243
            self.TabsOpened.GetPage(selected).SetMode(MODE_CONNECTION)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2244
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2245
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2246
    def OnPowerRailTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2247
        self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARPOWERRAIL)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2248
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2249
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2250
            self.TabsOpened.GetPage(selected).SetMode(MODE_POWERRAIL)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2251
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2252
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2253
    def OnRungTool(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2254
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2255
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2256
            self.TabsOpened.GetPage(selected).AddLadderRung()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2257
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2258
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2259
    def OnCoilTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2260
        self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARCOIL)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2261
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2262
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2263
            self.TabsOpened.GetPage(selected).SetMode(MODE_COIL)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2264
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2265
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2266
    def OnContactTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2267
        if self.DrawingMode == FREEDRAWING_MODE:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2268
            self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARCONTACT)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2269
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2270
        if selected != -1:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2271
            if self.DrawingMode == FREEDRAWING_MODE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2272
                self.TabsOpened.GetPage(selected).SetMode(MODE_CONTACT)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2273
            else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2274
                self.TabsOpened.GetPage(selected).AddLadderContact()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2275
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2276
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2277
    def OnBranchTool(self, event): 
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2278
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2279
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2280
            self.TabsOpened.GetPage(selected).AddLadderBranch()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2281
        event.Skip()    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2282
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2283
    def OnInitialStepTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2284
        self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARINITIALSTEP)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2285
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2286
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2287
            self.TabsOpened.GetPage(selected).SetMode(MODE_INITIALSTEP)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2288
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2289
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2290
    def OnStepTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2291
        if self.GetDrawingMode() == FREEDRAWING_MODE:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2292
            self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARSTEP)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2293
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2294
        if selected != -1:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2295
            if self.GetDrawingMode() == FREEDRAWING_MODE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2296
                self.TabsOpened.GetPage(selected).SetMode(MODE_STEP)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2297
            else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2298
                self.TabsOpened.GetPage(selected).AddStep()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2299
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2300
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2301
    def OnActionBlockTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2302
        if self.GetDrawingMode() == FREEDRAWING_MODE:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2303
            self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARACTIONBLOCK)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2304
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2305
        if selected != -1:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2306
            if self.GetDrawingMode() == FREEDRAWING_MODE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2307
                self.TabsOpened.GetPage(selected).SetMode(MODE_ACTION)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2308
            else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2309
                self.TabsOpened.GetPage(selected).AddStepAction()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2310
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2311
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2312
    def OnTransitionTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2313
        self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARTRANSITION)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2314
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2315
        if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2316
            self.TabsOpened.GetPage(selected).SetMode(MODE_TRANSITION)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2317
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2318
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2319
    def OnDivergenceTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2320
        if self.GetDrawingMode() == FREEDRAWING_MODE:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2321
            self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARDIVERGENCE)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2322
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2323
        if selected != -1:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2324
            if self.GetDrawingMode() == FREEDRAWING_MODE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2325
                self.TabsOpened.GetPage(selected).SetMode(MODE_DIVERGENCE)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2326
            else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2327
                self.TabsOpened.GetPage(selected).AddDivergence()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2328
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2329
    
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2330
    def OnJumpTool(self, event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2331
        if self.GetDrawingMode() == FREEDRAWING_MODE:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2332
            self.ResetToolToggle(ID_PLCOPENEDITORTOOLBARJUMP)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2333
        selected = self.TabsOpened.GetSelection()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2334
        if selected != -1:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2335
            if self.GetDrawingMode() == FREEDRAWING_MODE:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2336
                self.TabsOpened.GetPage(selected).SetMode(MODE_JUMP)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2337
            else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2338
                self.TabsOpened.GetPage(selected).AddJump()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2339
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2340
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2341
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2342
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2343
#                         Add Project Elements Functions
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2344
#-------------------------------------------------------------------------------
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2345
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2346
    def OnAddDataTypeMenu(self, event):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2347
        dialog = DataTypeDialog(self, "Add a new data type", "Please enter data type name", "", wx.OK|wx.CANCEL)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2348
        dialog.SetDataTypeNames(self.Controler.GetProjectDataTypeNames(self.Debug))
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2349
        if dialog.ShowModal() == wx.ID_OK:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2350
            self.Controler.ProjectAddDataType(dialog.GetValue())
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2351
            self.RefreshTitle()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2352
            self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2353
            self.RefreshTypesTree()
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2354
        dialog.Destroy()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2355
        event.Skip()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2356
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2357
    def GenerateAddPouFunction(self, pou_type):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2358
        def OnAddPouMenu(event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2359
            dialog = PouDialog(self, pou_type)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2360
            dialog.SetPouNames(self.Controler.GetProjectPouNames(self.Debug))
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2361
            dialog.SetPouElementNames(self.Controler.GetProjectPouVariables(debug = self.Debug))
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2362
            if dialog.ShowModal() == wx.ID_OK:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2363
                values = dialog.GetValues()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2364
                self.Controler.ProjectAddPou(values["pouName"], values["pouType"], values["language"])
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2365
                self.RefreshTitle()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  2366
                self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2367
                self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2368
                self.RefreshLibraryTree()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2369
            dialog.Destroy()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2370
            event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2371
        return OnAddPouMenu
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2372
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2373
    def GenerateAddTransitionFunction(self, pou_name):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2374
        def OnAddTransitionMenu(event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2375
            dialog = PouTransitionDialog(self)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2376
            dialog.SetPouNames(self.Controler.GetProjectPouNames(self.Debug))
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2377
            dialog.SetPouElementNames(self.Controler.GetProjectPouVariables(pou_name, self.Debug))
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2378
            if dialog.ShowModal() == wx.ID_OK: 
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2379
                values = dialog.GetValues()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2380
                self.Controler.ProjectAddPouTransition(pou_name, values["transitionName"], values["language"])
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2381
                self.RefreshTitle()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2382
                self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2383
                self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2384
                dialog.Destroy()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2385
            event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2386
        return OnAddTransitionMenu
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2387
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2388
    def GenerateAddActionFunction(self, pou_name):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2389
        def OnAddActionMenu(event):
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2390
            dialog = PouActionDialog(self)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2391
            dialog.SetPouNames(self.Controler.GetProjectPouNames(self.Debug))
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2392
            dialog.SetPouElementNames(self.Controler.GetProjectPouVariables(pou_name, self.Debug))
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2393
            if dialog.ShowModal() == wx.ID_OK:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2394
                values = dialog.GetValues()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2395
                self.Controler.ProjectAddPouAction(pou_name, values["actionName"], values["language"])
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2396
                self.RefreshTitle()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2397
                self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2398
                self.RefreshTypesTree()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2399
            dialog.Destroy()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2400
            event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2401
        return OnAddActionMenu
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2402
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2403
    def OnAddConfigurationMenu(self, event):
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2404
        dialog = ConfigurationNameDialog(self, "Please enter configuration name", "Add new configuration")
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2405
        dialog.SetPouNames(self.Controler.GetProjectPouNames(self.Debug))
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2406
        dialog.SetPouElementNames(self.Controler.GetProjectPouVariables(debug = self.Debug))
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2407
        if dialog.ShowModal() == wx.ID_OK:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2408
            value = dialog.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2409
            self.Controler.ProjectAddConfiguration(value)
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2410
            self.RefreshTitle()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2411
            self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2412
            self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2413
            self.RefreshInstancesTree()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2414
        dialog.Destroy()
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
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2417
    def GenerateAddResourceFunction(self, config_name):
177
a3f6670949ba fixed bug when add resource
greg
parents: 176
diff changeset
  2418
        def OnAddResourceMenu(event):
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2419
            dialog = ResourceNameDialog(self, "Please enter resource name", "Add new resource")
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2420
            dialog.SetPouNames(self.Controler.GetProjectPouNames(self.Debug))
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2421
            dialog.SetPouElementNames(self.Controler.GetProjectPouVariables(debug = self.Debug))
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2422
            if dialog.ShowModal() == wx.ID_OK:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2423
                value = dialog.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2424
                self.Controler.ProjectAddConfigurationResource(config_name, value)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2425
                self.RefreshTitle()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2426
                self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2427
                self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2428
                self.RefreshInstancesTree()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2429
            dialog.Destroy()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2430
            event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2431
        return OnAddResourceMenu
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2432
275
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2433
    def GenerateChangePouTypeFunction(self, name, new_type):
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2434
        def OnChangePouTypeMenu(event):
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2435
            selected = self.TypesTree.GetSelection()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2436
            if self.TypesTree.GetPyData(selected) == ITEM_POU: 
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2437
                self.Controler.ProjectChangePouType(name, new_type)
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2438
                self.RefreshTitle()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2439
                self.RefreshEditMenu()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2440
                self.RefreshTypesTree()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2441
                self.RefreshLibraryTree()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2442
                self.RefreshToolBar()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2443
            event.Skip()
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2444
        return OnChangePouTypeMenu
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2445
274
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2446
    def OnCreatePouFromMenu(self, event):
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2447
        selected = self.TypesTree.GetSelection()
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2448
        if self.TypesTree.GetPyData(selected) == ITEM_POU: 
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2449
            dialog = PouNameDialog(self, "Please enter POU name", "Create a new POU from", "", wx.OK|wx.CANCEL)
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2450
            dialog.SetPouNames(self.Controler.GetProjectPouNames(self.Debug))
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2451
            if dialog.ShowModal() == wx.ID_OK:
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2452
                self.Controler.ProjectCreatePouFrom(dialog.GetValue(), self.TypesTree.GetItemText(selected))
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2453
                self.RefreshTitle()
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2454
                self.RefreshEditMenu()
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2455
                self.RefreshTypesTree()
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2456
                self.RefreshLibraryTree()
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2457
                self.RefreshToolBar()
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2458
        event.Skip()
047e36c63736 Adding support for copying a POU inside a same project
lbessard
parents: 268
diff changeset
  2459
275
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2460
#-------------------------------------------------------------------------------
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2461
#                        Remove Project Elements Functions
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2462
#-------------------------------------------------------------------------------
acf474a94136 Adding support for upgrading pou types
lbessard
parents: 274
diff changeset
  2463
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2464
    def OnRemoveDataTypeMenu(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2465
        selected = self.TypesTree.GetSelection()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2466
        if self.TypesTree.GetPyData(selected) == ITEM_DATATYPE:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2467
            name = self.TypesTree.GetItemText(selected)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2468
            if not self.Controler.DataTypeIsUsed(name, self.Debug):
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2469
                self.Controler.ProjectRemoveDataType(name)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2470
                tagname = self.Controler.ComputeDataTypeName(name)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  2471
                idx = self.IsOpened(tagname)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  2472
                if idx is not None:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2473
                    self.TabsOpened.DeletePage(idx)
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2474
                self.RefreshTitle()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2475
                self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2476
                self.RefreshTypesTree()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2477
                self.RefreshToolBar()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2478
            else:
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  2479
                message = wx.MessageDialog(self, "\"%s\" is used by one or more POUs. It can't be removed!"%name, "Error", wx.OK|wx.ICON_ERROR)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2480
                message.ShowModal()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2481
                message.Destroy()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2482
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2483
311
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  2484
    def OnRenamePouMenu(self, event):
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  2485
        selected = self.TypesTree.GetSelection()
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  2486
        if self.TypesTree.GetPyData(selected) == ITEM_POU: 
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  2487
            wx.CallAfter(self.TypesTree.EditLabel, selected)
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  2488
        event.Skip()
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  2489
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2490
    def OnRemovePouMenu(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2491
        selected = self.TypesTree.GetSelection()
315
20e169c8efe9 Fix combo box size
lbessard
parents: 313
diff changeset
  2492
        if self.TypesTree.GetPyData(selected) == ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2493
            name = self.TypesTree.GetItemText(selected)
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  2494
            if not self.Controler.PouIsUsed(name, self.Debug):
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2495
                self.Controler.ProjectRemovePou(name)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2496
                tagname = self.Controler.ComputePouName(name)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2497
                idx = self.IsOpened(tagname)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2498
                if idx is not None:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2499
                    self.VariablePanelIndexer.RemoveVariablePanel(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2500
                    self.TabsOpened.DeletePage(idx)
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2501
                self.RefreshTitle()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  2502
                self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2503
                self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2504
                self.RefreshInstancesTree()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2505
                self.RefreshLibraryTree()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2506
                self.RefreshToolBar()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2507
            else:
350
f7958989e055 Adding support for Enable/Disable Undo/Redo
greg
parents: 347
diff changeset
  2508
                message = wx.MessageDialog(self, "\"%s\" is used by one or more POUs. It can't be removed!"%name, "Error", wx.OK|wx.ICON_ERROR)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2509
                message.ShowModal()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2510
                message.Destroy()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2511
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2512
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2513
    def OnRemoveTransitionMenu(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2514
        selected = self.TypesTree.GetSelection()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2515
        if self.TypesTree.GetPyData(selected) == ITEM_TRANSITION: 
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2516
            transition = self.TypesTree.GetItemText(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2517
            item = self.TypesTree.GetItemParent(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2518
            item_type = self.TypesTree.GetPyData(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2519
            while item_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2520
                item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2521
                item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2522
            pou_name = self.TypesTree.GetItemText(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2523
            self.Controler.ProjectRemovePouTransition(pou_name, transition)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2524
            tagname = self.Controler.ComputePouTransitionName(pou_name, transition)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2525
            idx = self.IsOpened(tagname)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2526
            if idx is not None:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2527
                self.VariablePanelIndexer.RemoveVariablePanel(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2528
                self.TabsOpened.DeletePage(idx)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2529
            self.RefreshTitle()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2530
            self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2531
            self.RefreshTypesTree()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2532
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2533
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2534
    def OnRemoveActionMenu(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2535
        selected = self.TypesTree.GetSelection()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2536
        if self.TypesTree.GetPyData(selected) == ITEM_ACTION: 
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2537
            action = self.TypesTree.GetItemText(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2538
            item = self.TypesTree.GetItemParent(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2539
            item_type = self.TypesTree.GetPyData(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2540
            while item_type != ITEM_POU:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2541
                item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2542
                item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2543
            pou_name = self.TypesTree.GetItemText(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2544
            self.Controler.ProjectRemovePouAction(pou_name, action)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2545
            tagname = self.Controler.ComputePouActionName(pou_name, action)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2546
            idx = self.IsOpened(tagname)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2547
            if idx is not None:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2548
                self.VariablePanelIndexer.RemoveVariablePanel(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2549
                self.TabsOpened.DeletePage(idx)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2550
            self.RefreshTitle()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2551
            self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2552
            self.RefreshTypesTree()
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2553
        event.Skip()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2554
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2555
    def OnRemoveConfigurationMenu(self, event):
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2556
        selected = self.TypesTree.GetSelection()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2557
        if self.TypesTree.GetPyData(selected) == ITEM_CONFIGURATION: 
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2558
            name = self.TypesTree.GetItemText(selected)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2559
            self.Controler.ProjectRemoveConfiguration(name)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2560
            tagname = self.Controler.ComputeConfigurationName(name)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2561
            idx = self.IsOpened(tagname)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2562
            if idx is not None:
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2563
                self.VariablePanelIndexer.RemoveVariablePanel(tagname)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2564
                self.TabsOpened.DeletePage(idx)
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2565
            self.RefreshTitle()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2566
            self.RefreshEditMenu()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2567
            self.RefreshTypesTree()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2568
            self.RefreshInstancesTree()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2569
        event.Skip()
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2570
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2571
    def OnRemoveResourceMenu(self, event):
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2572
        selected = self.TypesTree.GetSelection()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2573
        if self.TypesTree.GetPyData(selected) == ITEM_RESOURCE:
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2574
            resource = self.TypesTree.GetItemText(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2575
            item = self.TypesTree.GetItemParent(selected)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2576
            item_type = self.TypesTree.GetPyData(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2577
            while item_type != ITEM_CONFIGURATION:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2578
                item = self.TypesTree.GetItemParent(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2579
                item_type = self.TypesTree.GetPyData(item)
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2580
            config_name = self.TypesTree.GetItemText(item)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2581
            self.Controler.ProjectRemoveConfigurationResource(config_name, resource)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2582
            tagname = self.Controler.ComputeConfigurationResourceName(config_name, selected)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2583
            idx = self.IsOpened(tagname)
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2584
            if idx is not None:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2585
                self.VariablePanelIndexer.RemoveVariablePanel(tagname)
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2586
                self.TabsOpened.DeletePage(idx)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2587
            self.RefreshTitle()
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2588
            self.RefreshEditMenu()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2589
            self.RefreshTypesTree()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  2590
            self.RefreshInstancesTree()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2591
        event.Skip()
190
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2592
    
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2593
    def OnPLCOpenEditorMenu(self, event):
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2594
        wx.MessageBox("No documentation available.\nComing soon.")
223
ea857c3a0427 Bug forbidding copy, cut, paste and F2 on grid cells fixed
lbessard
parents: 221
diff changeset
  2595
        #event.Skip()
190
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2596
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2597
    def OnPLCOpenMenu(self, event):
190
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2598
        open_pdf(os.path.join(CWD, "plcopen", "TC6_XML_V101.pdf"))
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2599
        event.Skip()
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2600
    
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2601
    def OnAboutMenu(self, event):
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2602
        OpenHtmlFrame(self,"About PLCOpenEditor", os.path.join(CWD, "doc","about.html"), wx.Size(350, 350))
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2603
        event.Skip()
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2604
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2605
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2606
#-------------------------------------------------------------------------------
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2607
#                        Errors showing functions
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2608
#-------------------------------------------------------------------------------
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2609
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2610
    def ShowError(self, infos, start, end):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2611
        self.EditProjectElement(self.Controler.GetElementType(infos[0]), infos[0])
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2612
        self.SelectTypesTreeItem(infos[0])
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2613
        if infos[1] == "name":
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2614
            self.Errors.append(infos[0])
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2615
            self.RefreshTypesTree()
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2616
            self.TypesTree.Unselect()
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2617
        elif infos[1] == "variable":
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2618
            self.VariablePanelIndexer.AddVariableError(infos)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2619
        else:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2620
            selected = self.TabsOpened.GetSelection()
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2621
            if selected != -1:
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2622
                viewer = self.TabsOpened.GetPage(selected)
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2623
                viewer.AddShownError(infos[1:], start, end)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2624
                viewer.RefreshView()
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2625
    
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2626
    def ClearErrors(self):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2627
        self.Errors = []
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2628
        self.RefreshTypesTree()
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2629
        self.VariablePanelIndexer.ClearErrors()
235
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2630
        for i in xrange(self.TabsOpened.GetPageCount()):
7b58a3b5b6ec Change in layout from AuiMDIParentFrame to AuiNotebook
lbessard
parents: 231
diff changeset
  2631
            viewer = self.TabsOpened.GetPage(i)
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  2632
            viewer.ClearErrors()
190
f37abf3ee358 added to helpmenu : about + plcopen + plcopeneditor
greg
parents: 186
diff changeset
  2633
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2634
current_num = 0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2635
def GetNewNum():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2636
    global current_num
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2637
    current_num += 1
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2638
    return current_num
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2639
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2640
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2641
#                            Create Project Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2642
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2643
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2644
[ID_SCALINGPANEL, ID_SCALINGPANELXSCALE, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2645
 ID_SCALINGPANELYSCALE, ID_SCALINGPANELSTATICTEXT1, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2646
 ID_SCALINGPANELSTATICTEXT2, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2647
] = [wx.NewId() for _init_ctrls in range(5)]
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2648
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2649
class ScalingPanel(wx.Panel):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2650
    
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2651
    def _init_coll_ScalingPanelSizer_Items(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2652
        parent.AddWindow(self.staticText1, 0, border=10, flag=wx.GROW|wx.TOP|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2653
        parent.AddWindow(self.XScale, 0, border=10, flag=wx.GROW|wx.TOP|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2654
        parent.AddWindow(self.staticText2, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2655
        parent.AddWindow(self.YScale, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2656
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2657
    def _init_coll_ScalingPanelSizer_Growables(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2658
        parent.AddGrowableCol(1)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2659
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2660
    def _init_sizers(self):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2661
        self.ScalingPanelSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=2, vgap=5)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2662
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2663
        self._init_coll_ScalingPanelSizer_Items(self.ScalingPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2664
        self._init_coll_ScalingPanelSizer_Growables(self.ScalingPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2665
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2666
        self.SetSizer(self.ScalingPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2667
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2668
    def _init_ctrls(self, prnt):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2669
        wx.Panel.__init__(self, id=ID_SCALINGPANEL,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2670
              name='ScalingPanel', parent=prnt, pos=wx.Point(0, 0),
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  2671
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2672
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2673
        self.staticText1 = wx.StaticText(id=ID_SCALINGPANELSTATICTEXT1,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2674
              label='X Scale:', name='staticText1', parent=self,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2675
              pos=wx.Point(0, 0), size=wx.Size(150, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2676
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2677
        self.XScale = wx.SpinCtrl(id=ID_SCALINGPANELXSCALE,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2678
              name='XScale', parent=self, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2679
              size=wx.Size(0, 24), style=0, min=0, max=2**16)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2680
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2681
        self.staticText2 = wx.StaticText(id=ID_SCALINGPANELSTATICTEXT2,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2682
              label='Y Scale:', name='staticText2', parent=self,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2683
              pos=wx.Point(0, 0), size=wx.Size(150, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2684
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2685
        self.YScale = wx.SpinCtrl(id=ID_SCALINGPANELYSCALE,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2686
              name='YScale', parent=self, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2687
              size=wx.Size(0, 24), style=0, min=0, max=2**16)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2688
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2689
        self._init_sizers()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2690
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2691
    def __init__(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2692
        self._init_ctrls(parent)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2693
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2694
    def SetScaling(self, x, y):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2695
        self.XScale.SetValue(x)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2696
        self.YScale.SetValue(y)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2697
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2698
    def GetScaling(self):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2699
        return self.XScale.GetValue(), self.YScale.GetValue()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2700
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2701
[ID_PROJECTDIALOG, ID_PROJECTDIALOGMAINNOTEBOOK, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2702
 ID_PROJECTDIALOGPROJECTPANEL, ID_PROJECTDIALOGAUTHORPANEL, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2703
 ID_PROJECTDIALOGGRAPHICSPANEL, ID_PROJECTDIALOGMISCELLANEOUSPANEL, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2704
 ID_PROJECTDIALOGPROJECTNAME, ID_PROJECTDIALOGPROJECTVERSION, 
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2705
 ID_PROJECTDIALOGPRODUCTNAME, ID_PROJECTDIALOGPRODUCTVERSION, 
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2706
 ID_PROJECTDIALOGPRODUCTRELEASE, ID_PROJECTDIALOGCOMPANYNAME, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2707
 ID_PROJECTDIALOGCOMPANYURL, ID_PROJECTDIALOGAUTHORNAME, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2708
 ID_PROJECTDIALOGORGANIZATION, ID_PROJECTDIALOGLANGUAGE, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2709
 ID_PROJECTDIALOGCONTENTDESCRIPTION, ID_PROJECTDIALOGSCALINGNOTEBOOK, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2710
 ID_PROJECTDIALOGPAGEWIDTH, ID_PROJECTDIALOGPAGEHEIGHT, 
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2711
 ID_PROJECTDIALOGSTATICTEXT1, ID_PROJECTDIALOGSTATICTEXT2, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2712
 ID_PROJECTDIALOGSTATICTEXT3, ID_PROJECTDIALOGSTATICTEXT4, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2713
 ID_PROJECTDIALOGSTATICTEXT5, ID_PROJECTDIALOGSTATICTEXT6, 
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2714
 ID_PROJECTDIALOGSTATICTEXT7, ID_PROJECTDIALOGSTATICTEXT8, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2715
 ID_PROJECTDIALOGSTATICTEXT9, ID_PROJECTDIALOGSTATICTEXT10, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2716
 ID_PROJECTDIALOGSTATICTEXT11, ID_PROJECTDIALOGSTATICTEXT12, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2717
 ID_PROJECTDIALOGSTATICTEXT13, ID_PROJECTDIALOGSTATICTEXT14, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2718
 ID_PROJECTDIALOGSTATICTEXT15, 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2719
] = [wx.NewId() for _init_ctrls in range(35)]
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2720
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2721
class ProjectDialog(wx.Dialog):
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  2722
    if wx.VERSION < (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  2723
        def Bind(self, event, function, id = None):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  2724
            if id is not None:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  2725
                event(self, id, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  2726
            else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  2727
                event(self, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  2728
                
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2729
    def _init_coll_flexGridSizer1_Items(self, parent):
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2730
        parent.AddSizer(self.MainNotebook, 0, border=0, flag=wx.GROW)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2731
        parent.AddSizer(self.ButtonSizer, 0, border=20, flag=wx.ALIGN_RIGHT|wx.BOTTOM|wx.LEFT|wx.RIGHT)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2732
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2733
    def _init_coll_flexGridSizer1_Growables(self, parent):
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2734
        parent.AddGrowableCol(0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2735
        parent.AddGrowableRow(0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2736
    
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2737
    def _init_coll_ProjectPanelSizer_Items(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2738
        parent.AddWindow(self.staticText1, 0, border=10, flag=wx.GROW|wx.TOP|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2739
        parent.AddWindow(self.ProjectName, 0, border=10, flag=wx.GROW|wx.TOP|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2740
        parent.AddWindow(self.staticText2, 0, border=10, flag=wx.GROW|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2741
        parent.AddWindow(self.ProjectVersion, 0, border=10, flag=wx.GROW|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2742
        parent.AddWindow(self.staticText3, 0, border=10, flag=wx.GROW|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2743
        parent.AddWindow(self.ProductName, 0, border=10, flag=wx.GROW|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2744
        parent.AddWindow(self.staticText4, 0, border=10, flag=wx.GROW|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2745
        parent.AddWindow(self.ProductVersion, 0, border=10, flag=wx.GROW|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2746
        parent.AddWindow(self.staticText5, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2747
        parent.AddWindow(self.ProductRelease, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2748
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2749
    def _init_coll_ProjectPanelSizer_Growables(self, parent):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2750
        parent.AddGrowableCol(1)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2751
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2752
    def _init_coll_AuthorPanelSizer_Items(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2753
        parent.AddWindow(self.staticText6, 0, border=10, flag=wx.GROW|wx.TOP|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2754
        parent.AddWindow(self.CompanyName, 0, border=10, flag=wx.GROW|wx.TOP|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2755
        parent.AddWindow(self.staticText7, 0, border=10, flag=wx.GROW|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2756
        parent.AddWindow(self.CompanyURL, 0, border=10, flag=wx.GROW|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2757
        parent.AddWindow(self.staticText8, 0, border=10, flag=wx.GROW|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2758
        parent.AddWindow(self.AuthorName, 0, border=10, flag=wx.GROW|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2759
        parent.AddWindow(self.staticText9, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2760
        parent.AddWindow(self.Organization, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2761
    
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2762
    def _init_coll_AuthorPanelSizer_Growables(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2763
        parent.AddGrowableCol(1)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2764
    
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2765
    def _init_coll_GraphicsPanelSizer_Items(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2766
        parent.AddWindow(self.staticText12, 0, border=10, flag=wx.GROW|wx.TOP|wx.LEFT|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2767
        parent.AddSizer(self.GraphicsPageSizeSizer, 0, border=10, flag=wx.GROW|wx.LEFT|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2768
        parent.AddWindow(self.staticText15, 0, border=10, flag=wx.GROW|wx.LEFT|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2769
        parent.AddWindow(self.ScalingNotebook, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.LEFT|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2770
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2771
    def _init_coll_GraphicsPanelSizer_Growables(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2772
        parent.AddGrowableCol(0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2773
        parent.AddGrowableRow(3)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2774
    
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2775
    def _init_coll_GraphicsPageSizeSizer_Items(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2776
        parent.AddWindow(self.staticText13, 0, border=12, flag=wx.GROW|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2777
        parent.AddWindow(self.PageWidth, 0, border=0, flag=wx.GROW)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2778
        parent.AddWindow(self.staticText14, 0, border=12, flag=wx.GROW|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2779
        parent.AddWindow(self.PageHeight, 0, border=0, flag=wx.GROW)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2780
    
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2781
    def _init_coll_GraphicsPageSizeSizer_Growables(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2782
        parent.AddGrowableCol(1)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2783
    
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2784
    def _init_coll_MiscellaneousPanelSizer_Items(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2785
        parent.AddWindow(self.staticText10, 0, border=10, flag=wx.GROW|wx.TOP|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2786
        parent.AddWindow(self.Language, 0, border=10, flag=wx.GROW|wx.TOP|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2787
        parent.AddWindow(self.staticText11, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.LEFT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2788
        parent.AddWindow(self.ContentDescription, 0, border=10, flag=wx.GROW|wx.BOTTOM|wx.RIGHT)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2789
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2790
    def _init_coll_MiscellaneousPanelSizer_Growables(self, parent):
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2791
        parent.AddGrowableCol(1)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2792
        parent.AddGrowableRow(1)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2793
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2794
    def _init_sizers(self):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2795
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=10)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2796
        self.ProjectPanelSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=5, vgap=15)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2797
        self.AuthorPanelSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=4, vgap=15)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2798
        self.GraphicsPanelSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=4, vgap=5)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2799
        self.GraphicsPageSizeSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=2, vgap=5)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2800
        self.MiscellaneousPanelSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=2, vgap=15)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2801
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2802
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2803
        self._init_coll_flexGridSizer1_Growables(self.flexGridSizer1)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2804
        self._init_coll_ProjectPanelSizer_Items(self.ProjectPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2805
        self._init_coll_ProjectPanelSizer_Growables(self.ProjectPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2806
        self._init_coll_AuthorPanelSizer_Items(self.AuthorPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2807
        self._init_coll_AuthorPanelSizer_Growables(self.AuthorPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2808
        self._init_coll_GraphicsPanelSizer_Items(self.GraphicsPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2809
        self._init_coll_GraphicsPanelSizer_Growables(self.GraphicsPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2810
        self._init_coll_GraphicsPageSizeSizer_Items(self.GraphicsPageSizeSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2811
        self._init_coll_GraphicsPageSizeSizer_Growables(self.GraphicsPageSizeSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2812
        self._init_coll_MiscellaneousPanelSizer_Items(self.MiscellaneousPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2813
        self._init_coll_MiscellaneousPanelSizer_Growables(self.MiscellaneousPanelSizer)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2814
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2815
        self.SetSizer(self.flexGridSizer1)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2816
        self.ProjectPanel.SetSizer(self.ProjectPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2817
        self.AuthorPanel.SetSizer(self.AuthorPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2818
        self.GraphicsPanel.SetSizer(self.GraphicsPanelSizer)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2819
        self.MiscellaneousPanel.SetSizer(self.MiscellaneousPanelSizer)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2820
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2821
    def _init_ctrls(self, prnt):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2822
        wx.Dialog.__init__(self, id=ID_PROJECTDIALOG,
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2823
              name='ProjectDialog', parent=prnt, pos=wx.Point(376, 223),
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2824
              size=wx.Size(500, 350), style=wx.DEFAULT_DIALOG_STYLE,
357
e5501b3337db Little bugs fixed
greg
parents: 352
diff changeset
  2825
              title='Project properties')
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2826
        self.SetClientSize(wx.Size(500, 350))
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2827
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2828
        self.MainNotebook = wx.Notebook(id=ID_PROJECTDIALOGMAINNOTEBOOK,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2829
                  name='MainNotebook', parent=self, pos=wx.Point(0,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2830
                  0), size=wx.Size(0, 0), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2831
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2832
        # Project Panel elements
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2833
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2834
        self.ProjectPanel = wx.Panel(id=ID_PROJECTDIALOGPROJECTPANEL,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2835
              name='ProjectPanel', parent=self.MainNotebook, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2836
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2837
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2838
        self.staticText1 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT1,
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2839
              label='Project Name (required):', name='staticText1', parent=self.ProjectPanel,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2840
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2841
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2842
        self.ProjectName = wx.TextCtrl(id=ID_PROJECTDIALOGPROJECTNAME,
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2843
              name='ProjectName', parent=self.ProjectPanel, pos=wx.Point(0, 0), 
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2844
              size=wx.Size(0, 24), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2845
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2846
        self.staticText2 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT2,
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2847
              label='Project Version (optional):', name='staticText2', parent=self.ProjectPanel,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2848
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2849
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2850
        self.ProjectVersion = wx.TextCtrl(id=ID_PROJECTDIALOGPROJECTVERSION,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2851
              name='ProjectVersion', parent=self.ProjectPanel, pos=wx.Point(0, 0), 
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2852
              size=wx.Size(0, 24), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2853
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2854
        self.staticText3 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT3,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2855
              label='Product Name (required):', name='staticText3', parent=self.ProjectPanel,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2856
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2857
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2858
        self.ProductName = wx.TextCtrl(id=ID_PROJECTDIALOGPRODUCTNAME,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2859
              name='ProductName', parent=self.ProjectPanel, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2860
              size=wx.Size(0, 24), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2861
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2862
        self.staticText4 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT4,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2863
              label='Product Version (required):', name='staticText4', parent=self.ProjectPanel,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2864
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2865
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2866
        self.ProductVersion = wx.TextCtrl(id=ID_PROJECTDIALOGPRODUCTVERSION,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2867
              name='ProductVersion', parent=self.ProjectPanel, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2868
              size=wx.Size(0, 24), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2869
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2870
        self.staticText5 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT5,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2871
              label='Product Release (optional):', name='staticText5', parent=self.ProjectPanel,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2872
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2873
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2874
        self.ProductRelease = wx.TextCtrl(id=ID_PROJECTDIALOGPRODUCTRELEASE,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2875
              name='ProductRelease', parent=self.ProjectPanel, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2876
              size=wx.Size(0, 24), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2877
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2878
        self.MainNotebook.AddPage(self.ProjectPanel, "Project")
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2879
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2880
        # Author Panel elements
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2881
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2882
        self.AuthorPanel = wx.Panel(id=ID_PROJECTDIALOGAUTHORPANEL,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2883
              name='AuthorPanel', parent=self.MainNotebook, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2884
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2885
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2886
        self.staticText6 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT6,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2887
              label='Company Name (required):', name='staticText6', parent=self.AuthorPanel,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2888
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2889
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2890
        self.CompanyName = wx.TextCtrl(id=ID_PROJECTDIALOGCOMPANYNAME,
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2891
              name='CompanyName', parent=self.AuthorPanel, pos=wx.Point(0, 0),
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2892
              size=wx.Size(0, 24), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2893
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2894
        self.staticText7 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT7,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2895
              label='Company URL (optional):', name='staticText7', parent=self.AuthorPanel,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2896
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2897
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2898
        self.CompanyURL = wx.TextCtrl(id=ID_PROJECTDIALOGCOMPANYURL,
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2899
              name='CompanyURL', parent=self.AuthorPanel, pos=wx.Point(0, 0),
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2900
              size=wx.Size(0, 24), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2901
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2902
        self.staticText8 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT8,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2903
              label='Author Name (optional):', name='staticText8', parent=self.AuthorPanel,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2904
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2905
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2906
        self.AuthorName = wx.TextCtrl(id=ID_PROJECTDIALOGAUTHORNAME,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2907
              name='AuthorName', parent=self.AuthorPanel, pos=wx.Point(0, 0),
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2908
              size=wx.Size(0, 24), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2909
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2910
        self.staticText9 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT9,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2911
              label='Organization (optional):', name='staticText9', parent=self.AuthorPanel,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2912
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2913
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2914
        self.Organization = wx.TextCtrl(id=ID_PROJECTDIALOGORGANIZATION,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2915
              name='Organization', parent=self.AuthorPanel, pos=wx.Point(0, 0),
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2916
              size=wx.Size(0, 24), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2917
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2918
        self.MainNotebook.AddPage(self.AuthorPanel, "Author")
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2919
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2920
        # Graphics Panel elements
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2921
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2922
        self.GraphicsPanel = wx.Panel(id=ID_PROJECTDIALOGGRAPHICSPANEL,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2923
              name='GraphicsPanel', parent=self.MainNotebook, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2924
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2925
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2926
        self.staticText12 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT12,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2927
              label='Page Size (optional):', name='staticText12', parent=self.GraphicsPanel,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2928
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2929
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2930
        self.staticText13 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT13,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2931
              label='Width:', name='staticText13', parent=self.GraphicsPanel,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2932
              pos=wx.Point(0, 0), size=wx.Size(150, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2933
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2934
        self.PageWidth = wx.SpinCtrl(id=ID_PROJECTDIALOGPAGEWIDTH,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2935
              name='PageWidth', parent=self.GraphicsPanel, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2936
              size=wx.Size(0, 24), style=0, min=0, max=2**16)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2937
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2938
        self.staticText14 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT14,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2939
              label='Height:', name='staticText14', parent=self.GraphicsPanel,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2940
              pos=wx.Point(0, 0), size=wx.Size(150, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2941
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2942
        self.PageHeight = wx.SpinCtrl(id=ID_PROJECTDIALOGPAGEHEIGHT,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2943
              name='PageHeight', parent=self.GraphicsPanel, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2944
              size=wx.Size(0, 24), style=0, min=0, max=2**16)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2945
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2946
        self.staticText15 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT15,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2947
              label='Scaling:', name='staticText15', parent=self.GraphicsPanel,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2948
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2949
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2950
        self.ScalingNotebook = wx.Notebook(id=ID_PROJECTDIALOGSCALINGNOTEBOOK,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2951
              name='ScalingNotebook', parent=self.GraphicsPanel, pos=wx.Point(0,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2952
              0), size=wx.Size(0, 0), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2953
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2954
        self.Scalings = {}
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2955
        for language in ["FBD", "LD", "SFC"]:
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2956
            window = ScalingPanel(self.ScalingNotebook)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2957
            self.Scalings[language] = window
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2958
            self.ScalingNotebook.AddPage(window, language)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2959
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2960
        self.MainNotebook.AddPage(self.GraphicsPanel, "Graphics")
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2961
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2962
        # Miscellaneous Panel elements
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2963
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2964
        self.MiscellaneousPanel = wx.Panel(id=ID_PROJECTDIALOGMISCELLANEOUSPANEL,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2965
              name='MiscellaneousPanel', parent=self.MainNotebook, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2966
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2967
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2968
        self.staticText10 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT10,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2969
              label='Language (optional):', name='staticText10', parent=self.MiscellaneousPanel,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2970
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2971
304
2df3d31d8059 Replacing wx.Choice by wx.ComboBox
lbessard
parents: 301
diff changeset
  2972
        self.Language = wx.ComboBox(id=ID_PROJECTDIALOGLANGUAGE,
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2973
              name='Language', parent=self.MiscellaneousPanel, pos=wx.Point(0, 0),
346
66fce4b3f7e2 Fix ComboBox height for display in ubuntu
lbessard
parents: 341
diff changeset
  2974
              size=wx.Size(0, 28), style=wx.CB_READONLY)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2975
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2976
        self.staticText11 = wx.StaticText(id=ID_PROJECTDIALOGSTATICTEXT11,
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2977
              label='Content Description (optional):', name='staticText11', parent=self.MiscellaneousPanel,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2978
              pos=wx.Point(0, 0), size=wx.Size(200, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2979
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2980
        self.ContentDescription = wx.TextCtrl(id=ID_PROJECTDIALOGCONTENTDESCRIPTION,
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2981
              name='ContentDescription', parent=self.MiscellaneousPanel, pos=wx.Point(0, 0),
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2982
              size=wx.Size(0, 24), style=wx.TE_MULTILINE)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2983
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2984
        self.MainNotebook.AddPage(self.MiscellaneousPanel, "Miscellaneous")
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2985
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2986
        self.ButtonSizer = self.CreateButtonSizer(wx.OK|wx.CANCEL|wx.CENTRE)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2987
        self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.ButtonSizer.GetAffirmativeButton().GetId())
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2988
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2989
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2990
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2991
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2992
        self._init_ctrls(parent)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  2993
        
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2994
        languages = ["", "en-US", "fr-FR"]
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2995
        
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2996
        for language in languages:
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2997
            self.Language.Append(language)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  2998
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  2999
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3000
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3001
        if self.ProjectName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3002
            error.append("Project Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3003
        if self.CompanyName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3004
            error.append("Company Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3005
        if self.ProductName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3006
            error.append("Product Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3007
        if self.ProductVersion.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3008
            error.append("Product Version")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3009
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3010
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3011
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3012
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3013
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3014
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3015
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3016
                else:
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3017
                    text += ", %s"%item
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3018
            message = wx.MessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3019
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3020
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3021
        else:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3022
            self.EndModal(wx.ID_OK)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3023
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3024
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3025
        for item, value in values.items():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3026
            if item == "projectName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3027
                self.ProjectName.SetValue(value)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3028
            elif item == "projectVersion":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3029
                self.ProjectVersion.SetValue(value)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3030
            elif item == "productName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3031
                self.ProductName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3032
            elif item == "productVersion":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3033
                self.ProductVersion.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3034
            elif item == "productRelease":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3035
                self.ProductRelease.SetValue(value)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3036
            elif item == "companyName":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3037
                self.CompanyName.SetValue(value)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3038
            elif item == "companyURL":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3039
                self.CompanyURL.SetValue(value)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3040
            elif item == "authorName":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3041
                self.AuthorName.SetValue(value)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3042
            elif item == "organization":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3043
                self.Organization.SetValue(value)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3044
            elif item == "language":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3045
                self.Language.SetStringSelection(value)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3046
            elif item == "contentDescription":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3047
                self.ContentDescription.SetValue(value)
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3048
            elif item == "pageSize":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3049
                self.PageWidth.SetValue(value[0])
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3050
                self.PageHeight.SetValue(value[1])
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3051
            elif item == "scaling":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3052
                for language, (x, y) in value.items():
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3053
                    if language in self.Scalings:
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3054
                        self.Scalings[language].SetScaling(x, y)
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3055
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3056
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3057
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3058
        values["projectName"] = self.ProjectName.GetValue()
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3059
        if self.ProjectVersion.GetValue() != "":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3060
            values["projectVersion"] = self.ProjectVersion.GetValue()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3061
        values["productName"] = self.ProductName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3062
        values["productVersion"] = self.ProductVersion.GetValue()
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3063
        if self.ProductRelease.GetValue() != "":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3064
            values["productRelease"] = self.ProductRelease.GetValue()
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3065
        values["companyName"] = self.CompanyName.GetValue()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3066
        if self.CompanyURL.GetValue() != "":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3067
            values["companyURL"] = self.CompanyURL.GetValue()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3068
        if self.AuthorName.GetValue() != "":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3069
            values["authorName"] = self.AuthorName.GetValue()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3070
        if self.Organization.GetValue() != "":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3071
            values["organization"] = self.Organization.GetValue()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3072
        if self.Language.GetStringSelection() != "":
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3073
            values["language"] = self.Language.GetStringSelection()
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3074
        if self.ProductRelease.GetValue() != "":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3075
            values["contentDescription"] = self.ContentDescription.GetValue()
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3076
        values["pageSize"] = (self.PageWidth.GetValue(), self.PageHeight.GetValue())
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3077
        values["scaling"] = {}
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3078
        for language in ["FBD", "LD", "SFC"]:
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3079
            values["scaling"][language] = self.Scalings[language].GetScaling()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3080
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3081
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3082
#-------------------------------------------------------------------------------
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3083
#                          Edit Step Name Dialog
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3084
#-------------------------------------------------------------------------------
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3085
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3086
class DataTypeDialog(wx.TextEntryDialog):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3087
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3088
    if wx.VERSION < (2, 6, 0):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3089
        def Bind(self, event, function, id = None):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3090
            if id is not None:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3091
                event(self, id, function)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3092
            else:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3093
                event(self, function)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3094
    
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3095
    def __init__(self, parent, message, caption = "Please enter text", defaultValue = "", 
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3096
                       style = wx.OK|wx.CANCEL|wx.CENTRE, pos = wx.DefaultPosition):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3097
        wx.TextEntryDialog.__init__(self, parent, message, caption, defaultValue, style, pos)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3098
        
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3099
        self.DataTypeNames = []
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3100
        if wx.VERSION >= (2, 8, 0):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3101
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(2).GetSizer().GetItem(1).GetSizer().GetAffirmativeButton().GetId())
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3102
        elif wx.VERSION >= (2, 6, 0):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3103
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(3).GetSizer().GetAffirmativeButton().GetId())
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3104
        else:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3105
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(3).GetSizer().GetChildren()[0].GetSizer().GetChildren()[0].GetWindow().GetId())
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3106
    
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3107
    def OnOK(self, event):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3108
        datatype_name = self.GetSizer().GetItem(1).GetWindow().GetValue()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3109
        if datatype_name == "":
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3110
            message = wx.MessageDialog(self, "You must type a name!", "Error", wx.OK|wx.ICON_ERROR)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3111
            message.ShowModal()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3112
            message.Destroy()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3113
        elif not TestIdentifier(datatype_name):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3114
            message = wx.MessageDialog(self, "\"%s\" is not a valid identifier!"%datatype_name, "Error", wx.OK|wx.ICON_ERROR)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3115
            message.ShowModal()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3116
            message.Destroy()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3117
        elif datatype_name.upper() in IEC_KEYWORDS:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3118
            message = wx.MessageDialog(self, "\"%s\" is a keyword. It can't be used!"%datatype_name, "Error", wx.OK|wx.ICON_ERROR)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3119
            message.ShowModal()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3120
            message.Destroy()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3121
        elif datatype_name.upper() in self.DataTypeNames:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3122
            message = wx.MessageDialog(self, "\"%s\" data type already exists!"%datatype_name, "Error", wx.OK|wx.ICON_ERROR)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3123
            message.ShowModal()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3124
            message.Destroy()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3125
        else:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3126
            self.EndModal(wx.ID_OK)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3127
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3128
    def SetDataTypeNames(self, datatype_names):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3129
        self.DataTypeNames = [datatype_name.upper() for datatype_name in datatype_names]
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3130
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3131
    def GetValue(self):
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3132
        return self.GetSizer().GetItem(1).GetWindow().GetValue()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3133
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3134
#-------------------------------------------------------------------------------
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3135
#                            Create Pou Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3136
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3137
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3138
[ID_POUDIALOG, ID_POUDIALOGPOUNAME, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3139
 ID_POUDIALOGPOUTYPE, ID_POUDIALOGLANGUAGE, ID_POUDIALOGSTATICTEXT1,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3140
 ID_POUDIALOGSTATICTEXT2, ID_POUDIALOGSTATICTEXT3, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3141
] = [wx.NewId() for _init_ctrls in range(7)]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3142
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3143
class PouDialog(wx.Dialog):
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3144
    if wx.VERSION < (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3145
        def Bind(self, event, function, id = None):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3146
            if id is not None:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3147
                event(self, id, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3148
            else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3149
                event(self, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3150
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3151
    def _init_coll_flexGridSizer1_Items(self, parent):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3152
        parent.AddSizer(self.MainSizer, 0, border=20, flag=wx.GROW|wx.TOP|wx.LEFT|wx.RIGHT)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3153
        parent.AddSizer(self.ButtonSizer, 0, border=20, flag=wx.ALIGN_RIGHT|wx.BOTTOM|wx.LEFT|wx.RIGHT)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3154
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3155
    def _init_coll_flexGridSizer1_Growables(self, parent):
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3156
        parent.AddGrowableCol(0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3157
        parent.AddGrowableRow(0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3158
    
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3159
    def _init_coll_MainSizer_Items(self, parent):
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 114
diff changeset
  3160
        parent.AddWindow(self.staticText1, 0, border=4, flag=wx.GROW|wx.TOP)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3161
        parent.AddWindow(self.PouName, 0, border=0, flag=wx.GROW)
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 114
diff changeset
  3162
        parent.AddWindow(self.staticText2, 0, border=4, flag=wx.GROW|wx.TOP)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3163
        parent.AddWindow(self.PouType, 0, border=0, flag=wx.GROW)
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 114
diff changeset
  3164
        parent.AddWindow(self.staticText3, 0, border=4, flag=wx.GROW|wx.TOP)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3165
        parent.AddWindow(self.Language, 0, border=0, flag=wx.GROW)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3166
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3167
    def _init_coll_MainSizer_Growables(self, parent):
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3168
        parent.AddGrowableCol(1)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3169
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3170
    def _init_sizers(self):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3171
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=10)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3172
        self.MainSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=3, vgap=15)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3173
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3174
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3175
        self._init_coll_flexGridSizer1_Growables(self.flexGridSizer1)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3176
        self._init_coll_MainSizer_Items(self.MainSizer)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3177
        self._init_coll_MainSizer_Growables(self.MainSizer)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3178
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3179
        self.SetSizer(self.flexGridSizer1)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3180
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3181
    def _init_ctrls(self, prnt):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3182
        wx.Dialog.__init__(self, id=ID_POUDIALOG,
16
20dcc0dce64b Bug on block properties dialog corrected
lbessard
parents: 13
diff changeset
  3183
              name='PouDialog', parent=prnt, pos=wx.Point(376, 223),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3184
              size=wx.Size(300, 200), style=wx.DEFAULT_DIALOG_STYLE,
16
20dcc0dce64b Bug on block properties dialog corrected
lbessard
parents: 13
diff changeset
  3185
              title='Create a new POU')
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3186
        self.SetClientSize(wx.Size(300, 200))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3187
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3188
        self.staticText1 = wx.StaticText(id=ID_POUDIALOGSTATICTEXT1,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3189
              label='POU Name:', name='staticText1', parent=self,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3190
              pos=wx.Point(0, 0), size=wx.Size(100, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3191
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3192
        self.PouName = wx.TextCtrl(id=ID_POUDIALOGPOUNAME,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3193
              name='POUName', parent=self, pos=wx.Point(0, 0), 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3194
              size=wx.Size(0, 24), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3195
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3196
        self.staticText2 = wx.StaticText(id=ID_POUDIALOGSTATICTEXT2,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3197
              label='POU Type:', name='staticText2', parent=self,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3198
              pos=wx.Point(0, 0), size=wx.Size(100, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3199
304
2df3d31d8059 Replacing wx.Choice by wx.ComboBox
lbessard
parents: 301
diff changeset
  3200
        self.PouType = wx.ComboBox(id=ID_POUDIALOGPOUTYPE,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3201
              name='POUType', parent=self, pos=wx.Point(0, 0),
346
66fce4b3f7e2 Fix ComboBox height for display in ubuntu
lbessard
parents: 341
diff changeset
  3202
              size=wx.Size(0, 28), style=wx.CB_READONLY)
304
2df3d31d8059 Replacing wx.Choice by wx.ComboBox
lbessard
parents: 301
diff changeset
  3203
        self.Bind(wx.EVT_COMBOBOX, self.OnTypeChanged, id=ID_POUDIALOGPOUTYPE)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3204
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3205
        self.staticText3 = wx.StaticText(id=ID_POUDIALOGSTATICTEXT3,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3206
              label='Language:', name='staticText3', parent=self,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3207
              pos=wx.Point(0, 0), size=wx.Size(100, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3208
304
2df3d31d8059 Replacing wx.Choice by wx.ComboBox
lbessard
parents: 301
diff changeset
  3209
        self.Language = wx.ComboBox(id=ID_POUDIALOGLANGUAGE,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3210
              name='Language', parent=self, pos=wx.Point(0, 0),
346
66fce4b3f7e2 Fix ComboBox height for display in ubuntu
lbessard
parents: 341
diff changeset
  3211
              size=wx.Size(0, 28), style=wx.CB_READONLY)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3212
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3213
        self.ButtonSizer = self.CreateButtonSizer(wx.OK|wx.CANCEL|wx.CENTRE)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3214
        self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.ButtonSizer.GetAffirmativeButton().GetId())
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3215
            
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3216
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3217
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  3218
    def __init__(self, parent, pou_type = None):
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3219
        self._init_ctrls(parent)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3220
        
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  3221
        for option in ["function", "functionBlock", "program"]:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3222
            self.PouType.Append(option)
163
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  3223
        if pou_type is not None:
e4949f54c5d6 Changing ProjectTree contextual menu and EditMenu
lbessard
parents: 159
diff changeset
  3224
            self.PouType.SetStringSelection(pou_type)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3225
        self.RefreshLanguage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3226
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  3227
        self.PouNames = []
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3228
        self.PouElementNames = []
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  3229
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3230
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3231
        error = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3232
        pou_name = self.PouName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3233
        if pou_name == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3234
            error.append("POU Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3235
        if self.PouType.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3236
            error.append("POU Type")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3237
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3238
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3239
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3240
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3241
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3242
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3243
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3244
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3245
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3246
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3247
                    text += ", %s"%item 
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3248
            message = wx.MessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3249
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3250
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3251
        elif not TestIdentifier(pou_name):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3252
            message = wx.MessageDialog(self, "\"%s\" is not a valid identifier!"%pou_name, "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3253
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3254
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3255
        elif pou_name.upper() in IEC_KEYWORDS:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3256
            message = wx.MessageDialog(self, "\"%s\" is a keyword. It can't be used!"%pou_name, "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3257
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3258
            message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3259
        elif pou_name.upper() in self.PouNames:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3260
            message = wx.MessageDialog(self, "\"%s\" pou already exists!"%pou_name, "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3261
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3262
            message.Destroy()
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3263
        elif pou_name.upper() in self.PouElementNames:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3264
            message = wx.MessageDialog(self, "A pou has an element with \"%s\" for name. It can generate a conflict. Do you wish to continue?"%pou_name, "Warning", wx.YES_NO|wx.ICON_EXCLAMATION)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3265
            result = message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3266
            message.Destroy()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3267
            if result == wx.ID_YES:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3268
                self.EndModal(wx.ID_OK)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3269
        else:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3270
            self.EndModal(wx.ID_OK)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3271
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3272
    def RefreshLanguage(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3273
        selection = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3274
        self.Language.Clear()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3275
        for option in ["IL","ST","LD","FBD","SFC"]:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3276
            if option != "SFC" or self.PouType.GetStringSelection() != "function":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3277
                self.Language.Append(option)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3278
        if self.Language.FindString(selection) != wx.NOT_FOUND:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3279
            self.Language.SetStringSelection(selection)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3280
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3281
    def OnTypeChanged(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3282
        self.RefreshLanguage()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3283
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3284
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3285
    def SetPouNames(self, pou_names):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3286
        self.PouNames = [pou_name.upper() for pou_name in pou_names]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3287
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3288
    def SetPouElementNames(self, element_names):
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3289
        self.PouElementNames = [element_name.upper() for element_name in element_names]
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3290
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3291
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3292
        for item, value in values.items():
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3293
            if item == "pouName":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3294
                self.PouName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3295
            elif item == "pouType":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3296
                self.PouType.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3297
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3298
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3299
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3300
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3301
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3302
        values["pouName"] = self.PouName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3303
        values["pouType"] = self.PouType.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3304
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3305
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3306
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3307
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3308
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3309
#                          Create Pou Transition Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3310
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3311
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3312
[ID_POUTRANSITIONDIALOG, ID_POUTRANSITIONDIALOGTRANSITIONNAME, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3313
 ID_POUTRANSITIONDIALOGLANGUAGE, ID_POUTRANSITIONDIALOGSTATICTEXT1, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3314
 ID_POUTRANSITIONDIALOGSTATICTEXT2,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3315
] = [wx.NewId() for _init_ctrls in range(5)]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3316
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3317
class PouTransitionDialog(wx.Dialog):
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3318
    if wx.VERSION < (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3319
        def Bind(self, event, function, id = None):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3320
            if id is not None:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3321
                event(self, id, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3322
            else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3323
                event(self, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3324
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3325
    def _init_coll_flexGridSizer1_Items(self, parent):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3326
        parent.AddSizer(self.MainSizer, 0, border=20, flag=wx.GROW|wx.TOP|wx.LEFT|wx.RIGHT)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3327
        parent.AddSizer(self.ButtonSizer, 0, border=20, flag=wx.ALIGN_RIGHT|wx.BOTTOM|wx.LEFT|wx.RIGHT)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3328
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3329
    def _init_coll_flexGridSizer1_Growables(self, parent):
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3330
        parent.AddGrowableCol(0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3331
        parent.AddGrowableRow(0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3332
    
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3333
    def _init_coll_MainSizer_Items(self, parent):
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 114
diff changeset
  3334
        parent.AddWindow(self.staticText1, 0, border=4, flag=wx.GROW|wx.TOP)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3335
        parent.AddWindow(self.TransitionName, 0, border=0, flag=wx.GROW)
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 114
diff changeset
  3336
        parent.AddWindow(self.staticText2, 0, border=4, flag=wx.GROW|wx.TOP)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3337
        parent.AddWindow(self.Language, 0, border=0, flag=wx.GROW)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3338
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3339
    def _init_coll_MainSizer_Growables(self, parent):
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3340
        parent.AddGrowableCol(1)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3341
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3342
    def _init_sizers(self):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3343
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=10)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3344
        self.MainSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=2, vgap=15)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3345
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3346
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3347
        self._init_coll_flexGridSizer1_Growables(self.flexGridSizer1)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3348
        self._init_coll_MainSizer_Items(self.MainSizer)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3349
        self._init_coll_MainSizer_Growables(self.MainSizer)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3350
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3351
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3352
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3353
    def _init_ctrls(self, prnt):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3354
        wx.Dialog.__init__(self, id=ID_POUTRANSITIONDIALOG,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3355
              name='PouTransitionDialog', parent=prnt, pos=wx.Point(376, 223),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3356
              size=wx.Size(350, 200), style=wx.DEFAULT_DIALOG_STYLE,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3357
              title='Create a new transition')
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3358
        self.SetClientSize(wx.Size(350, 160))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3359
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3360
        self.staticText1 = wx.StaticText(id=ID_POUTRANSITIONDIALOGSTATICTEXT1,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3361
              label='Transition Name:', name='staticText1', parent=self,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3362
              pos=wx.Point(0, 0), size=wx.Size(120, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3363
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3364
        self.TransitionName = wx.TextCtrl(id=ID_POUTRANSITIONDIALOGTRANSITIONNAME,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3365
              name='TransitionName', parent=self, pos=wx.Point(0, 0),
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3366
              size=wx.Size(0, 24), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3367
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3368
        self.staticText2 = wx.StaticText(id=ID_POUTRANSITIONDIALOGSTATICTEXT2,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3369
              label='Language:', name='staticText2', parent=self,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3370
              pos=wx.Point(0, 0), size=wx.Size(120, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3371
304
2df3d31d8059 Replacing wx.Choice by wx.ComboBox
lbessard
parents: 301
diff changeset
  3372
        self.Language = wx.ComboBox(id=ID_POUTRANSITIONDIALOGLANGUAGE,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3373
              name='Language', parent=self, pos=wx.Point(0, 0),
346
66fce4b3f7e2 Fix ComboBox height for display in ubuntu
lbessard
parents: 341
diff changeset
  3374
              size=wx.Size(0, 28), style=wx.CB_READONLY)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3375
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3376
        self.ButtonSizer = self.CreateButtonSizer(wx.OK|wx.CANCEL|wx.CENTRE)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3377
        self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.ButtonSizer.GetAffirmativeButton().GetId())
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3378
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3379
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3380
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3381
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3382
        self._init_ctrls(parent)
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3383
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3384
        for option in ["IL","ST","LD","FBD"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3385
            self.Language.Append(option)
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3386
            
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3387
        self.PouNames = []
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3388
        self.PouElementNames = []
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3389
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3390
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3391
        error = []
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3392
        transition_name = self.TransitionName.GetValue()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3393
        if self.TransitionName.GetValue() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3394
            error.append("Transition Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3395
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3396
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3397
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3398
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3399
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3400
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3401
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3402
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3403
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3404
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3405
                    text += ", %s"%item 
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3406
            message = wx.MessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3407
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3408
            message.Destroy()
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3409
        elif not TestIdentifier(transition_name):
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3410
            message = wx.MessageDialog(self, "\"%s\" is not a valid identifier!"%transition_name, "Error", wx.OK|wx.ICON_ERROR)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3411
            message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3412
            message.Destroy()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3413
        elif transition_name.upper() in IEC_KEYWORDS:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3414
            message = wx.MessageDialog(self, "\"%s\" is a keyword. It can't be used!"%transition_name, "Error", wx.OK|wx.ICON_ERROR)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3415
            message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3416
            message.Destroy()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3417
        elif transition_name.upper() in self.PouNames:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3418
            message = wx.MessageDialog(self, "A pou with \"%s\" for name exists!"%transition_name, "Error", wx.OK|wx.ICON_ERROR)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3419
            message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3420
            message.Destroy()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3421
        elif transition_name.upper() in self.PouElementNames:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3422
            message = wx.MessageDialog(self, "\"%s\" element for this pou already exists!"%transition_name, "Error", wx.OK|wx.ICON_ERROR)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3423
            message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3424
            message.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3425
        else:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3426
            self.EndModal(wx.ID_OK)
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3427
    
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3428
    def SetPouNames(self, pou_names):
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3429
        self.PouNames = [pou_name.upper() for pou_name in pou_names]
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3430
    
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3431
    def SetPouElementNames(self, pou_names):
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3432
        self.PouElementNames = [pou_name.upper() for pou_name in pou_names]
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3433
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3434
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3435
        for item, value in values.items():
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3436
            if item == "transitionName":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3437
                self.TransitionName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3438
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3439
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3440
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3441
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3442
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3443
        values["transitionName"] = self.TransitionName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3444
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3445
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3446
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3447
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3448
#                          Create Pou Action Dialog
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3449
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3450
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3451
[ID_POUACTIONDIALOG, ID_POUACTIONDIALOGACTIONNAME, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3452
 ID_POUACTIONDIALOGLANGUAGE, ID_POUACTIONDIALOGSTATICTEXT1, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3453
 ID_POUACTIONDIALOGSTATICTEXT2, 
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3454
] = [wx.NewId() for _init_ctrls in range(5)]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3455
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3456
class PouActionDialog(wx.Dialog):
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3457
    if wx.VERSION < (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3458
        def Bind(self, event, function, id = None):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3459
            if id is not None:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3460
                event(self, id, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3461
            else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3462
                event(self, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3463
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3464
    def _init_coll_flexGridSizer1_Items(self, parent):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3465
        parent.AddSizer(self.MainSizer, 0, border=20, flag=wx.GROW|wx.TOP|wx.LEFT|wx.RIGHT)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3466
        parent.AddSizer(self.ButtonSizer, 0, border=20, flag=wx.ALIGN_RIGHT|wx.BOTTOM|wx.LEFT|wx.RIGHT)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3467
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3468
    def _init_coll_flexGridSizer1_Growables(self, parent):
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3469
        parent.AddGrowableCol(0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3470
        parent.AddGrowableRow(0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3471
    
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3472
    def _init_coll_MainSizer_Items(self, parent):
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 114
diff changeset
  3473
        parent.AddWindow(self.staticText1, 0, border=4, flag=wx.GROW|wx.TOP)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3474
        parent.AddWindow(self.ActionName, 0, border=0, flag=wx.GROW)
118
0c53d6a36013 Add support for defining execution order in FBD networks (related ST code not generated yet)
lbessard
parents: 114
diff changeset
  3475
        parent.AddWindow(self.staticText2, 0, border=4, flag=wx.GROW|wx.TOP)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3476
        parent.AddWindow(self.Language, 0, border=0, flag=wx.GROW)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3477
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3478
    def _init_coll_MainSizer_Growables(self, parent):
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3479
        parent.AddGrowableCol(1)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3480
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3481
    def _init_sizers(self):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3482
        self.flexGridSizer1 = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=10)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3483
        self.MainSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=2, vgap=15)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3484
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3485
        self._init_coll_flexGridSizer1_Items(self.flexGridSizer1)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3486
        self._init_coll_flexGridSizer1_Growables(self.flexGridSizer1)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3487
        self._init_coll_MainSizer_Items(self.MainSizer)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3488
        self._init_coll_MainSizer_Growables(self.MainSizer)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3489
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3490
        self.SetSizer(self.flexGridSizer1)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3491
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3492
    def _init_ctrls(self, prnt):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3493
        wx.Dialog.__init__(self, id=ID_POUACTIONDIALOG,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3494
              name='PouActionDialog', parent=prnt, pos=wx.Point(376, 223),
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3495
              size=wx.Size(320, 200), style=wx.DEFAULT_DIALOG_STYLE|wx.RESIZE_BORDER,
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3496
              title='Create a new action')
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3497
        self.SetClientSize(wx.Size(320, 160))
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3498
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3499
        self.staticText1 = wx.StaticText(id=ID_POUACTIONDIALOGSTATICTEXT1,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3500
              label='Action Name:', name='staticText1', parent=self,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3501
              pos=wx.Point(0, 0), size=wx.Size(100, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3502
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3503
        self.ActionName = wx.TextCtrl(id=ID_POUACTIONDIALOGACTIONNAME,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3504
              name='ActionName', parent=self, pos=wx.Point(0, 0),
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3505
              size=wx.Size(0, 24), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3506
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3507
        self.staticText2 = wx.StaticText(id=ID_POUACTIONDIALOGSTATICTEXT2,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3508
              label='Language:', name='staticText2', parent=self,
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3509
              pos=wx.Point(0, 0), size=wx.Size(100, 17), style=0)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3510
304
2df3d31d8059 Replacing wx.Choice by wx.ComboBox
lbessard
parents: 301
diff changeset
  3511
        self.Language = wx.ComboBox(id=ID_POUACTIONDIALOGLANGUAGE,
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3512
              name='Language', parent=self, pos=wx.Point(0, 0),
346
66fce4b3f7e2 Fix ComboBox height for display in ubuntu
lbessard
parents: 341
diff changeset
  3513
              size=wx.Size(0, 28), style=wx.CB_READONLY)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3514
        
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3515
        self.ButtonSizer = self.CreateButtonSizer(wx.OK|wx.CANCEL|wx.CENTRE)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3516
        self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.ButtonSizer.GetAffirmativeButton().GetId())
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3517
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3518
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3519
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3520
    def __init__(self, parent):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3521
        self._init_ctrls(parent)
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3522
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3523
        for option in ["IL","ST","LD","FBD"]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3524
            self.Language.Append(option)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3525
        
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3526
        self.PouNames = []
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3527
        self.PouElementNames = []
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3528
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3529
    def OnOK(self, event):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3530
        error = []
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3531
        action_name = self.ActionName.GetValue()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3532
        if action_name == "":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3533
            error.append("Action Name")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3534
        if self.Language.GetStringSelection() == "":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3535
            error.append("Language")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3536
        if len(error) > 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3537
            text = ""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3538
            for i, item in enumerate(error):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3539
                if i == 0:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3540
                    text += item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3541
                elif i == len(error) - 1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3542
                    text += " and %s"%item
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3543
                else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3544
                    text += ", %s"%item 
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3545
            message = wx.MessageDialog(self, "Form isn't complete. %s must be filled!"%text, "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3546
            message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3547
            message.Destroy()
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3548
        elif not TestIdentifier(action_name):
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3549
            message = wx.MessageDialog(self, "\"%s\" is not a valid identifier!"%action_name, "Error", wx.OK|wx.ICON_ERROR)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3550
            message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3551
            message.Destroy()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3552
        elif action_name.upper() in IEC_KEYWORDS:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3553
            message = wx.MessageDialog(self, "\"%s\" is a keyword. It can't be used!"%action_name, "Error", wx.OK|wx.ICON_ERROR)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3554
            message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3555
            message.Destroy()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3556
        elif action_name.upper() in self.PouNames:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3557
            message = wx.MessageDialog(self, "A pou with \"%s\" for name exists!"%action_name, "Error", wx.OK|wx.ICON_ERROR)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3558
            message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3559
            message.Destroy()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3560
        elif action_name.upper() in self.PouElementNames:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3561
            message = wx.MessageDialog(self, "\"%s\" element for this pou already exists!"%action_name, "Error", wx.OK|wx.ICON_ERROR)
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3562
            message.ShowModal()
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3563
            message.Destroy()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3564
        else:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3565
            self.EndModal(wx.ID_OK)
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3566
    
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3567
    def SetPouNames(self, pou_names):
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3568
        self.PouNames = [pou_name.upper() for pou_name in pou_names]
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3569
        
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3570
    def SetPouElementNames(self, element_names):
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3571
        self.PouElementNames = [element_name.upper() for element_name in element_names]
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  3572
        
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3573
    def SetValues(self, values):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3574
        for item, value in values.items():
45
42637f721b5b Bugs fixed
lbessard
parents: 42
diff changeset
  3575
            if item == "actionName":
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3576
                self.ActionName.SetValue(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3577
            elif item == "language":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3578
                self.Language.SetStringSelection(value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3579
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3580
    def GetValues(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3581
        values = {}
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3582
        values["actionName"] = self.ActionName.GetValue()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3583
        values["language"] = self.Language.GetStringSelection()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3584
        return values
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3585
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3586
#-------------------------------------------------------------------------------
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3587
#                          Configuration Name Dialog
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3588
#-------------------------------------------------------------------------------
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3589
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3590
class ConfigurationNameDialog(wx.TextEntryDialog):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3591
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3592
    if wx.VERSION < (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3593
        def Bind(self, event, function, id = None):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3594
            if id is not None:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3595
                event(self, id, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3596
            else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3597
                event(self, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3598
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3599
    def __init__(self, parent, message, caption = "Please enter configuration name", defaultValue = "", 
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3600
                       style = wx.OK|wx.CANCEL|wx.CENTRE, pos = wx.DefaultPosition):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3601
        wx.TextEntryDialog.__init__(self, parent, message, caption, defaultValue, style, pos)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3602
        
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3603
        self.PouNames = []
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3604
        self.PouElementNames = []
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3605
        
144
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3606
        if wx.VERSION >= (2, 8, 0):
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3607
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(2).GetSizer().GetItem(1).GetSizer().GetAffirmativeButton().GetId())
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3608
        elif wx.VERSION >= (2, 6, 0):
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3609
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(3).GetSizer().GetAffirmativeButton().GetId())
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3610
        else:
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3611
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(3).GetSizer().GetChildren()[0].GetSizer().GetChildren()[0].GetWindow().GetId())
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3612
    
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3613
    def OnOK(self, event):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3614
        config_name = self.GetSizer().GetItem(1).GetWindow().GetValue()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3615
        if config_name == "":
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3616
            message = wx.MessageDialog(self, "You must type a name!", "Error", wx.OK|wx.ICON_ERROR)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3617
            message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3618
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3619
        elif not TestIdentifier(config_name):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3620
            message = wx.MessageDialog(self, "\"%s\" is not a valid identifier!"%config_name, "Error", wx.OK|wx.ICON_ERROR)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3621
            message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3622
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3623
        elif config_name.upper() in IEC_KEYWORDS:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3624
            message = wx.MessageDialog(self, "\"%s\" is a keyword. It can't be used!"%config_name, "Error", wx.OK|wx.ICON_ERROR)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3625
            message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3626
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3627
        elif config_name.upper() in self.PouNames:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3628
            message = wx.MessageDialog(self, "A pou with \"%s\" as name exists!"%config_name, "Error", wx.OK|wx.ICON_ERROR)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3629
            message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3630
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3631
        elif config_name.upper() in self.PouElementNames:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3632
            message = wx.MessageDialog(self, "A pou has an element with \"%s\" for name. It can generate a conflict. Do you wish to continue?"%config_name, "Warning", wx.YES_NO|wx.ICON_EXCLAMATION)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3633
            result = message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3634
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3635
            if result == wx.ID_YES:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3636
                self.EndModal(wx.ID_OK)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3637
        else:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3638
            self.EndModal(wx.ID_OK)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3639
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3640
    def SetPouNames(self, pou_names):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3641
        self.PouNames = [pou_name.upper() for pou_name in pou_names]
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3642
    
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3643
    def SetPouElementNames(self, pou_names):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3644
        self.PouElementNames = [pou_name.upper() for pou_name in pou_names]
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3645
    
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3646
    def GetValue(self):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3647
        return self.GetSizer().GetItem(1).GetWindow().GetValue()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3648
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3649
#-------------------------------------------------------------------------------
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3650
#                          Resource Name Dialog
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3651
#-------------------------------------------------------------------------------
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3652
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3653
class ResourceNameDialog(wx.TextEntryDialog):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3654
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3655
    if wx.VERSION < (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3656
        def Bind(self, event, function, id = None):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3657
            if id is not None:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3658
                event(self, id, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3659
            else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3660
                event(self, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  3661
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3662
    def __init__(self, parent, message, caption = "Please enter resource name", defaultValue = "", 
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3663
                       style = wx.OK|wx.CANCEL|wx.CENTRE, pos = wx.DefaultPosition):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3664
        wx.TextEntryDialog.__init__(self, parent, message, caption, defaultValue, style, pos)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3665
        
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3666
        self.PouNames = []
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3667
        self.PouElementNames = []
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3668
        
144
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3669
        if wx.VERSION >= (2, 8, 0):
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3670
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(2).GetSizer().GetItem(1).GetSizer().GetAffirmativeButton().GetId())
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3671
        elif wx.VERSION >= (2, 6, 0):
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3672
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(3).GetSizer().GetAffirmativeButton().GetId())
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3673
        else:
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3674
            self.Bind(wx.EVT_BUTTON, self.OnOK, id=self.GetSizer().GetItem(3).GetSizer().GetChildren()[0].GetSizer().GetChildren()[0].GetWindow().GetId())
b67a5de5a24a Adding optimization on Viewer redrawing
lbessard
parents: 138
diff changeset
  3675
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3676
    def OnOK(self, event):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3677
        resource_name = self.GetSizer().GetItem(1).GetWindow().GetValue()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3678
        if resource_name == "":
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3679
            message = wx.MessageDialog(self, "You must type a name!", "Error", wx.OK|wx.ICON_ERROR)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3680
            message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3681
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3682
        elif not TestIdentifier(resource_name):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3683
            message = wx.MessageDialog(self, "\"%s\" is not a valid identifier!"%resource_name, "Error", wx.OK|wx.ICON_ERROR)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3684
            message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3685
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3686
        elif resource_name.upper() in IEC_KEYWORDS:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3687
            message = wx.MessageDialog(self, "\"%s\" is a keyword. It can't be used!"%resource_name, "Error", wx.OK|wx.ICON_ERROR)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3688
            message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3689
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3690
        elif resource_name.upper() in self.PouNames:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3691
            message = wx.MessageDialog(self, "A pou with \"%s\" as name exists!"%resource_name, "Error", wx.OK|wx.ICON_ERROR)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3692
            message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3693
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3694
        elif resource_name.upper() in self.PouElementNames:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3695
            message = wx.MessageDialog(self, "A pou has an element with \"%s\" for name. It can generate a conflict. Do you wish to continue?"%resource_name, "Warning", wx.YES_NO|wx.ICON_EXCLAMATION)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3696
            result = message.ShowModal()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3697
            message.Destroy()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3698
            if result == wx.ID_YES:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3699
                self.EndModal(wx.ID_OK)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3700
        else:
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3701
            self.EndModal(wx.ID_OK)
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3702
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3703
    def SetPouNames(self, pou_names):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3704
        self.PouNames = [pou_name.upper() for pou_name in pou_names]
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3705
    
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3706
    def SetPouElementNames(self, pou_names):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3707
        self.PouElementNames = [pou_name.upper() for pou_name in pou_names]
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3708
    
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3709
    def GetValue(self):
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3710
        return self.GetSizer().GetItem(1).GetWindow().GetValue()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3711
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3712
#-------------------------------------------------------------------------------
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3713
#                            Variables Editor Panel
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3714
#-------------------------------------------------------------------------------
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3715
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3716
class VariablePanelIndexer(wx.Panel):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3717
    
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3718
    def _init_sizers(self):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3719
        self.MainSizer = wx.BoxSizer(wx.HORIZONTAL)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3720
        
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3721
        self.SetSizer(self.MainSizer)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3722
    
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3723
    def _init_ctrls(self, prnt):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3724
        wx.Panel.__init__(self, id=wx.NewId(),
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3725
              name='VariablePanelIndexer', parent=prnt, pos=wx.Point(0, 0),
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3726
              size=wx.Size(0, 300), style=wx.TAB_TRAVERSAL)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3727
        
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3728
        self._init_sizers()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3729
    
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3730
    def __init__(self, parent, window, controler):
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3731
        self._init_ctrls(parent)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3732
        
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3733
        self.ParentWindow = window
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3734
        self.Controler = controler
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3735
        
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3736
        self.VariablePanelList = {}
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3737
        self.CurrentPanel = None
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3738
        
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3739
    def AddVariablePanel(self, tagname, element_type):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3740
        new_panel = VariablePanel(self, self.ParentWindow, self.Controler, element_type)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3741
        new_panel.SetTagName(tagname)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3742
        new_panel.Hide()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3743
        new_panel.RefreshView()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3744
        self.MainSizer.AddWindow(new_panel, 1, border=0, flag=wx.GROW)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3745
        self.VariablePanelList[tagname] = new_panel
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3746
        
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3747
    def RemoveVariablePanel(self, tagname):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3748
        if tagname in self.VariablePanelList:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3749
            panel = self.VariablePanelList.pop(tagname)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3750
            self.MainSizer.Remove(panel)
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  3751
            panel.Destroy()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3752
            if self.CurrentPanel == tagname:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3753
                self.CurrentPanel = None
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3754
    
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3755
    def RemoveAllPanels(self):
294
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  3756
        for tagname in self.VariablePanelList.keys():
4a36f2ec8967 Two bugs fixed:
lbessard
parents: 292
diff changeset
  3757
            self.RemoveVariablePanel(tagname)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3758
    
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3759
    def UpdateVariablePanelTagName(self, old_tagname, new_tagname):
145
4fb225afddf4 Adding scaling
lbessard
parents: 144
diff changeset
  3760
        if old_tagname in self.VariablePanelList:
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3761
            self.VariablePanelList[new_tagname] = self.VariablePanelList.pop(old_tagname)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3762
            if self.CurrentPanel == old_tagname:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3763
                self.CurrentPanel = new_tagname
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3764
                
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3765
    def ChangeVariablePanel(self, tagname):
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3766
        if tagname in self.VariablePanelList:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3767
            if tagname != self.CurrentPanel:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3768
                if self.CurrentPanel is not None:
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3769
                    self.VariablePanelList[self.CurrentPanel].Hide()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3770
                self.CurrentPanel = tagname
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3771
                self.VariablePanelList[self.CurrentPanel].RefreshView()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3772
                self.VariablePanelList[self.CurrentPanel].Show()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3773
                self.MainSizer.Layout()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3774
        else:
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3775
            if self.CurrentPanel is not None:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3776
                self.VariablePanelList[self.CurrentPanel].Hide()
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  3777
            self.CurrentPanel = None
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3778
            self.MainSizer.Layout()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3779
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3780
    def RefreshVariablePanel(self, tagname):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3781
        if tagname in self.VariablePanelList:
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3782
            self.VariablePanelList[self.CurrentPanel].RefreshView()
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3783
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3784
    def AddVariableError(self, infos):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3785
        self.ChangeVariablePanel(infos[0])
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3786
        if self.CurrentPanel is not None:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3787
            self.VariablePanelList[self.CurrentPanel].AddVariableError(infos[2:])
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3788
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3789
    def ClearErrors(self):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3790
        for panel in self.VariablePanelList.values():
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3791
            panel.ClearErrors()
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3792
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3793
#-------------------------------------------------------------------------------
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  3794
#                            Variables Editor Panel
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3795
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3796
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3797
class VariableTable(wx.grid.PyGridTableBase):
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3798
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3799
    """
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3800
    A custom wx.grid.Grid Table using user supplied data
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3801
    """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3802
    def __init__(self, parent, data, colnames):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3803
        # The base class must be initialized *first*
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3804
        wx.grid.PyGridTableBase.__init__(self)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3805
        self.data = data
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3806
        self.old_value = None
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3807
        self.colnames = colnames
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3808
        self.Errors = {}
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3809
        self.Parent = parent
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3810
        # XXX
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3811
        # we need to store the row length and collength to
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3812
        # see if the table has changed size
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3813
        self._rows = self.GetNumberRows()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3814
        self._cols = self.GetNumberCols()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3815
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3816
    def GetNumberCols(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3817
        return len(self.colnames)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3818
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3819
    def GetNumberRows(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3820
        return len(self.data)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3821
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3822
    def GetColLabelValue(self, col):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3823
        if col < len(self.colnames):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3824
            return self.colnames[col]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3825
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3826
    def GetRowLabelValues(self, row):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3827
        return row
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3828
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3829
    def GetValue(self, row, col):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3830
        if row < self.GetNumberRows():
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  3831
            if col == 0:
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  3832
                return self.data[row]["Number"]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3833
            name = str(self.data[row].get(self.GetColLabelValue(col), ""))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3834
            return name
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3835
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3836
    def SetValue(self, row, col, value):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3837
        if col < len(self.colnames):
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3838
            colname = self.GetColLabelValue(col)
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3839
            if colname == "Name":
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3840
                self.old_value = self.data[row][colname]
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3841
            self.data[row][colname] = value
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3842
    
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3843
    def GetValueByName(self, row, colname):
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3844
        if row < self.GetNumberRows():
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3845
            return self.data[row].get(colname)
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3846
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3847
    def SetValueByName(self, row, colname, value):
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3848
        if row < self.GetNumberRows():
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3849
            self.data[row][colname] = value
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3850
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3851
    def GetOldValue(self):
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3852
        return self.old_value
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  3853
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3854
    def ResetView(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3855
        """
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3856
        (wx.grid.Grid) -> Reset the grid view.   Call this to
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3857
        update the grid if rows and columns have been added or deleted
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3858
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3859
        grid.BeginBatch()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3860
        for current, new, delmsg, addmsg in [
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3861
            (self._rows, self.GetNumberRows(), wx.grid.GRIDTABLE_NOTIFY_ROWS_DELETED, wx.grid.GRIDTABLE_NOTIFY_ROWS_APPENDED),
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3862
            (self._cols, self.GetNumberCols(), wx.grid.GRIDTABLE_NOTIFY_COLS_DELETED, wx.grid.GRIDTABLE_NOTIFY_COLS_APPENDED),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3863
        ]:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3864
            if new < current:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3865
                msg = wx.grid.GridTableMessage(self,delmsg,new,current-new)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3866
                grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3867
            elif new > current:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3868
                msg = wx.grid.GridTableMessage(self,addmsg,new-current)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3869
                grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3870
                self.UpdateValues(grid)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3871
        grid.EndBatch()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3872
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3873
        self._rows = self.GetNumberRows()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3874
        self._cols = self.GetNumberCols()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3875
        # update the column rendering scheme
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3876
        self._updateColAttrs(grid)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3877
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3878
        # update the scrollbars and the displayed part of the grid
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3879
        grid.AdjustScrollbars()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3880
        grid.ForceRefresh()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3881
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3882
    def UpdateValues(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3883
        """Update all displayed values"""
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3884
        # This sends an event to the grid table to update all of the values
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3885
        msg = wx.grid.GridTableMessage(self, wx.grid.GRIDTABLE_REQUEST_VIEW_GET_VALUES)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3886
        grid.ProcessTableMessage(msg)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3887
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3888
    def _updateColAttrs(self, grid):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3889
        """
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3890
        wx.grid.Grid -> update the column attributes to add the
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3891
        appropriate renderer given the column name.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3892
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3893
        Otherwise default to the default renderer.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3894
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3895
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3896
        typelist = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3897
        accesslist = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3898
        for row in range(self.GetNumberRows()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3899
            for col in range(self.GetNumberCols()):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3900
                editor = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3901
                renderer = None
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3902
                colname = self.GetColLabelValue(col)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3903
                if col != 0 and self.GetValueByName(row, "Edit"):
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3904
                    grid.SetReadOnly(row, col, False)
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3905
                    if colname == "Name":
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3906
                        if self.Parent.PouIsUsed and self.GetValueByName(row, "Class") in ["Input", "Output", "InOut"]:
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3907
                            grid.SetReadOnly(row, col, True)
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3908
                        else:
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3909
                            editor = wx.grid.GridCellTextEditor()
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3910
                            renderer = wx.grid.GridCellStringRenderer()
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3911
                    elif colname == "Initial Value":
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3912
                        editor = wx.grid.GridCellTextEditor()
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3913
                        renderer = wx.grid.GridCellStringRenderer()
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3914
                    elif colname == "Location":
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3915
                        if self.GetValueByName(row, "Class") in ["Local", "Global"]:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3916
                            editor = wx.grid.GridCellTextEditor()
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3917
                            renderer = wx.grid.GridCellStringRenderer()
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3918
                        else:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3919
                            grid.SetReadOnly(row, col, True)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3920
                    elif colname == "Class":
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3921
                        if len(self.Parent.ClassList) == 1 or self.Parent.PouIsUsed and self.GetValueByName(row, "Class") in ["Input", "Output", "InOut"]:
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3922
                            grid.SetReadOnly(row, col, True)
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3923
                        else:
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3924
                            editor = wx.grid.GridCellChoiceEditor()
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3925
                            excluded = []
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3926
                            if self.Parent.PouIsUsed:
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  3927
                                excluded.extend(["Input","Output","InOut"])
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  3928
                            if self.Parent.IsFunctionBlockType(self.data[row]["Type"]):
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  3929
                                excluded.extend(["Local","Temp"])
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3930
                            editor.SetParameters(",".join([choice for choice in self.Parent.ClassList if choice not in excluded]))
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3931
                    elif colname in ["Retain", "Constant"]:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3932
                        editor = wx.grid.GridCellChoiceEditor()
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3933
                        editor.SetParameters(self.Parent.OptionList)
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3934
                    elif colname == "Type":
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3935
                        editor = wx.grid.GridCellTextEditor()
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3936
                else:
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3937
                    grid.SetReadOnly(row, col, True)
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  3938
                
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3939
                grid.SetCellEditor(row, col, editor)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3940
                grid.SetCellRenderer(row, col, renderer)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3941
                
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3942
                if row in self.Errors and self.Errors[row][0] == colname.lower():
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3943
                    grid.SetCellBackgroundColour(row, col, wx.Colour(255, 255, 0))
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3944
                    grid.SetCellTextColour(row, col, wx.RED)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3945
                    grid.MakeCellVisible(row, col)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3946
                else:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3947
                    grid.SetCellTextColour(row, col, wx.BLACK)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3948
                    grid.SetCellBackgroundColour(row, col, wx.WHITE)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3949
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3950
    def SetData(self, data):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3951
        self.data = data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3952
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3953
    def GetData(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3954
        return self.data
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3955
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3956
    def GetCurrentIndex(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3957
        return self.CurrentIndex
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3958
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3959
    def SetCurrentIndex(self, index):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3960
        self.CurrentIndex = index
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3961
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3962
    def AppendRow(self, row_content):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3963
        self.data.append(row_content)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3964
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3965
    def RemoveRow(self, row_index):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3966
        self.data.pop(row_index)
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  3967
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  3968
    def GetRow(self, row_index):
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  3969
        return self.data[row_index]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3970
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3971
    def Empty(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3972
        self.data = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3973
        self.editors = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  3974
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3975
    def AddError(self, infos):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3976
        self.Errors[infos[0]] = infos[1:]
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3977
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3978
    def ClearErrors(self):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3979
        self.Errors = {}
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  3980
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  3981
class VariableDropTarget(wx.TextDropTarget):
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  3982
    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  3983
    def __init__(self, parent):
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  3984
        wx.TextDropTarget.__init__(self)
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  3985
        self.ParentWindow = parent
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  3986
    
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  3987
    def OnDropText(self, x, y, data):
182
aad505fc468f Bug on variable location Drag'n Drop fixed
lbessard
parents: 181
diff changeset
  3988
        x, y = self.ParentWindow.VariablesGrid.CalcUnscrolledPosition(x, y)
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  3989
        col = self.ParentWindow.VariablesGrid.XToCol(x)
97
28337cd092fd Bugs on Variable and Viewer DropTarget fixed
lbessard
parents: 95
diff changeset
  3990
        row = self.ParentWindow.VariablesGrid.YToRow(y - self.ParentWindow.VariablesGrid.GetColLabelSize())
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  3991
        if col != wx.NOT_FOUND and row != wx.NOT_FOUND:
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  3992
            if self.ParentWindow.Table.GetColLabelValue(col) != "Location":
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  3993
                return
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3994
            message = None
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3995
            if not self.ParentWindow.Table.GetValueByName(row, "Edit"):
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3996
                message = "Can't affect a location to a function block instance"
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3997
            elif self.ParentWindow.Table.GetValueByName(row, "Class") not in ["Local", "Global"]:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3998
                message = "Can affect a location only to local or global variables"
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  3999
            else:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4000
                try:
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4001
                    values = eval(data)    
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4002
                except:
218
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
  4003
                    message = "Invalid value \"%s\" for location"%data
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4004
                    values = None
218
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
  4005
                if not isinstance(values, TupleType):
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
  4006
                    message = "Invalid value \"%s\" for location"%data
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
  4007
                    values = None
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
  4008
                if values is not None and values[1] == "location":
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4009
                    location = values[0]
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4010
                    variable_type = self.ParentWindow.Table.GetValueByName(row, "Type")
266
4f102c996fa3 Bug with location drag&drop fixed
lbessard
parents: 262
diff changeset
  4011
                    base_type = self.ParentWindow.Controler.GetBaseType(variable_type)
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4012
                    message = None
210
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4013
                    if location.startswith("%"):
219
ca1f1d3734f9 Bug on located variable defined with devived type when dropping location fixed
lbessard
parents: 218
diff changeset
  4014
                        if base_type != values[2]:
210
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4015
                            message = "Incompatible data types between \"%s\" and \"%s\""%(values[2], variable_type)
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4016
                        else:
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4017
                            self.ParentWindow.Table.SetValue(row, col, location)
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4018
                            self.ParentWindow.Table.ResetView(self.ParentWindow.VariablesGrid)
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4019
                            self.ParentWindow.SaveValues()
210
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4020
                    else:
219
ca1f1d3734f9 Bug on located variable defined with devived type when dropping location fixed
lbessard
parents: 218
diff changeset
  4021
                        if location[0].isdigit() and base_type != "BOOL":
210
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4022
                            message = "Incompatible size of data between \"%s\" and \"BOOL\""%location
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4023
                        elif location[0] not in LOCATIONDATATYPES:
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4024
                            message = "Unrecognized data size \"%s\""%location[0]
219
ca1f1d3734f9 Bug on located variable defined with devived type when dropping location fixed
lbessard
parents: 218
diff changeset
  4025
                        elif base_type not in LOCATIONDATATYPES[location[0]]:
210
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4026
                            message = "Incompatible size of data between \"%s\" and \"%s\""%(location, variable_type)
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4027
                        else:
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4028
                            dialog = wx.SingleChoiceDialog(self.ParentWindow, "Select a variable class:", "Variable class", ["Input", "Output", "Memory"], wx.OK|wx.CANCEL)
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4029
                            if dialog.ShowModal() == wx.ID_OK:
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4030
                                selected = dialog.GetSelection()
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4031
                                if selected == 0:
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4032
                                    location = "%I" + location
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4033
                                elif selected == 1:
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4034
                                    location = "%Q" + location
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4035
                                else:
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4036
                                    location = "%M" + location
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4037
                                self.ParentWindow.Table.SetValue(row, col, location)
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4038
                                self.ParentWindow.Table.ResetView(self.ParentWindow.VariablesGrid)
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4039
                                self.ParentWindow.SaveValues()
17ce08b81775 Adding support for Beremiz c_ext plugin
lbessard
parents: 203
diff changeset
  4040
                            dialog.Destroy()
322
bf5a968bb7e0 Bug with drop located variable in empty grid fixed
lbessard
parents: 317
diff changeset
  4041
            if message is not None:
bf5a968bb7e0 Bug with drop located variable in empty grid fixed
lbessard
parents: 317
diff changeset
  4042
                wx.CallAfter(self.ShowMessage, message)
218
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
  4043
            
1b8e9bb83f25 Bug with unformated drop text fixed
lbessard
parents: 217
diff changeset
  4044
    def ShowMessage(self, message):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4045
        message = wx.MessageDialog(self.ParentWindow, message, "Error", wx.OK|wx.ICON_ERROR)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4046
        message.ShowModal()
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4047
        message.Destroy()
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  4048
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4049
[ID_VARIABLEEDITORPANEL, ID_VARIABLEEDITORPANELVARIABLESGRID, 
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4050
 ID_VARIABLEEDITORCONTROLPANEL, ID_VARIABLEEDITORPANELRETURNTYPE, 
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4051
 ID_VARIABLEEDITORPANELCLASSFILTER, ID_VARIABLEEDITORPANELADDBUTTON, 
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4052
 ID_VARIABLEEDITORPANELDELETEBUTTON, ID_VARIABLEEDITORPANELUPBUTTON, 
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4053
 ID_VARIABLEEDITORPANELDOWNBUTTON, ID_VARIABLEEDITORPANELSTATICTEXT1, 
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4054
 ID_VARIABLEEDITORPANELSTATICTEXT2, ID_VARIABLEEDITORPANELSTATICTEXT3,
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4055
] = [wx.NewId() for _init_ctrls in range(12)]
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4056
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4057
class VariablePanel(wx.Panel):
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4058
    
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4059
    if wx.VERSION < (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4060
        def Bind(self, event, function, id = None):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4061
            if id is not None:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4062
                event(self, id, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4063
            else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4064
                event(self, function)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4065
    
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4066
    def _init_coll_MainSizer_Items(self, parent):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4067
        parent.AddWindow(self.VariablesGrid, 0, border=0, flag=wx.GROW)
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4068
        parent.AddWindow(self.ControlPanel, 0, border=5, flag=wx.GROW|wx.ALL)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4069
    
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4070
    def _init_coll_MainSizer_Growables(self, parent):
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4071
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4072
        parent.AddGrowableRow(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4073
    
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4074
    def _init_coll_ControlPanelSizer_Items(self, parent):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4075
        parent.AddSizer(self.ChoicePanelSizer, 0, border=0, flag=wx.GROW)
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4076
        parent.AddSizer(self.ButtonPanelSizer, 0, border=0, flag=wx.ALIGN_CENTER)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4077
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4078
    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
  4079
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4080
        parent.AddGrowableRow(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4081
        parent.AddGrowableRow(1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4082
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4083
    def _init_coll_ChoicePanelSizer_Items(self, parent):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4084
        parent.AddWindow(self.staticText1, 0, border=0, flag=wx.ALIGN_BOTTOM)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  4085
        parent.AddWindow(self.ReturnType, 0, border=0, flag=0)
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4086
        parent.AddWindow(self.staticText2, 0, border=0, flag=wx.ALIGN_BOTTOM)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4087
        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
  4088
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4089
    def _init_coll_ButtonPanelSizer_Items(self, parent):
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  4090
        parent.AddWindow(self.UpButton, 0, border=0, flag=0)
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  4091
        parent.AddWindow(self.AddButton, 0, border=0, flag=0)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  4092
        parent.AddWindow(self.DownButton, 0, border=0, flag=0)
51
47c72c77590a Bug on Copy, Cut, Paste fixed
lbessard
parents: 49
diff changeset
  4093
        parent.AddWindow(self.DeleteButton, 0, border=0, flag=0)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  4094
        
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4095
    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
  4096
        parent.AddGrowableCol(0)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4097
        parent.AddGrowableCol(1)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4098
        parent.AddGrowableCol(2)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4099
        parent.AddGrowableCol(3)
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4100
        parent.AddGrowableRow(0)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4101
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4102
    def _init_sizers(self):
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4103
        self.MainSizer = wx.FlexGridSizer(cols=2, hgap=10, rows=1, vgap=0)
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  4104
        self.ControlPanelSizer = wx.FlexGridSizer(cols=1, hgap=0, rows=2, vgap=5)
52
35b54852c533 *** empty log message ***
etisserant
parents: 51
diff changeset
  4105
        self.ChoicePanelSizer = wx.GridSizer(cols=1, hgap=5, rows=4, vgap=5)
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  4106
        self.ButtonPanelSizer = wx.FlexGridSizer(cols=2, hgap=5, rows=2, vgap=5)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4107
        
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4108
        self._init_coll_MainSizer_Items(self.MainSizer)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4109
        self._init_coll_MainSizer_Growables(self.MainSizer)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4110
        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
  4111
        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
  4112
        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
  4113
        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
  4114
        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
  4115
        
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4116
        self.SetSizer(self.MainSizer)
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4117
        self.ControlPanel.SetSizer(self.ControlPanelSizer)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4118
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4119
    def _init_ctrls(self, prnt):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4120
        wx.Panel.__init__(self, id=ID_VARIABLEEDITORPANEL,
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4121
              name='VariableEditorPanel', parent=prnt, pos=wx.Point(0, 0),
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4122
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4123
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4124
        self.VariablesGrid = wx.grid.Grid(id=ID_VARIABLEEDITORPANELVARIABLESGRID,
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4125
              name='VariablesGrid', parent=self, pos=wx.Point(0, 0), 
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4126
              size=wx.Size(0, 0), style=wx.VSCROLL)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4127
        self.VariablesGrid.SetFont(wx.Font(12, 77, wx.NORMAL, wx.NORMAL, False,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4128
              'Sans'))
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4129
        self.VariablesGrid.SetLabelFont(wx.Font(10, 77, wx.NORMAL, wx.NORMAL,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4130
              False, 'Sans'))
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4131
        self.VariablesGrid.SetSelectionBackground(wx.WHITE)
357
e5501b3337db Little bugs fixed
greg
parents: 352
diff changeset
  4132
        self.VariablesGrid.SetSelectionForeground(wx.BLACK)
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4133
        if wx.VERSION >= (2, 6, 0):
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4134
            self.VariablesGrid.Bind(wx.grid.EVT_GRID_CELL_CHANGE, self.OnVariablesGridCellChange)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4135
            self.VariablesGrid.Bind(wx.grid.EVT_GRID_SELECT_CELL, self.OnVariablesGridSelectCell)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4136
            self.VariablesGrid.Bind(wx.grid.EVT_GRID_CELL_LEFT_CLICK, self.OnVariablesGridCellLeftClick)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4137
            self.VariablesGrid.Bind(wx.grid.EVT_GRID_EDITOR_SHOWN, self.OnVariablesGridEditorShown)
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4138
            #self.VariablesGrid.Bind(wx.EVT_KEY_DOWN, self.OnChar)
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4139
        else:
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4140
            wx.grid.EVT_GRID_CELL_CHANGE(self.VariablesGrid, self.OnVariablesGridCellChange)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4141
            wx.grid.EVT_GRID_SELECT_CELL(self.VariablesGrid, self.OnVariablesGridSelectCell)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4142
            wx.grid.EVT_GRID_CELL_LEFT_CLICK(self.VariablesGrid, self.OnVariablesGridCellLeftClick)
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4143
            wx.grid.EVT_GRID_EDITOR_SHOWN(self.VariablesGrid, self.OnVariablesGridEditorShown)
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4144
            #wx.EVT_KEY_DOWN(self.VariablesGrid, self.OnChar)
53
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  4145
        self.VariablesGrid.SetDropTarget(VariableDropTarget(self))
4988262d03e3 *** empty log message ***
lbessard
parents: 52
diff changeset
  4146
        
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4147
        self.ControlPanel = wx.ScrolledWindow(id=ID_VARIABLEEDITORCONTROLPANEL,
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4148
              name='ControlPanel', parent=self, pos=wx.Point(0, 0),
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4149
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4150
        self.ControlPanel.SetScrollRate(0, 10)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4151
        
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4152
        self.staticText1 = wx.StaticText(id=ID_VARIABLEEDITORPANELSTATICTEXT1,
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4153
              label='Return Type:', name='staticText1', parent=self.ControlPanel,
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4154
              pos=wx.Point(0, 0), size=wx.Size(95, 17), style=0)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4155
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4156
        self.ReturnType = wx.ComboBox(id=ID_VARIABLEEDITORPANELRETURNTYPE,
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4157
              name='ReturnType', parent=self.ControlPanel, pos=wx.Point(0, 0),
346
66fce4b3f7e2 Fix ComboBox height for display in ubuntu
lbessard
parents: 341
diff changeset
  4158
              size=wx.Size(145, 28), style=wx.CB_READONLY)
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4159
        self.Bind(wx.EVT_COMBOBOX, self.OnReturnTypeChanged, id=ID_VARIABLEEDITORPANELRETURNTYPE)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4160
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4161
        self.staticText2 = wx.StaticText(id=ID_VARIABLEEDITORPANELSTATICTEXT2,
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4162
              label='Class Filter:', name='staticText2', parent=self.ControlPanel,
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4163
              pos=wx.Point(0, 0), size=wx.Size(95, 17), style=0)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4164
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4165
        self.ClassFilter = wx.ComboBox(id=ID_VARIABLEEDITORPANELCLASSFILTER,
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4166
              name='ClassFilter', parent=self.ControlPanel, pos=wx.Point(0, 0),
346
66fce4b3f7e2 Fix ComboBox height for display in ubuntu
lbessard
parents: 341
diff changeset
  4167
              size=wx.Size(145, 28), style=wx.CB_READONLY)
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4168
        self.Bind(wx.EVT_COMBOBOX, self.OnClassFilter, id=ID_VARIABLEEDITORPANELCLASSFILTER)
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4169
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4170
        self.AddButton = wx.Button(id=ID_VARIABLEEDITORPANELADDBUTTON, label='Add',
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4171
              name='AddButton', parent=self.ControlPanel, pos=wx.Point(0, 0),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4172
              size=wx.Size(72, 32), style=0)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4173
        self.Bind(wx.EVT_BUTTON, self.OnAddButton, id=ID_VARIABLEEDITORPANELADDBUTTON)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4174
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4175
        self.DeleteButton = wx.Button(id=ID_VARIABLEEDITORPANELDELETEBUTTON, label='Delete',
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4176
              name='DeleteButton', parent=self.ControlPanel, pos=wx.Point(0, 0),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4177
              size=wx.Size(72, 32), style=0)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4178
        self.Bind(wx.EVT_BUTTON, self.OnDeleteButton, id=ID_VARIABLEEDITORPANELDELETEBUTTON)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4179
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4180
        self.UpButton = wx.Button(id=ID_VARIABLEEDITORPANELUPBUTTON, label='^',
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4181
              name='UpButton', parent=self.ControlPanel, pos=wx.Point(0, 0),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4182
              size=wx.Size(32, 32), style=0)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4183
        self.Bind(wx.EVT_BUTTON, self.OnUpButton, id=ID_VARIABLEEDITORPANELUPBUTTON)
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4184
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4185
        self.DownButton = wx.Button(id=ID_VARIABLEEDITORPANELDOWNBUTTON, label='v',
335
c2c6db53a04f Fix bug with maximize on TabCtrl DoubleClick.
lbessard
parents: 332
diff changeset
  4186
              name='DownButton', parent=self.ControlPanel, pos=wx.Point(0, 0),
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4187
              size=wx.Size(32, 32), style=0)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4188
        self.Bind(wx.EVT_BUTTON, self.OnDownButton, id=ID_VARIABLEEDITORPANELDOWNBUTTON)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4189
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4190
        self._init_sizers()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4191
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4192
    def __init__(self, parent, window, controler, element_type):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4193
        self._init_ctrls(parent)
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  4194
        self.ParentWindow = window
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4195
        self.Controler = controler
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4196
        self.ElementType = element_type
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4197
        
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4198
        self.Filter = "All"
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4199
        self.FilterChoices = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4200
        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
  4201
            "   Input" : "Input", "   Output" : "Output", "   InOut" : "InOut", 
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4202
            "   External" : "External", "Variables" : "Variables", "   Local" : "Local",
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4203
            "   Temp" : "Temp", "Global" : "Global", "Access" : "Access"}
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4204
        
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4205
        if element_type in ["config", "resource"]:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4206
            self.DefaultTypes = {"All" : "Global"}
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4207
            self.DefaultValue = {"Name" : "", "Class" : "", "Type" : "INT", "Location" : "", "Initial Value" : "", "Retain" : "No", "Constant" : "No", "Edit" : True}
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4208
        else:
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4209
            self.DefaultTypes = {"All" : "Local", "Interface" : "Input", "Variables" : "Local"}
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4210
            self.DefaultValue = {"Name" : "", "Class" : "", "Type" : "INT", "Location" : "", "Initial Value" : "", "Retain" : "No", "Constant" : "No", "Edit" : True}
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4211
        if element_type in ["config", "resource"] or element_type in ["program", "transition", "action"]:
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  4212
            self.Table = VariableTable(self, [], ["#", "Name", "Class", "Type", "Location", "Initial Value", "Retain", "Constant"])
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4213
            if element_type not in ["config", "resource"]:
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4214
                self.FilterChoices = ["All","Interface","   Input","   Output","   InOut","   External","Variables","   Local","   Temp","Global","Access"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4215
            else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4216
                self.FilterChoices = ["All","Global","Access"]
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  4217
            self.ColSizes = [40, 80, 70, 80, 80, 80, 60, 70]
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  4218
            self.ColAlignements = [wx.ALIGN_CENTER, wx.ALIGN_LEFT, wx.ALIGN_LEFT, wx.ALIGN_LEFT, wx.ALIGN_LEFT, wx.ALIGN_LEFT, wx.ALIGN_CENTER, wx.ALIGN_CENTER]
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  4219
        else:
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  4220
            self.Table = VariableTable(self, [], ["#", "Name", "Class", "Type", "Initial Value", "Retain", "Constant"])
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4221
            self.FilterChoices = ["All","Interface","   Input","   Output","   InOut","   External","Variables","   Local","   Temp"]
70
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  4222
            self.ColSizes = [40, 120, 70, 80, 120, 60, 70]
0e48629c1e6d Adding support for avoiding name conflicts
lbessard
parents: 68
diff changeset
  4223
            self.ColAlignements = [wx.ALIGN_CENTER, wx.ALIGN_LEFT, wx.ALIGN_LEFT, wx.ALIGN_LEFT, wx.ALIGN_LEFT, wx.ALIGN_CENTER, wx.ALIGN_CENTER]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4224
        for choice in self.FilterChoices:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4225
            self.ClassFilter.Append(choice)
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4226
        reverse_transfer = {}
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4227
        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
  4228
            reverse_transfer[choice] = filter
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4229
        self.ClassFilter.SetStringSelection(reverse_transfer[self.Filter])
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4230
        self.RefreshTypeList()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4231
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4232
        self.OptionList = "Yes,No"
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4233
        
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4234
        if element_type == "function":
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  4235
            for base_type in self.Controler.GetBaseTypes():
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  4236
                self.ReturnType.Append(base_type)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4237
            self.ReturnType.Enable(True)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4238
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4239
            self.ReturnType.Enable(False)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4240
            self.staticText1.Hide()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4241
            self.ReturnType.Hide()
331
9106d66bd204 Bug with Scaling, MiddleButton, Wire modifications fixed.
lbessard
parents: 324
diff changeset
  4242
            
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4243
        self.VariablesGrid.SetTable(self.Table)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4244
        self.VariablesGrid.SetRowLabelSize(0)
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4245
        for col in range(self.Table.GetNumberCols()):
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4246
            attr = wx.grid.GridCellAttr()
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4247
            attr.SetAlignment(self.ColAlignements[col], wx.ALIGN_CENTRE)
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4248
            self.VariablesGrid.SetColAttr(col, attr)
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4249
            self.VariablesGrid.SetColSize(col, self.ColSizes[col])
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4250
    
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4251
    def SetTagName(self, tagname):
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4252
        self.TagName = tagname
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4253
    
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4254
    def IsFunctionBlockType(self, name):
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4255
        bodytype = self.Controler.GetEditedElementBodyType(self.TagName, self.ParentWindow.Debug)
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4256
        pouname, poutype = self.Controler.GetEditedElementType(self.TagName, self.ParentWindow.Debug)
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4257
        if poutype != "function" and bodytype in ["ST", "IL"]:
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4258
            return False
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4259
        else:
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4260
            return name in self.Controler.GetFunctionBlockTypes(self.TagName, self.ParentWindow.Debug)
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4261
    
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4262
    def RefreshView(self):
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4263
        self.PouNames = self.Controler.GetProjectPouNames(self.ParentWindow.Debug)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4264
        
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4265
        words = self.TagName.split("::")
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4266
        if self.ElementType == "config":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4267
            self.PouIsUsed = False
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4268
            returnType = None
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4269
            self.Values = self.Controler.GetConfigurationGlobalVars(words[1], self.ParentWindow.Debug)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4270
        elif self.ElementType == "resource":
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4271
            self.PouIsUsed = False
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4272
            returnType = None
249
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4273
            self.Values = self.Controler.GetConfigurationResourceGlobalVars(words[1], words[2], self.ParentWindow.Debug)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4274
        else:
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4275
            self.PouIsUsed = self.Controler.PouIsUsed(words[1], self.ParentWindow.Debug)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4276
            returnType = self.Controler.GetEditedElementInterfaceReturnType(self.TagName, self.ParentWindow.Debug)
d8425712acef Adding support for Debugging in PLCOpenEditor
lbessard
parents: 245
diff changeset
  4277
            self.Values = self.Controler.GetEditedElementInterfaceVars(self.TagName, self.ParentWindow.Debug)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4278
        
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4279
        if returnType and self.ReturnType.IsEnabled():
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4280
            self.ReturnType.SetStringSelection(returnType)
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4281
        
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4282
        self.RefreshValues()
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4283
        self.RefreshButtons()
67
3a1b0afdaf84 Adding support for automatically generate function blocks in interface when a block is added
lbessard
parents: 65
diff changeset
  4284
    
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4285
    def OnReturnTypeChanged(self, event):
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4286
        words = self.TagName.split("::")
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4287
        self.Controler.SetPouInterfaceReturnType(words[1], self.ReturnType.GetStringSelection())
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4288
        self.Controler.BufferProject()
258
bded3a67ea4b Bug on refreshing editor when return type changed fixed
lbessard
parents: 253
diff changeset
  4289
        self.ParentWindow.RefreshEditor(variablepanel = False)
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  4290
        self.ParentWindow.RefreshTitle()
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  4291
        self.ParentWindow.RefreshEditMenu()
258
bded3a67ea4b Bug on refreshing editor when return type changed fixed
lbessard
parents: 253
diff changeset
  4292
        self.ParentWindow.RefreshInstancesTree()
268
5508af39d1f7 Bug on library Tree informations when changing block interface fixed
lbessard
parents: 266
diff changeset
  4293
        self.ParentWindow.RefreshLibraryTree()
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4294
        event.Skip()
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4295
    
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4296
    def OnClassFilter(self, event):
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4297
        self.Filter = self.FilterChoiceTransfer[self.ClassFilter.GetStringSelection()]
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4298
        self.RefreshTypeList()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4299
        self.RefreshValues()
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4300
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4301
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4302
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4303
    def RefreshTypeList(self):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4304
        if self.Filter == "All":
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4305
            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
  4306
        elif self.Filter == "Interface":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4307
            self.ClassList = ["Input","Output","InOut","External"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4308
        elif self.Filter == "Variables":
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4309
            self.ClassList = ["Local","Temp"]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4310
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4311
            self.ClassList = [self.Filter]
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4312
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4313
    def RefreshButtons(self):
102
85875dcb7754 Adding edit user's POU by double click on block instance
lbessard
parents: 98
diff changeset
  4314
        if getattr(self, "Table", None):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  4315
            table_length = len(self.Table.data)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  4316
            row_class = None
311
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  4317
            row_edit = True
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  4318
            if table_length > 0:
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  4319
                row = self.VariablesGrid.GetGridCursorRow()
311
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  4320
                row_edit = self.Table.GetValueByName(row, "Edit")
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  4321
                if self.PouIsUsed:
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  4322
                    row_class = self.Table.GetValueByName(row, "Class")
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  4323
            self.AddButton.Enable(not self.PouIsUsed or self.Filter not in ["Interface", "Input", "Output", "InOut"])
311
3e22e53878b8 Adding Rename item in TypesTree contextual menu
lbessard
parents: 309
diff changeset
  4324
            self.DeleteButton.Enable(table_length > 0 and row_edit and row_class not in ["Input", "Output", "InOut"])
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  4325
            self.UpButton.Enable(table_length > 0 and self.Filter == "All" and row_class not in ["Input", "Output", "InOut"])
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 55
diff changeset
  4326
            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
  4327
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4328
    def OnAddButton(self, event):
11
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  4329
        new_row = self.DefaultValue.copy()
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  4330
        if self.Filter in self.DefaultTypes:
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  4331
            new_row["Class"] = self.DefaultTypes[self.Filter]
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  4332
        else:
e55d8385aef1 Bug on variables editing corrected
lbessard
parents: 10
diff changeset
  4333
            new_row["Class"] = self.Filter
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4334
        if self.Filter == "All" and len(self.Values) > 0:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4335
            row_index = self.VariablesGrid.GetGridCursorRow() + 1
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4336
            self.Values.insert(row_index, new_row)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4337
        else:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4338
            row_index = -1
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4339
            self.Values.append(new_row)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4340
        self.SaveValues()
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4341
        self.RefreshValues(row_index)
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4342
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4343
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4344
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4345
    def OnDeleteButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4346
        row = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4347
        self.Values.remove(row)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4348
        self.SaveValues()
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4349
        self.RefreshValues()
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4350
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4351
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4352
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4353
    def OnUpButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4354
        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
  4355
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4356
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4357
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4358
    def OnDownButton(self, event):
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4359
        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
  4360
        self.RefreshButtons()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4361
        event.Skip()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4362
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4363
    def OnVariablesGridCellChange(self, event):
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4364
        row, col = event.GetRow(), event.GetCol()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4365
        colname = self.Table.GetColLabelValue(col)
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4366
        value = self.Table.GetValue(row, col)
359
363af30a8b83 enable declared variables without name
greg
parents: 357
diff changeset
  4367
        if colname == "Name" and value != "":
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4368
            if not TestIdentifier(value):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4369
                message = wx.MessageDialog(self, "\"%s\" is not a valid identifier!"%value, "Error", wx.OK|wx.ICON_ERROR)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4370
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4371
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4372
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4373
            elif value.upper() in IEC_KEYWORDS:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4374
                message = wx.MessageDialog(self, "\"%s\" is a keyword. It can't be used!"%value, "Error", wx.OK|wx.ICON_ERROR)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4375
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4376
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4377
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4378
            elif value.upper() in self.PouNames:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4379
                message = wx.MessageDialog(self, "A pou with \"%s\" as name exists!"%value, "Error", wx.OK|wx.ICON_ERROR)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4380
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4381
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4382
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4383
            elif value.upper() in [var["Name"].upper() for var in self.Values if var != self.Table.data[row]]:
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4384
                message = wx.MessageDialog(self, "A variable with \"%s\" as name exists in this pou!"%value, "Error", wx.OK|wx.ICON_ERROR)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4385
                message.ShowModal()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4386
                message.Destroy()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4387
                event.Veto()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4388
            else:
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  4389
                self.SaveValues(False)
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  4390
                old_value = self.Table.GetOldValue()
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  4391
                if old_value != "":
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4392
                    self.Controler.UpdateEditedElementUsedVariable(self.TagName, old_value, value)
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  4393
                self.Controler.BufferProject()
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4394
                self.ParentWindow.RefreshEditor(variablepanel = False)
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  4395
                self.ParentWindow.RefreshTitle()
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  4396
                self.ParentWindow.RefreshEditMenu()
239
d12779e971bd Adding support for function and functionBlock (standard or user) library
lbessard
parents: 235
diff changeset
  4397
                self.ParentWindow.RefreshInstancesTree()
268
5508af39d1f7 Bug on library Tree informations when changing block interface fixed
lbessard
parents: 266
diff changeset
  4398
                self.ParentWindow.RefreshLibraryTree()
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4399
                event.Skip()
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4400
        else:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4401
            self.SaveValues()
107
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4402
            if colname == "Class":
255eada20688 Lots of bug fixed
lbessard
parents: 102
diff changeset
  4403
                self.Table.ResetView(self.VariablesGrid)
6
c8cf918ee7ea Bug corrected and improvements
lbessard
parents: 5
diff changeset
  4404
            event.Skip()
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4405
    
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4406
    def OnVariablesGridEditorShown(self, event):
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4407
        row, col = event.GetRow(), event.GetCol() 
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4408
        classtype = self.Table.GetValueByName(row, "Class")
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4409
        if self.Table.GetColLabelValue(col) == "Type":
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4410
            type_menu = wx.Menu(title='')
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4411
            base_menu = wx.Menu(title='')
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  4412
            for base_type in self.Controler.GetBaseTypes():
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4413
                new_id = wx.NewId()
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4414
                AppendMenu(base_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=base_type)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4415
                self.Bind(wx.EVT_MENU, self.GetVariableTypeFunction(base_type), id=new_id)
114
06454545e5d0 Adding support for block copy and for wxpython 2.4
lbessard
parents: 108
diff changeset
  4416
            type_menu.AppendMenu(wx.NewId(), "Base Types", base_menu)
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  4417
            datatype_menu = wx.Menu(title='')
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4418
            for datatype in self.Controler.GetDataTypes(basetypes = False, debug = self.ParentWindow.Debug):
125
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  4419
                new_id = wx.NewId()
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  4420
                AppendMenu(datatype_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=datatype)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  4421
                self.Bind(wx.EVT_MENU, self.GetVariableTypeFunction(datatype), id=new_id)
394d9f168258 Adding support for execution order in PLCGenerator
lbessard
parents: 122
diff changeset
  4422
            type_menu.AppendMenu(wx.NewId(), "User Data Types", datatype_menu)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4423
            functionblock_menu = wx.Menu(title='')
253
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4424
            bodytype = self.Controler.GetEditedElementBodyType(self.TagName, self.ParentWindow.Debug)
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4425
            pouname, poutype = self.Controler.GetEditedElementType(self.TagName, self.ParentWindow.Debug)
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4426
            if classtype in ["Input","Output","InOut","External","Global"] or poutype != "function" and bodytype in ["ST", "IL"]:
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4427
                for functionblock_type in self.Controler.GetFunctionBlockTypes(self.TagName, self.ParentWindow.Debug):
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4428
                    new_id = wx.NewId()
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4429
                    AppendMenu(functionblock_menu, help='', id=new_id, kind=wx.ITEM_NORMAL, text=functionblock_type)
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4430
                    self.Bind(wx.EVT_MENU, self.GetVariableTypeFunction(functionblock_type), id=new_id)
d9391572655f Adding support for Debugging in PLCOpenEditor
lbessard
parents: 249
diff changeset
  4431
                type_menu.AppendMenu(wx.NewId(), "Function Block Types", functionblock_menu)
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4432
            rect = self.VariablesGrid.BlockToDeviceRect((row, col), (row, col))
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4433
            self.VariablesGrid.PopupMenuXY(type_menu, rect.x + rect.width, rect.y + self.VariablesGrid.GetColLabelSize())
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4434
            event.Veto()
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4435
        else:
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4436
            event.Skip()
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4437
    
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4438
    def GetVariableTypeFunction(self, base_type):
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4439
        def VariableTypeFunction(event):
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4440
            row = self.VariablesGrid.GetGridCursorRow()
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4441
            self.Table.SetValueByName(row, "Type", base_type)
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4442
            self.Table.ResetView(self.VariablesGrid)
98
ec5d7af033d8 Added support for wire type compatibility check
lbessard
parents: 97
diff changeset
  4443
            self.SaveValues(False)
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4444
            self.ParentWindow.RefreshEditor(variablepanel = False)
98
ec5d7af033d8 Added support for wire type compatibility check
lbessard
parents: 97
diff changeset
  4445
            self.Controler.BufferProject()
ec5d7af033d8 Added support for wire type compatibility check
lbessard
parents: 97
diff changeset
  4446
            self.ParentWindow.RefreshTitle()
ec5d7af033d8 Added support for wire type compatibility check
lbessard
parents: 97
diff changeset
  4447
            self.ParentWindow.RefreshEditMenu()
268
5508af39d1f7 Bug on library Tree informations when changing block interface fixed
lbessard
parents: 266
diff changeset
  4448
            self.ParentWindow.RefreshInstancesTree()
5508af39d1f7 Bug on library Tree informations when changing block interface fixed
lbessard
parents: 266
diff changeset
  4449
            self.ParentWindow.RefreshLibraryTree()
68
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4450
            event.Skip()
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4451
        return VariableTypeFunction
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4452
    
66308e07402c Adding support for allowing declarations of function block into POU interface
lbessard
parents: 67
diff changeset
  4453
    def OnVariablesGridCellLeftClick(self, event):
211
ac7ba3dc027b Bug fixed with Drag and Drop of FunctionBlocks from Variable Panel
lbessard
parents: 210
diff changeset
  4454
        row = event.GetRow()
ac7ba3dc027b Bug fixed with Drag and Drop of FunctionBlocks from Variable Panel
lbessard
parents: 210
diff changeset
  4455
        if event.GetCol() == 0 and self.Table.GetValueByName(row, "Edit"):
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4456
            row = event.GetRow()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4457
            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
  4458
            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
  4459
            var_type = self.Table.GetValueByName(row, "Type")
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4460
            data = wx.TextDataObject(str((var_name, var_class, var_type, self.TagName)))
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4461
            dragSource = wx.DropSource(self.VariablesGrid)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4462
            dragSource.SetData(data)
135
d24ce0800ac6 Bug on variable Drag and Drop fixed
lbessard
parents: 134
diff changeset
  4463
            dragSource.DoDragDrop()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4464
        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4465
    
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4466
    def OnVariablesGridSelectCell(self, event):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4467
        wx.CallAfter(self.RefreshButtons)
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4468
        event.Skip()
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4469
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4470
    def OnChar(self, event):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4471
        keycode = event.GetKeyCode()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4472
        if keycode == wx.WXK_DELETE:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4473
            row = self.Table.GetRow(self.VariablesGrid.GetGridCursorRow())
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4474
            self.Values.remove(row)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4475
            self.SaveValues()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4476
            self.RefreshValues()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4477
            self.RefreshButtons()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4478
        event.Skip()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4479
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4480
    def MoveValue(self, value_index, move):
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4481
        new_index = max(0, min(value_index + move, len(self.Values) - 1))
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4482
        if new_index != value_index:
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4483
            self.Values.insert(new_index, self.Values.pop(value_index))
268
5508af39d1f7 Bug on library Tree informations when changing block interface fixed
lbessard
parents: 266
diff changeset
  4484
            self.SaveValues()
28
fc23e1f415d8 Adding support for concurrent overriden standard function
lbessard
parents: 27
diff changeset
  4485
            self.RefreshValues()
12
58a65b901719 Bug on variables editing corrected
lbessard
parents: 11
diff changeset
  4486
            self.VariablesGrid.SetGridCursor(new_index, self.VariablesGrid.GetGridCursorCol())
268
5508af39d1f7 Bug on library Tree informations when changing block interface fixed
lbessard
parents: 266
diff changeset
  4487
        
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4488
    def RefreshValues(self, select=0):
37
256eedd275d0 Adding support for disable interface variable change if a POU is used
lbessard
parents: 28
diff changeset
  4489
        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
  4490
            self.VariablesGrid.SetGridCursor(0, 1)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4491
        data = []
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4492
        for num, variable in enumerate(self.Values):
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4493
            if variable["Class"] in self.ClassList:
80
c798a68c5560 Lots of bugs fixed
lbessard
parents: 71
diff changeset
  4494
                variable["Number"] = num + 1
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4495
                data.append(variable)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4496
        self.Table.SetData(data)
332
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4497
        if len(self.Table.data) > 0:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4498
            if select == -1:
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4499
                select = len(self.Table.data) - 1
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4500
            self.VariablesGrid.SetGridCursor(select, 1)
555124c752ec Adding Display menu with Zoom item
lbessard
parents: 331
diff changeset
  4501
            self.VariablesGrid.MakeCellVisible(select, 1)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4502
        self.Table.ResetView(self.VariablesGrid)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4503
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  4504
    def SaveValues(self, buffer = True):
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4505
        words = self.TagName.split("::")
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4506
        if self.ElementType == "config":
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4507
            self.Controler.SetConfigurationGlobalVars(words[1], self.Values)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4508
        elif self.ElementType == "resource":
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4509
            self.Controler.SetConfigurationResourceGlobalVars(words[1], words[2], self.Values)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4510
        else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4511
            if self.ReturnType.IsEnabled():
121
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4512
                self.Controler.SetPouInterfaceReturnType(words[1], self.ReturnType.GetStringSelection())
40b91ba978db Improving PLCOpenEditor for using wx2.8 AUI
lbessard
parents: 120
diff changeset
  4513
            self.Controler.SetPouInterfaceVars(words[1], self.Values)
58
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  4514
        if buffer:
39cd981ff242 Changing file headers
lbessard
parents: 56
diff changeset
  4515
            self.Controler.BufferProject()
90
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  4516
            self.ParentWindow.RefreshTitle()
2245e8776086 Adding support support for using PLCOpenEditor with Beremiz
lbessard
parents: 82
diff changeset
  4517
            self.ParentWindow.RefreshEditMenu()
268
5508af39d1f7 Bug on library Tree informations when changing block interface fixed
lbessard
parents: 266
diff changeset
  4518
            self.ParentWindow.RefreshInstancesTree()
5508af39d1f7 Bug on library Tree informations when changing block interface fixed
lbessard
parents: 266
diff changeset
  4519
            self.ParentWindow.RefreshLibraryTree()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 46
diff changeset
  4520
231
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4521
    def AddVariableError(self, infos):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4522
        if isinstance(infos[0], TupleType):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4523
            for i in xrange(*infos[0]):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4524
                self.Table.AddError((i,) + infos[1:])
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4525
        else:
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4526
            self.Table.AddError(infos)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4527
        self.Table.ResetView(self.VariablesGrid)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4528
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4529
    def ClearErrors(self):
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4530
        self.Table.ClearErrors()
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4531
        self.Table.ResetView(self.VariablesGrid)
fc2d6cbb8b39 Adding support for highlighing compiling errors from matiec
lbessard
parents: 223
diff changeset
  4532
341
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4533
#-------------------------------------------------------------------------------
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4534
#                            Variables Editor Panel
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4535
#-------------------------------------------------------------------------------
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4536
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4537
class VariableTableItem:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4538
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4539
    def __init__(self, parent, variable, value):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4540
        self.Parent = parent
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4541
        self.Variable = variable
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4542
        self.Value = value
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4543
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4544
    def __del__(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4545
        self.Parent = None
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4546
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4547
    def SetVariable(self, variable):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4548
        if self.Parent and self.Variable != variable:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4549
            self.Variable = variable
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4550
            self.Parent.RefreshGrid()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4551
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4552
    def GetVariable(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4553
        return self.Variable
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4554
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4555
    def SetValue(self, value):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4556
        if self.Parent and self.Value != value:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4557
            self.Value = value
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4558
            self.Parent.RefreshGrid()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4559
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4560
    def GetValue(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4561
        return self.Value    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4562
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4563
class DebugVariableTable(wx.grid.PyGridTableBase):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4564
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4565
    """
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4566
    A custom wx.grid.Grid Table using user supplied data
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4567
    """
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4568
    def __init__(self, parent, data, colnames):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4569
        # The base class must be initialized *first*
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4570
        wx.grid.PyGridTableBase.__init__(self)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4571
        self.data = data
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4572
        self.colnames = colnames
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4573
        self.Parent = parent
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4574
        # XXX
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4575
        # we need to store the row length and collength to
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4576
        # see if the table has changed size
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4577
        self._rows = self.GetNumberRows()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4578
        self._cols = self.GetNumberCols()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4579
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4580
    def GetNumberCols(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4581
        return len(self.colnames)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4582
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4583
    def GetNumberRows(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4584
        return len(self.data)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4585
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4586
    def GetColLabelValue(self, col):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4587
        if col < len(self.colnames):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4588
            return self.colnames[col]
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4589
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4590
    def GetRowLabelValues(self, row):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4591
        return row
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4592
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4593
    def GetValue(self, row, col):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4594
        if row < self.GetNumberRows():
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4595
            return self.GetValueByName(row, self.GetColLabelValue(col))
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4596
        return ""
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4597
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4598
    def SetValue(self, row, col, value):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4599
        if col < len(self.colnames):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4600
            self.SetValueByName(row, self.GetColLabelValue(col), value)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4601
            
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4602
    def GetValueByName(self, row, colname):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4603
        if row < self.GetNumberRows():
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4604
            if colname == "Variable":
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4605
                return self.data[row].GetVariable()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4606
            elif colname == "Value":
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4607
                return self.data[row].GetValue()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4608
        return ""
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4609
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4610
    def SetValueByName(self, row, colname, value):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4611
        if row < self.GetNumberRows():
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4612
            if colname == "Variable":
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4613
                self.data[row].SetVariable(value)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4614
            elif colname == "Value":
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4615
                self.data[row].SetValue(value)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4616
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4617
    def ResetView(self, grid):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4618
        """
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4619
        (wx.grid.Grid) -> Reset the grid view.   Call this to
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4620
        update the grid if rows and columns have been added or deleted
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4621
        """
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4622
        grid.BeginBatch()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4623
        for current, new, delmsg, addmsg in [
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4624
            (self._rows, self.GetNumberRows(), wx.grid.GRIDTABLE_NOTIFY_ROWS_DELETED, wx.grid.GRIDTABLE_NOTIFY_ROWS_APPENDED),
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4625
            (self._cols, self.GetNumberCols(), wx.grid.GRIDTABLE_NOTIFY_COLS_DELETED, wx.grid.GRIDTABLE_NOTIFY_COLS_APPENDED),
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4626
        ]:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4627
            if new < current:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4628
                msg = wx.grid.GridTableMessage(self,delmsg,new,current-new)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4629
                grid.ProcessTableMessage(msg)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4630
            elif new > current:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4631
                msg = wx.grid.GridTableMessage(self,addmsg,new-current)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4632
                grid.ProcessTableMessage(msg)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4633
                self.UpdateValues(grid)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4634
        grid.EndBatch()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4635
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4636
        self._rows = self.GetNumberRows()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4637
        self._cols = self.GetNumberCols()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4638
        # update the column rendering scheme
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4639
        self._updateColAttrs(grid)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4640
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4641
        # update the scrollbars and the displayed part of the grid
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4642
        grid.AdjustScrollbars()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4643
        grid.ForceRefresh()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4644
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4645
    def UpdateValues(self, grid):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4646
        """Update all displayed values"""
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4647
        # This sends an event to the grid table to update all of the values
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4648
        msg = wx.grid.GridTableMessage(self, wx.grid.GRIDTABLE_REQUEST_VIEW_GET_VALUES)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4649
        grid.ProcessTableMessage(msg)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4650
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4651
    def _updateColAttrs(self, grid):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4652
        """
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4653
        wx.grid.Grid -> update the column attributes to add the
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4654
        appropriate renderer given the column name.
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4655
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4656
        Otherwise default to the default renderer.
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4657
        """
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4658
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4659
        for row in range(self.GetNumberRows()):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4660
            for col in range(self.GetNumberCols()):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4661
                grid.SetReadOnly(row, col, True)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4662
                
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4663
    def SetData(self, data):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4664
        self.data = data
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4665
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4666
    def GetData(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4667
        return self.data
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4668
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4669
    def AppendItem(self, data):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4670
        self.data.append(data)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4671
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4672
    def InsertItem(self, idx, data):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4673
        self.data.insert(idx, data)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4674
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4675
    def RemoveItem(self, idx):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4676
        self.data.pop(idx)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4677
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4678
    def MoveItem(self, idx, new_idx):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4679
        self.data.insert(new_idx, self.data.pop(idx))
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4680
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4681
    def GetItem(self, idx):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4682
        return self.data[idx]
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4683
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4684
    def Empty(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4685
        self.data = []
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4686
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4687
class DebugVariableDropTarget(wx.TextDropTarget):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4688
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4689
    def __init__(self, parent):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4690
        wx.TextDropTarget.__init__(self)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4691
        self.ParentWindow = parent
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4692
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4693
    def OnDropText(self, x, y, data):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4694
        x, y = self.ParentWindow.VariablesGrid.CalcUnscrolledPosition(x, y)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4695
        row = self.ParentWindow.VariablesGrid.YToRow(y - self.ParentWindow.VariablesGrid.GetColLabelSize())
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4696
        if row == wx.NOT_FOUND:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4697
            row = self.ParentWindow.Table.GetNumberRows()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4698
        message = None
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4699
        try:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4700
            values = eval(data)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4701
        except:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4702
            message = "Invalid value \"%s\" for debug variable"%data
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4703
            values = None
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4704
        if not isinstance(values, TupleType):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4705
            message = "Invalid value \"%s\" for debug variable"%data
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4706
            values = None
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4707
        if values is not None and values[1] == "debug":
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4708
            self.ParentWindow.InsertValue(row, values[0])
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4709
        if message is not None:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4710
            wx.CallAfter(self.ShowMessage, message)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4711
            
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4712
    def ShowMessage(self, message):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4713
        message = wx.MessageDialog(self.ParentWindow, message, "Error", wx.OK|wx.ICON_ERROR)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4714
        message.ShowModal()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4715
        message.Destroy()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4716
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4717
[ID_DEBUGVARIABLEPANEL, ID_DEBUGVARIABLEPANELVARIABLESGRID, 
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4718
 ID_DEBUGVARIABLEPANELUPBUTTON, ID_DEBUGVARIABLEPANELDOWNBUTTON, 
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4719
 ID_DEBUGVARIABLEPANELDELETEBUTTON, 
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4720
] = [wx.NewId() for _init_ctrls in range(5)]
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4721
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4722
class DebugVariablePanel(wx.Panel):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4723
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4724
    if wx.VERSION < (2, 6, 0):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4725
        def Bind(self, event, function, id = None):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4726
            if id is not None:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4727
                event(self, id, function)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4728
            else:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4729
                event(self, function)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4730
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4731
    def _init_coll_MainSizer_Items(self, parent):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4732
        parent.AddSizer(self.ButtonPanelSizer, 0, border=5, flag=wx.ALIGN_RIGHT|wx.ALL)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4733
        parent.AddWindow(self.VariablesGrid, 0, border=0, flag=wx.GROW)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4734
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4735
    def _init_coll_MainSizer_Growables(self, parent):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4736
        parent.AddGrowableCol(0)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4737
        parent.AddGrowableRow(1)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4738
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4739
    def _init_coll_ButtonPanelSizer_Items(self, parent):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4740
        parent.AddWindow(self.UpButton, 0, border=5, flag=wx.RIGHT)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4741
        parent.AddWindow(self.DownButton, 0, border=5, flag=wx.RIGHT)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4742
        parent.AddWindow(self.DeleteButton, 0, border=0, flag=0)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4743
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4744
    def _init_sizers(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4745
        self.MainSizer = wx.FlexGridSizer(cols=1, hgap=10, rows=2, vgap=0)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4746
        self.ButtonPanelSizer = wx.BoxSizer(wx.HORIZONTAL)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4747
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4748
        self._init_coll_MainSizer_Items(self.MainSizer)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4749
        self._init_coll_MainSizer_Growables(self.MainSizer)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4750
        self._init_coll_ButtonPanelSizer_Items(self.ButtonPanelSizer)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4751
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4752
        self.SetSizer(self.MainSizer)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4753
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4754
    def _init_ctrls(self, prnt):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4755
        wx.Panel.__init__(self, id=ID_DEBUGVARIABLEPANEL,
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4756
              name='DebugVariablePanel', parent=prnt, pos=wx.Point(0, 0),
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4757
              size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4758
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4759
        self.VariablesGrid = wx.grid.Grid(id=ID_DEBUGVARIABLEPANELVARIABLESGRID,
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4760
              name='VariablesGrid', parent=self, pos=wx.Point(0, 0), 
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4761
              size=wx.Size(0, 150), style=wx.VSCROLL)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4762
        self.VariablesGrid.SetFont(wx.Font(12, 77, wx.NORMAL, wx.NORMAL, False,
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4763
              'Sans'))
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4764
        self.VariablesGrid.SetLabelFont(wx.Font(10, 77, wx.NORMAL, wx.NORMAL,
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4765
              False, 'Sans'))
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4766
        self.VariablesGrid.SetSelectionBackground(wx.WHITE)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4767
        self.VariablesGrid.SetSelectionForeground(wx.BLACK)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4768
        self.VariablesGrid.SetDropTarget(DebugVariableDropTarget(self))
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4769
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4770
        self.UpButton = wx.Button(id=ID_DEBUGVARIABLEPANELUPBUTTON, label='^',
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4771
              name='UpButton', parent=self, pos=wx.Point(0, 0),
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4772
              size=wx.Size(32, 32), style=0)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4773
        self.Bind(wx.EVT_BUTTON, self.OnUpButton, id=ID_DEBUGVARIABLEPANELUPBUTTON)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4774
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4775
        self.DownButton = wx.Button(id=ID_DEBUGVARIABLEPANELDOWNBUTTON, label='v',
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4776
              name='DownButton', parent=self, pos=wx.Point(0, 0),
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4777
              size=wx.Size(32, 32), style=0)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4778
        self.Bind(wx.EVT_BUTTON, self.OnDownButton, id=ID_DEBUGVARIABLEPANELDOWNBUTTON)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4779
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4780
        self.DeleteButton = wx.Button(id=ID_DEBUGVARIABLEPANELDELETEBUTTON, label='Delete',
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4781
              name='DeleteButton', parent=self, pos=wx.Point(0, 0),
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4782
              size=wx.Size(72, 32), style=0)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4783
        self.Bind(wx.EVT_BUTTON, self.OnDeleteButton, id=ID_DEBUGVARIABLEPANELDELETEBUTTON)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4784
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4785
        self._init_sizers()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4786
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4787
    def __init__(self, parent, controler):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4788
        self._init_ctrls(parent)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4789
        self.Controler = controler
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4790
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4791
        self.Table = DebugVariableTable(self, [], ["Variable", "Value"])    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4792
        self.VariablesGrid.SetTable(self.Table)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4793
        self.VariablesGrid.SetRowLabelSize(0)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4794
        
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4795
        for col in range(self.Table.GetNumberCols()):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4796
            attr = wx.grid.GridCellAttr()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4797
            attr.SetAlignment(wx.ALIGN_RIGHT, wx.ALIGN_CENTER)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4798
            self.VariablesGrid.SetColAttr(col, attr)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4799
            self.VariablesGrid.SetColSize(col, 100)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4800
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4801
        self.Table.ResetView(self.VariablesGrid)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4802
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4803
    def __del__(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4804
        for item in self.Table.GetData():
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4805
            self.Controler.UnsubscribeDebugIECVariable(item.GetVariable().upper(), item)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4806
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4807
    def RefreshGrid(self):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4808
        self.Table.ResetView(self.VariablesGrid)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4809
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4810
    def OnDeleteButton(self, event):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4811
        idx = self.VariablesGrid.GetGridCursorRow()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4812
        item = self.Table.GetItem(idx)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4813
        self.Controler.UnsubscribeDebugIECVariable(item.GetVariable().upper(), item)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4814
        self.Table.RemoveItem(idx)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4815
        self.RefreshGrid()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4816
        event.Skip()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4817
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4818
    def OnUpButton(self, event):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4819
        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), -1)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4820
        event.Skip()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4821
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4822
    def OnDownButton(self, event):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4823
        self.MoveValue(self.VariablesGrid.GetGridCursorRow(), 1)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4824
        event.Skip()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4825
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4826
    def InsertValue(self, idx, iec_path):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4827
        for item in self.Table.GetData():
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4828
            if iec_path == item.GetVariable():
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4829
                return
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4830
        item = VariableTableItem(self, iec_path, "")
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4831
        result = self.Controler.SubscribeDebugIECVariable(iec_path.upper(), item)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4832
        if result is not None:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4833
            self.Table.InsertItem(idx, item)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4834
            self.RefreshGrid()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4835
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4836
    def MoveValue(self, idx, move):
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4837
        new_idx = max(0, min(idx + move, self.Table.GetNumberRows() - 1))
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4838
        if new_idx != idx:
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4839
            self.Table.MoveItem(idx, new_idx)
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4840
            self.RefreshGrid()
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4841
            self.VariablesGrid.SetGridCursor(new_idx, self.VariablesGrid.GetGridCursorCol())
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4842
    
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4843
#-------------------------------------------------------------------------------
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4844
#                               Viewer Printout
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4845
#-------------------------------------------------------------------------------
88030497e29e Bug with AUINotebook double click
lbessard
parents: 337
diff changeset
  4846
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4847
UPPER_DIV = lambda x, y: (x / y) + {True : 0, False : 1}[(x % y) == 0]
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4848
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4849
class GraphicPrintout(wx.Printout):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4850
    def __init__(self, viewer, page_size, margins, preview = False):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4851
        wx.Printout.__init__(self)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4852
        self.Viewer = viewer
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4853
        self.PageSize = page_size
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4854
        if self.PageSize[0] == 0 or self.PageSize[1] == 0:
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4855
            self.PageSize = (1050, 1485)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4856
        self.Preview = preview
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4857
        self.Margins = margins
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4858
        self.FontSize = 5
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4859
        self.TextMargin = 3
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4860
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4861
        maxx, maxy = viewer.GetMaxSize()
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4862
        self.PageGrid = (UPPER_DIV(maxx, self.PageSize[0]), 
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4863
                         UPPER_DIV(maxy, self.PageSize[1]))
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4864
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4865
    def GetPageNumber(self):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4866
        return self.PageGrid[0] * self.PageGrid[1]
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4867
    
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4868
    def HasPage(self, page):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4869
        return page <= self.GetPageNumber()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4870
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4871
    def GetPageInfo(self):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4872
        page_number = self.GetPageNumber()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4873
        return (1, page_number, 1, page_number)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4874
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4875
    def OnBeginDocument(self, startPage, endPage):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4876
        dc = self.GetDC()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4877
        if not self.Preview and isinstance(dc, wx.PostScriptDC):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4878
            dc.SetResolution(720)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4879
        super(GraphicPrintout, self).OnBeginDocument(startPage, endPage)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4880
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4881
    def OnPrintPage(self, page):
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4882
        dc = self.GetDC()
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4883
        dc.SetUserScale(1.0, 1.0)
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4884
        dc.SetDeviceOrigin(0, 0)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4885
        dc.printing = not self.Preview
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4886
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4887
        # Get the size of the DC in pixels
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4888
        ppiPrinterX, ppiPrinterY = self.GetPPIPrinter()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4889
        ppiScreenX, ppiScreenY = self.GetPPIScreen()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4890
        pw, ph = self.GetPageSizePixels()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4891
        dw, dh = dc.GetSizeTuple()
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4892
        Xscale = (float(dw) * float(ppiPrinterX)) / (float(pw) * 25.4)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4893
        Yscale = (float(dh) * float(ppiPrinterY)) / (float(ph) * 25.4)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4894
        
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4895
        fontsize = self.FontSize * Yscale
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4896
        text_margin = self.TextMargin * Yscale
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4897
        
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4898
        margin_left = self.Margins[0].x * Xscale
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4899
        margin_top = self.Margins[0].y * Yscale
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4900
        area_width = dw - self.Margins[1].x * Xscale - margin_left
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4901
        area_height = dh - self.Margins[1].y * Yscale - margin_top
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4902
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4903
        dc.SetPen(wx.BLACK_PEN)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4904
        dc.SetBrush(wx.TRANSPARENT_BRUSH)    
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4905
        dc.DrawRectangle(margin_left, margin_top, area_width, area_height)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4906
        
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4907
        dc.SetFont(wx.Font(fontsize, wx.DEFAULT, wx.NORMAL, wx.NORMAL))
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4908
        dc.SetTextForeground(wx.BLACK)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4909
        block_name = " - ".join(self.Viewer.GetTagName().split("::")[1:])
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4910
        text_width, text_height = dc.GetTextExtent(block_name)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4911
        dc.DrawText(block_name, margin_left, margin_top - text_height - self.TextMargin)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4912
        dc.DrawText("Page: %d" % page, margin_left, margin_top + area_height + self.TextMargin)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4913
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4914
        # Calculate the position on the DC for centering the graphic
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4915
        posX = area_width * ((page - 1) % self.PageGrid[0])
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4916
        posY = area_height * ((page - 1) / self.PageGrid[0])
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4917
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4918
        scaleX = float(area_width) / float(self.PageSize[0])
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4919
        scaleY = float(area_height) / float(self.PageSize[1])
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4920
        scale = min(scaleX, scaleY)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4921
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4922
        # Set the scale and origin
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4923
        dc.SetDeviceOrigin(-posX + margin_left, -posY + margin_top)
221
25f2b4924347 Bugs with printing fixed
lbessard
parents: 220
diff changeset
  4924
        dc.SetClippingRegion(posX, posY, self.PageSize[0] * scale, self.PageSize[1] * scale)
213
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4925
        dc.SetUserScale(scale, scale)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4926
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4927
        #-------------------------------------------
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4928
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4929
        self.Viewer.DoDrawing(dc, True)
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4930
        
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4931
        return True
4931959ea256 Adding support for printing graphical languages
lbessard
parents: 212
diff changeset
  4932
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4933
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4934
#                               Exception Handler
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4935
#-------------------------------------------------------------------------------
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4936
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4937
Max_Traceback_List_Size = 20
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4938
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4939
def Display_Exception_Dialog(e_type,e_value,e_tb):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4940
    trcbck_lst = []
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4941
    for i,line in enumerate(traceback.extract_tb(e_tb)):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4942
        trcbck = " " + str(i+1) + ". "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4943
        if line[0].find(os.getcwd()) == -1:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4944
            trcbck += "file : " + str(line[0]) + ",   "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4945
        else:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4946
            trcbck += "file : " + str(line[0][len(os.getcwd()):]) + ",   "
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4947
        trcbck += "line : " + str(line[1]) + ",   " + "function : " + str(line[2])
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4948
        trcbck_lst.append(trcbck)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4949
        
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4950
    # Allow clicking....
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4951
    cap = wx.Window_GetCapture()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4952
    if cap:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4953
        cap.ReleaseMouse()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4954
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4955
    dlg = wx.SingleChoiceDialog(None, 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4956
        """
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4957
An error happens.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4958
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4959
Click on OK for saving an error report.
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4960
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4961
Please contact LOLITech at:
347
7affe341d37f change LoliTech phone number for bug report
greg
parents: 346
diff changeset
  4962
+33 (0)3 29 57 60 42
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4963
bugs_PLCOpenEditor@lolitech.fr
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4964
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4965
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4966
Error:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4967
""" +
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4968
        str(e_type) + " : " + str(e_value), 
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4969
        "Error",
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4970
        trcbck_lst)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4971
    try:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4972
        res = (dlg.ShowModal() == wx.ID_OK)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4973
    finally:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4974
        dlg.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4975
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4976
    return res
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4977
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4978
def Display_Error_Dialog(e_value):
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  4979
    message = wx.MessageDialog(None, str(e_value), "Error", wx.OK|wx.ICON_ERROR)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4980
    message.ShowModal()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4981
    message.Destroy()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4982
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4983
def get_last_traceback(tb):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4984
    while tb.tb_next:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4985
        tb = tb.tb_next
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4986
    return tb
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4987
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4988
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4989
def format_namespace(d, indent='    '):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4990
    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
  4991
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4992
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4993
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
  4994
65
cb6bed0720f0 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 64
diff changeset
  4995
def AddExceptHook(path, app_version='[No version]'):#, ignored_exceptions=[]):
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4996
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4997
    def handle_exception(e_type, e_value, e_traceback):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  4998
        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
  4999
        last_tb = get_last_traceback(e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5000
        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
  5001
        if str(e_value).startswith("!!!"):
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5002
            Display_Error_Dialog(e_value)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5003
        elif ex not in ignored_exceptions:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5004
            result = Display_Exception_Dialog(e_type,e_value,e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5005
            if result:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5006
                ignored_exceptions.append(ex)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5007
                info = {
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5008
                    'app-title' : wx.GetApp().GetAppName(), # app_title
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5009
                    'app-version' : app_version,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5010
                    'wx-version' : wx.VERSION_STRING,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5011
                    'wx-platform' : wx.Platform,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5012
                    'python-version' : platform.python_version(), #sys.version.split()[0],
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5013
                    'platform' : platform.platform(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5014
                    'e-type' : e_type,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5015
                    'e-value' : e_value,
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5016
                    'date' : time.ctime(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5017
                    'cwd' : os.getcwd(),
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5018
                    }
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5019
                if e_traceback:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5020
                    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
  5021
                    last_tb = get_last_traceback(e_traceback)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5022
                    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
  5023
                    info['locals'] = format_namespace(exception_locals)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5024
                    if 'self' in exception_locals:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5025
                        info['self'] = format_namespace(exception_locals['self'].__dict__)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5026
                
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5027
                output = open(path+os.sep+"bug_report_"+info['date'].replace(':','-').replace(' ','_')+".txt",'w')
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5028
                lst = info.keys()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5029
                lst.sort()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5030
                for a in lst:
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5031
                    output.write(a+":\n"+str(info[a])+"\n\n")
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5032
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5033
    #sys.excepthook = lambda *args: wx.CallAfter(handle_exception, *args)
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5034
    sys.excepthook = handle_exception
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5035
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5036
if __name__ == '__main__':
92
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5037
    def usage():
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5038
        print "\nUsage of PLCOpenEditor.py :"
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5039
        print "\n   %s [Filepath]\n"%sys.argv[0]
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5040
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5041
    try:
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5042
        opts, args = getopt.getopt(sys.argv[1:], "h", ["help"])
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5043
    except getopt.GetoptError:
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5044
        # print help information and exit:
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5045
        usage()
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5046
        sys.exit(2)
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5047
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5048
    for o, a in opts:
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5049
        if o in ("-h", "--help"):
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5050
            usage()
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5051
            sys.exit()
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5052
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5053
    fileOpen = None
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5054
    if len(args) > 1:
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5055
        usage()
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5056
        sys.exit()
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5057
    elif len(args) == 1:
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5058
        fileOpen = args[0]
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5059
    
64
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  5060
    app = wx.PySimpleApp()
dd6f693e46a1 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 58
diff changeset
  5061
    wx.InitAllImageHandlers()
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5062
    
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5063
    # Install a exception handle for bug reports
65
cb6bed0720f0 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 64
diff changeset
  5064
    AddExceptHook(os.getcwd(),__version__)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5065
    
92
76d5001393df Adding support for refreshing PLCOpenEditor block list
lbessard
parents: 90
diff changeset
  5066
    frame = PLCOpenEditor(None, fileOpen=fileOpen)
0
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5067
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5068
    frame.Show()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5069
    app.MainLoop()
b622defdfd98 PLCOpenEditor initial commit. 31/01/07.
etisserant
parents:
diff changeset
  5070