Beremiz.py
author greg
Mon, 24 Nov 2008 08:57:43 +0100
changeset 271 ea7928fd07da
parent 268 66843376a982
child 290 3bd617ae7a05
permissions -rw-r--r--
add the possibility to enable or disable wxTaskbarIcon for Beremiz_service
Launch beremiz without taskbarIcon by default (incompatible with svgui plugin)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
     1
#!/usr/bin/env python
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
     3
3
6d8728efcdec Adding validity verifications on project folders opened
lbessard
parents: 2
diff changeset
     4
#This file is part of Beremiz, a Integrated Development Environment for
6d8728efcdec Adding validity verifications on project folders opened
lbessard
parents: 2
diff changeset
     5
#programming IEC 61131-3 automates supporting plcopen standard and CanFestival. 
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
     6
#
3
6d8728efcdec Adding validity verifications on project folders opened
lbessard
parents: 2
diff changeset
     7
#Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
     8
#
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
     9
#See COPYING file for copyrights details.
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    10
#
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    11
#This library is free software; you can redistribute it and/or
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    12
#modify it under the terms of the GNU General Public
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    13
#License as published by the Free Software Foundation; either
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    14
#version 2.1 of the License, or (at your option) any later version.
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    15
#
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    16
#This library is distributed in the hope that it will be useful,
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    17
#but WITHOUT ANY WARRANTY; without even the implied warranty of
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    18
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3
6d8728efcdec Adding validity verifications on project folders opened
lbessard
parents: 2
diff changeset
    19
#General Public License for more details.
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    20
#
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    21
#You should have received a copy of the GNU General Public
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    22
#License along with this library; if not, write to the Free Software
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    23
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    24
13
f1f0edbeb313 More precise design for plugins.... to be continued...
etisserant
parents: 12
diff changeset
    25
__version__ = "$Revision$"
f1f0edbeb313 More precise design for plugins.... to be continued...
etisserant
parents: 12
diff changeset
    26
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    27
import os, sys, getopt, wx
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
    28
import tempfile
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
    29
import shutil
227
48c13b84505c - Some improovements in debug data feedback data
etisserant
parents: 224
diff changeset
    30
import random
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
    31
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
    32
_local_path = os.path.split(os.path.realpath(__file__))[0]
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
    33
def Bpath(*args):
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
    34
    return os.path.join(_local_path,*args)
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    35
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    36
if __name__ == '__main__':
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    37
    def usage():
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    38
        print "\nUsage of Beremiz.py :"
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
    39
        print "\n   %s [Projectpath] [Buildpath]\n"%sys.argv[0]
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    40
    
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    41
    try:
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    42
        opts, args = getopt.getopt(sys.argv[1:], "h", ["help"])
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    43
    except getopt.GetoptError:
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    44
        # print help information and exit:
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    45
        usage()
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    46
        sys.exit(2)
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    47
    
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    48
    for o, a in opts:
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    49
        if o in ("-h", "--help"):
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    50
            usage()
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    51
            sys.exit()
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    52
    
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
    53
    if len(args) > 2:
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    54
        usage()
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    55
        sys.exit()
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    56
    elif len(args) == 1:
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    57
        projectOpen = args[0]
260
038eff285e00 add docutils in svgui plugins to launch inkscape
greg
parents: 258
diff changeset
    58
        buildpath = None
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
    59
    elif len(args) == 2:
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
    60
        projectOpen = args[0]
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
    61
        buildpath = args[1]
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    62
    else:
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    63
        projectOpen = None
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
    64
        buildpath = None
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    65
    
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    66
    app = wx.PySimpleApp()
257
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
    67
    app.SetAppName('beremiz')
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
    68
    config = wx.ConfigBase.Get()
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    69
    wx.InitAllImageHandlers()
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    70
    
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
    71
    bmp = wx.Image(Bpath("images","splash.png")).ConvertToBitmap()
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    72
    splash=wx.SplashScreen(bmp,wx.SPLASH_CENTRE_ON_SCREEN, 1000, None)
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    73
    wx.Yield()
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    74
134
517db40c30b7 docutils is now used for displaying pdf and html
greg
parents: 133
diff changeset
    75
import wx.lib.buttons, wx.lib.statbmp
268
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
    76
import TextCtrlAutoComplete, cPickle
117
32099ee16154 Added splash screen. Moved icons to /images
etisserant
parents: 116
diff changeset
    77
import types, time, re, platform, time, traceback, commands
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
    78
from plugger import PluginsRoot
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
    79
from wxPopen import ProcessLogger
122
7676dba61281 use docclass for opening pdf on win32 or linux
greg
parents: 121
diff changeset
    80
120
8c3150858dd3 create doc directory and add about.html + manual_beremiz.pdf
greg
parents: 119
diff changeset
    81
base_folder = os.path.split(sys.path[0])[0]
136
f49f586a0a43 import all docutils in 1 time
greg
parents: 134
diff changeset
    82
sys.path.append(base_folder)
f49f586a0a43 import all docutils in 1 time
greg
parents: 134
diff changeset
    83
from docutils import *
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
    84
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    85
SCROLLBAR_UNIT = 10
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    86
WINDOW_COLOUR = wx.Colour(240,240,240)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
    87
TITLE_COLOUR = wx.Colour(200,200,220)
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
    88
CHANGED_TITLE_COLOUR = wx.Colour(220,200,220)
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
    89
CHANGED_WINDOW_COLOUR = wx.Colour(255,240,240)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    90
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    91
if wx.Platform == '__WXMSW__':
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    92
    faces = { 'times': 'Times New Roman',
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    93
              'mono' : 'Courier New',
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    94
              'helv' : 'Arial',
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    95
              'other': 'Comic Sans MS',
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
    96
              'size' : 16,
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    97
             }
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    98
else:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
    99
    faces = { 'times': 'Times',
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   100
              'mono' : 'Courier',
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   101
              'helv' : 'Helvetica',
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   102
              'other': 'new century schoolbook',
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   103
              'size' : 18,
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   104
             }
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   105
201
520d2416ff4d Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents: 200
diff changeset
   106
MATIEC_ERROR_MODEL = re.compile(".*\.st:([0-9]*)-([0-9]*)..([0-9]*)-([0-9]*): error : (.*)$")
72
dc107daa2135 Bug on LeftPanelSizer with Windows fixed
lbessard
parents: 71
diff changeset
   107
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   108
# Some helpers to tweak GenBitmapTextButtons
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   109
# TODO: declare customized classes instead.
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   110
gen_mini_GetBackgroundBrush = lambda obj:lambda dc: wx.Brush(obj.GetParent().GetBackgroundColour(), wx.SOLID)
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   111
gen_textbutton_GetLabelSize = lambda obj:lambda:(wx.lib.buttons.GenButton._GetLabelSize(obj)[:-1] + (False,))
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   112
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   113
def make_genbitmaptogglebutton_flat(button):
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   114
    button.GetBackgroundBrush = gen_mini_GetBackgroundBrush(button)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   115
    button.labelDelta = 0
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   116
    button.SetBezelWidth(0)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   117
    button.SetUseFocusIndicator(False)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   118
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   119
# Patch wx.lib.imageutils so that gray is supported on alpha images
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   120
import wx.lib.imageutils
110
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   121
from wx.lib.imageutils import grayOut as old_grayOut
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   122
def grayOut(anImage):
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   123
    if anImage.HasAlpha():
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   124
        AlphaData = anImage.GetAlphaData()
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   125
    else :
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   126
        AlphaData = None
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   127
110
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   128
    old_grayOut(anImage)
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   129
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   130
    if AlphaData is not None:
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   131
        anImage.SetAlphaData(AlphaData)
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   132
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   133
wx.lib.imageutils.grayOut = grayOut
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   134
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   135
class GenBitmapTextButton(wx.lib.buttons.GenBitmapTextButton):
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   136
    def _GetLabelSize(self):
230
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   137
        """ used internally """
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   138
        w, h = self.GetTextExtent(self.GetLabel())
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   139
        if not self.bmpLabel:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   140
            return w, h, False       # if there isn't a bitmap use the size of the text
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   141
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   142
        w_bmp = self.bmpLabel.GetWidth()+2
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   143
        h_bmp = self.bmpLabel.GetHeight()+2
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   144
        height = h + h_bmp
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   145
        if w_bmp > w:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   146
            width = w_bmp
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   147
        else:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   148
            width = w
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   149
        return width, height, False
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   150
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   151
    def DrawLabel(self, dc, width, height, dw=0, dy=0):
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   152
        bmp = self.bmpLabel
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   153
        if bmp != None:     # if the bitmap is used
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   154
            if self.bmpDisabled and not self.IsEnabled():
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   155
                bmp = self.bmpDisabled
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   156
            if self.bmpFocus and self.hasFocus:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   157
                bmp = self.bmpFocus
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   158
            if self.bmpSelected and not self.up:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   159
                bmp = self.bmpSelected
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   160
            bw,bh = bmp.GetWidth(), bmp.GetHeight()
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   161
            if not self.up:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   162
                dw = dy = self.labelDelta
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   163
            hasMask = bmp.GetMask() != None
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   164
        else:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   165
            bw = bh = 0     # no bitmap -> size is zero
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   166
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   167
        dc.SetFont(self.GetFont())
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   168
        if self.IsEnabled():
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   169
            dc.SetTextForeground(self.GetForegroundColour())
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   170
        else:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   171
            dc.SetTextForeground(wx.SystemSettings.GetColour(wx.SYS_COLOUR_GRAYTEXT))
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   172
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   173
        label = self.GetLabel()
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   174
        tw, th = dc.GetTextExtent(label)        # size of text
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   175
        if not self.up:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   176
            dw = dy = self.labelDelta
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   177
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   178
        pos_x = (width-bw)/2+dw      # adjust for bitmap and text to centre
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   179
        pos_y = (height-bh-th)/2+dy
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   180
        if bmp !=None:
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   181
            dc.DrawBitmap(bmp, pos_x, pos_y, hasMask) # draw bitmap if available
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   182
            pos_x = (width-tw)/2+dw      # adjust for bitmap and text to centre
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   183
            pos_y += bh + 2
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   184
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   185
        dc.DrawText(label, pos_x, pos_y)      # draw the text
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   186
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   187
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   188
class GenStaticBitmap(wx.lib.statbmp.GenStaticBitmap):
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   189
    """ Customized GenStaticBitmap, fix transparency redraw bug on wx2.8/win32, 
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   190
    and accept image name as __init__ parameter, fail silently if file do not exist"""
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   191
    def __init__(self, parent, ID, bitmapname,
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   192
                 pos = wx.DefaultPosition, size = wx.DefaultSize,
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   193
                 style = 0,
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   194
                 name = "genstatbmp"):
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   195
        
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   196
        bitmappath = Bpath( "images", bitmapname)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   197
        if os.path.isfile(bitmappath):
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   198
            bitmap = wx.Bitmap(bitmappath)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   199
        else:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   200
            bitmap = None
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   201
        wx.lib.statbmp.GenStaticBitmap.__init__(self, parent, ID, bitmap,
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   202
                 pos, size,
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   203
                 style,
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   204
                 name)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   205
        
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   206
    def OnPaint(self, event):
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   207
        dc = wx.PaintDC(self)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   208
        colour = self.GetParent().GetBackgroundColour()
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   209
        dc.SetPen(wx.Pen(colour))
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   210
        dc.SetBrush(wx.Brush(colour ))
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   211
        dc.DrawRectangle(0, 0, *dc.GetSizeTuple())
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   212
        if self._bitmap:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   213
            dc.DrawBitmap(self._bitmap, 0, 0, True)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   214
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   215
                        
1
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   216
class LogPseudoFile:
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   217
    """ Base class for file like objects to facilitate StdOut for the Shell."""
110
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   218
    def __init__(self, output):
7
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
   219
        self.red_white = wx.TextAttr("RED", "WHITE")
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
   220
        self.red_yellow = wx.TextAttr("RED", "YELLOW")
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
   221
        self.black_white = wx.TextAttr("BLACK", "WHITE")
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
   222
        self.default_style = None
1
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   223
        self.output = output
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   224
22
9a0c535c3272 Pleliminary build process -- C code generation
etisserant
parents: 21
diff changeset
   225
    def write(self, s, style = None):
110
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   226
        if style is None : style=self.black_white
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   227
        self.output.Freeze(); 
22
9a0c535c3272 Pleliminary build process -- C code generation
etisserant
parents: 21
diff changeset
   228
        if self.default_style != style: 
9a0c535c3272 Pleliminary build process -- C code generation
etisserant
parents: 21
diff changeset
   229
            self.output.SetDefaultStyle(style)
9a0c535c3272 Pleliminary build process -- C code generation
etisserant
parents: 21
diff changeset
   230
            self.default_style = style
110
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   231
        self.output.AppendText(s)
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   232
        self.output.ScrollLines(s.count('\n')+1)
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   233
        self.output.ShowPosition(self.output.GetLastPosition())
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
   234
        self.output.Thaw()
7
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
   235
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
   236
    def write_warning(self, s):
22
9a0c535c3272 Pleliminary build process -- C code generation
etisserant
parents: 21
diff changeset
   237
        self.write(s,self.red_white)
7
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
   238
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
   239
    def write_error(self, s):
22
9a0c535c3272 Pleliminary build process -- C code generation
etisserant
parents: 21
diff changeset
   240
        self.write(s,self.red_yellow)
1
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   241
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   242
    def flush(self):
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   243
        self.output.SetValue("")
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   244
    
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   245
    def isatty(self):
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   246
        return false
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   247
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   248
[ID_BEREMIZ, ID_BEREMIZMAINSPLITTER, 
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   249
 ID_BEREMIZPLCCONFIG, ID_BEREMIZLOGCONSOLE, 
121
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   250
 ID_BEREMIZINSPECTOR] = [wx.NewId() for _init_ctrls in range(5)]
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   251
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   252
[ID_BEREMIZRUNMENUBUILD, ID_BEREMIZRUNMENUSIMULATE, 
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   253
 ID_BEREMIZRUNMENURUN, ID_BEREMIZRUNMENUSAVELOG, 
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   254
] = [wx.NewId() for _init_coll_EditMenu_Items in range(4)]
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   255
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   256
class Beremiz(wx.Frame):
120
8c3150858dd3 create doc directory and add about.html + manual_beremiz.pdf
greg
parents: 119
diff changeset
   257
	
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   258
    def _init_coll_FileMenu_Items(self, parent):
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   259
        parent.Append(help='', id=wx.ID_NEW,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   260
              kind=wx.ITEM_NORMAL, text=u'New\tCTRL+N')
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   261
        parent.Append(help='', id=wx.ID_OPEN,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   262
              kind=wx.ITEM_NORMAL, text=u'Open\tCTRL+O')
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   263
        parent.Append(help='', id=wx.ID_SAVE,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   264
              kind=wx.ITEM_NORMAL, text=u'Save\tCTRL+S')
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   265
        parent.Append(help='', id=wx.ID_CLOSE_ALL,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   266
              kind=wx.ITEM_NORMAL, text=u'Close Project')
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   267
        parent.AppendSeparator()
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   268
        parent.Append(help='', id=wx.ID_PROPERTIES,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   269
              kind=wx.ITEM_NORMAL, text=u'Properties')
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   270
        parent.AppendSeparator()
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   271
        parent.Append(help='', id=wx.ID_EXIT,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   272
              kind=wx.ITEM_NORMAL, text=u'Quit\tCTRL+Q')
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   273
        self.Bind(wx.EVT_MENU, self.OnNewProjectMenu, id=wx.ID_NEW)
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   274
        self.Bind(wx.EVT_MENU, self.OnOpenProjectMenu, id=wx.ID_OPEN)
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   275
        self.Bind(wx.EVT_MENU, self.OnSaveProjectMenu, id=wx.ID_SAVE)
242
fc6d1988e4da Bug closing project in Beremiz when closing tab in PLCOpenEditor fixed
lbessard
parents: 235
diff changeset
   276
        self.Bind(wx.EVT_MENU, self.OnCloseProjectMenu, id=wx.ID_CLOSE_ALL)
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   277
        self.Bind(wx.EVT_MENU, self.OnPropertiesMenu, id=wx.ID_PROPERTIES)
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   278
        self.Bind(wx.EVT_MENU, self.OnQuitMenu, id=wx.ID_EXIT)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   279
        
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   280
    def _init_coll_EditMenu_Items(self, parent):
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   281
        parent.Append(help='', id=wx.ID_EDIT,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   282
              kind=wx.ITEM_NORMAL, text=u'Edit PLC\tCTRL+R')
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   283
        parent.AppendSeparator()
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   284
        parent.Append(help='', id=wx.ID_ADD,
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   285
              kind=wx.ITEM_NORMAL, text=u'Add Plugin')
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   286
        parent.Append(help='', id=wx.ID_DELETE,
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   287
              kind=wx.ITEM_NORMAL, text=u'Delete Plugin')
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   288
        self.Bind(wx.EVT_MENU, self.OnEditPLCMenu, id=wx.ID_EDIT)
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   289
        self.Bind(wx.EVT_MENU, self.OnAddMenu, id=wx.ID_ADD)
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   290
        self.Bind(wx.EVT_MENU, self.OnDeleteMenu, id=wx.ID_DELETE)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   291
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   292
    def _init_coll_RunMenu_Items(self, parent):
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   293
        parent.Append(help='', id=ID_BEREMIZRUNMENUBUILD,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   294
              kind=wx.ITEM_NORMAL, text=u'Build\tCTRL+R')
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   295
        parent.AppendSeparator()
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   296
        parent.Append(help='', id=ID_BEREMIZRUNMENUSIMULATE,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   297
              kind=wx.ITEM_NORMAL, text=u'Simulate')
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   298
        parent.Append(help='', id=ID_BEREMIZRUNMENURUN,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   299
              kind=wx.ITEM_NORMAL, text=u'Run')
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   300
        parent.AppendSeparator()
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   301
        parent.Append(help='', id=ID_BEREMIZRUNMENUSAVELOG,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   302
              kind=wx.ITEM_NORMAL, text=u'Save Log')
1
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
   303
        self.Bind(wx.EVT_MENU, self.OnBuildMenu,
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   304
              id=ID_BEREMIZRUNMENUBUILD)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   305
        self.Bind(wx.EVT_MENU, self.OnSimulateMenu,
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   306
              id=ID_BEREMIZRUNMENUSIMULATE)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   307
        self.Bind(wx.EVT_MENU, self.OnRunMenu,
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   308
              id=ID_BEREMIZRUNMENURUN)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   309
        self.Bind(wx.EVT_MENU, self.OnSaveLogMenu,
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   310
              id=ID_BEREMIZRUNMENUSAVELOG)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   311
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   312
    def _init_coll_HelpMenu_Items(self, parent):
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   313
        parent.Append(help='', id=wx.ID_HELP,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   314
              kind=wx.ITEM_NORMAL, text=u'Beremiz\tF1')
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   315
        parent.Append(help='', id=wx.ID_ABOUT,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   316
              kind=wx.ITEM_NORMAL, text=u'About')
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   317
        self.Bind(wx.EVT_MENU, self.OnBeremizMenu, id=wx.ID_HELP)
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   318
        self.Bind(wx.EVT_MENU, self.OnAboutMenu, id=wx.ID_ABOUT)
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   319
    
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   320
    def _init_coll_MenuBar_Menus(self, parent):
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   321
        parent.Append(menu=self.FileMenu, title=u'File')
28
848ce4b1f9e4 Disabled unused run/edit menu, fixed some event/refresh machanisms
etisserant
parents: 25
diff changeset
   322
        #parent.Append(menu=self.EditMenu, title=u'Edit')
848ce4b1f9e4 Disabled unused run/edit menu, fixed some event/refresh machanisms
etisserant
parents: 25
diff changeset
   323
        #parent.Append(menu=self.RunMenu, title=u'Run')
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   324
        parent.Append(menu=self.HelpMenu, title=u'Help')
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   325
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   326
    def _init_utils(self):
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   327
        self.MenuBar = wx.MenuBar()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   328
        self.FileMenu = wx.Menu(title=u'')
28
848ce4b1f9e4 Disabled unused run/edit menu, fixed some event/refresh machanisms
etisserant
parents: 25
diff changeset
   329
        #self.EditMenu = wx.Menu(title=u'')
848ce4b1f9e4 Disabled unused run/edit menu, fixed some event/refresh machanisms
etisserant
parents: 25
diff changeset
   330
        #self.RunMenu = wx.Menu(title=u'')
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   331
        self.HelpMenu = wx.Menu(title=u'')
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   332
        
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   333
        self._init_coll_MenuBar_Menus(self.MenuBar)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   334
        self._init_coll_FileMenu_Items(self.FileMenu)
28
848ce4b1f9e4 Disabled unused run/edit menu, fixed some event/refresh machanisms
etisserant
parents: 25
diff changeset
   335
        #self._init_coll_EditMenu_Items(self.EditMenu)
848ce4b1f9e4 Disabled unused run/edit menu, fixed some event/refresh machanisms
etisserant
parents: 25
diff changeset
   336
        #self._init_coll_RunMenu_Items(self.RunMenu)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   337
        self._init_coll_HelpMenu_Items(self.HelpMenu)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   338
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   339
    def _init_coll_PLCConfigMainSizer_Items(self, parent):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   340
        parent.AddSizer(self.PLCParamsSizer, 0, border=10, flag=wx.GROW|wx.TOP|wx.LEFT|wx.RIGHT)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   341
        parent.AddSizer(self.PluginTreeSizer, 0, border=10, flag=wx.BOTTOM|wx.LEFT|wx.RIGHT)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   342
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   343
    def _init_coll_PLCConfigMainSizer_Growables(self, parent):
67
862da764c5b5 Layout changed for making buttons at top of the frame always visible
lbessard
parents: 65
diff changeset
   344
        parent.AddGrowableCol(0)
862da764c5b5 Layout changed for making buttons at top of the frame always visible
lbessard
parents: 65
diff changeset
   345
        parent.AddGrowableRow(1)
862da764c5b5 Layout changed for making buttons at top of the frame always visible
lbessard
parents: 65
diff changeset
   346
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   347
    def _init_coll_PluginTreeSizer_Growables(self, parent):
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   348
        parent.AddGrowableCol(0)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   349
        parent.AddGrowableCol(1)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   350
        
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   351
    def _init_sizers(self):
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   352
        self.PLCConfigMainSizer = wx.FlexGridSizer(cols=1, hgap=2, rows=2, vgap=2)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   353
        self.PLCParamsSizer = wx.BoxSizer(wx.VERTICAL)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   354
        #self.PluginTreeSizer = wx.FlexGridSizer(cols=3, hgap=0, rows=0, vgap=2)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   355
        self.PluginTreeSizer = wx.FlexGridSizer(cols=2, hgap=0, rows=0, vgap=2)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   356
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   357
        self._init_coll_PLCConfigMainSizer_Items(self.PLCConfigMainSizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   358
        self._init_coll_PLCConfigMainSizer_Growables(self.PLCConfigMainSizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   359
        self._init_coll_PluginTreeSizer_Growables(self.PluginTreeSizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   360
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   361
        self.PLCConfig.SetSizer(self.PLCConfigMainSizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   362
        
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   363
    def _init_ctrls(self, prnt):
4
e9d061c23e83 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 3
diff changeset
   364
        wx.Frame.__init__(self, id=ID_BEREMIZ, name=u'Beremiz',
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   365
              parent=prnt, pos=wx.Point(0, 0), size=wx.Size(1000, 600),
25
fa7503684c28 Adding support for using Networkedit et PLCOpenEditor in Beremiz
lbessard
parents: 24
diff changeset
   366
              style=wx.DEFAULT_FRAME_STYLE|wx.CLIP_CHILDREN, title=u'Beremiz')
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   367
        self._init_utils()
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   368
        self.SetClientSize(wx.Size(1000, 600))
127
36bb6be88a3b Adding icons to Beremiz menus
lbessard
parents: 126
diff changeset
   369
        self.SetMenuBar(self.MenuBar)
62
ddf0cdd71558 Adding support for refresh block list where beremiz loose focus
lbessard
parents: 60
diff changeset
   370
        self.Bind(wx.EVT_ACTIVATE, self.OnFrameActivated)
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   371
        self.Bind(wx.EVT_CLOSE, self.OnCloseFrame)
121
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   372
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   373
        self.Bind(wx.EVT_MENU, self.OnOpenWidgetInspector, id=ID_BEREMIZINSPECTOR)
200
009fc5850157 Change shortcut for wx-inspector now ctrl-alt-i
etisserant
parents: 199
diff changeset
   374
        accel = wx.AcceleratorTable([wx.AcceleratorEntry(wx.ACCEL_CTRL|wx.ACCEL_ALT, ord('I'), ID_BEREMIZINSPECTOR)])
121
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   375
        self.SetAcceleratorTable(accel)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   376
        
71
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   377
        if wx.VERSION < (2, 8, 0):
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   378
            self.MainSplitter = wx.SplitterWindow(id=ID_BEREMIZMAINSPLITTER,
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   379
                  name='MainSplitter', parent=self, point=wx.Point(0, 0),
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   380
                  size=wx.Size(0, 0), style=wx.SP_3D)
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   381
            self.MainSplitter.SetNeedUpdating(True)
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   382
            self.MainSplitter.SetMinimumPaneSize(1)
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   383
        
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   384
            parent = self.MainSplitter
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   385
        else:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   386
            parent = self
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   387
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   388
        self.PLCConfig = wx.ScrolledWindow(id=ID_BEREMIZPLCCONFIG,
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   389
              name='PLCConfig', parent=parent, pos=wx.Point(0, 0),
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   390
              size=wx.Size(-1, -1), style=wx.TAB_TRAVERSAL|wx.SUNKEN_BORDER|wx.HSCROLL|wx.VSCROLL)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   391
        self.PLCConfig.SetBackgroundColour(wx.WHITE)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   392
        self.PLCConfig.Bind(wx.EVT_SIZE, self.OnMoveWindow)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   393
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   394
        self.LogConsole = wx.TextCtrl(id=ID_BEREMIZLOGCONSOLE, value='',
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   395
                  name='LogConsole', parent=parent, pos=wx.Point(0, 0),
71
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   396
                  size=wx.Size(0, 0), style=wx.TE_MULTILINE|wx.TE_RICH2)
201
520d2416ff4d Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents: 200
diff changeset
   397
        self.LogConsole.Bind(wx.EVT_LEFT_DCLICK, self.OnLogConsoleDClick)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   398
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   399
        if wx.VERSION < (2, 8, 0):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   400
            self.MainSplitter.SplitHorizontally(self.PLCConfig, self.LogConsole, -250)
71
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   401
        else:
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   402
            self.AUIManager = wx.aui.AuiManager(self)
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   403
            self.AUIManager.SetDockSizeConstraint(0.5, 0.5)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   404
            
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   405
            self.AUIManager.AddPane(self.PLCConfig, wx.aui.AuiPaneInfo().CenterPane())
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   406
            
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   407
            self.AUIManager.AddPane(self.LogConsole, wx.aui.AuiPaneInfo().
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   408
                Caption("Log Console").Bottom().Layer(1).
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   409
                BestSize(wx.Size(800, 200)).CloseButton(False))
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   410
        
71
e0bb49781b80 Improving Beremiz for using wx2.8 AUI
lbessard
parents: 69
diff changeset
   411
            self.AUIManager.Update()
13
f1f0edbeb313 More precise design for plugins.... to be continued...
etisserant
parents: 12
diff changeset
   412
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   413
        self._init_sizers()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   414
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
   415
    def __init__(self, parent, projectOpen, buildpath):
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   416
        self._init_ctrls(parent)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   417
        
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   418
        self.Log = LogPseudoFile(self.LogConsole)
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   419
        
227
48c13b84505c - Some improovements in debug data feedback data
etisserant
parents: 224
diff changeset
   420
        # create temporary directory for runtime working directory
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   421
        self.local_runtime_tmpdir = tempfile.mkdtemp()
227
48c13b84505c - Some improovements in debug data feedback data
etisserant
parents: 224
diff changeset
   422
        # choose an arbitrary random port for runtime
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   423
        self.runtime_port = int(random.random() * 1000) + 61131
227
48c13b84505c - Some improovements in debug data feedback data
etisserant
parents: 224
diff changeset
   424
        # launch local runtime
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   425
        self.local_runtime = ProcessLogger(self.Log,
271
ea7928fd07da add the possibility to enable or disable wxTaskbarIcon for Beremiz_service
greg
parents: 268
diff changeset
   426
                                           "\"%s\" \"%s\" -p %s -i localhost -x 0 %s"%(sys.executable,
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   427
                                                       Bpath("Beremiz_service.py"),
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   428
                                                       self.runtime_port,
229
8bc65076e290 add tests for win32
greg
parents: 227
diff changeset
   429
                                                       self.local_runtime_tmpdir),
8bc65076e290 add tests for win32
greg
parents: 227
diff changeset
   430
                                                       no_gui=False)
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   431
        
116
ff860001a377 add wx.icon in init for class beremiz class
greg
parents: 110
diff changeset
   432
        # Add beremiz's icon in top left corner of the frame
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   433
        self.SetIcon(wx.Icon(Bpath( "images", "brz.ico"), wx.BITMAP_TYPE_ICO))
116
ff860001a377 add wx.icon in init for class beremiz class
greg
parents: 110
diff changeset
   434
        
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   435
        self.DisableEvents = False
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   436
        
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   437
        self.PluginInfos = {}
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   438
        
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   439
        if projectOpen:
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   440
            self.PluginRoot = PluginsRoot(self, self.Log, self.runtime_port)
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
   441
            self.PluginRoot.LoadProject(projectOpen, buildpath)
268
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
   442
            self.RefreshAll()
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   443
        else:
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   444
            self.PluginRoot = None
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   445
        
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   446
        self.RefreshMainMenu()
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   447
121
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   448
    def OnOpenWidgetInspector(self, evt):
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   449
        # Activate the widget inspection tool
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   450
        from wx.lib.inspection import InspectionTool
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   451
        if not InspectionTool().initialized:
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   452
            InspectionTool().Init()
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   453
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   454
        # Find a widget to be selected in the tree.  Use either the
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   455
        # one under the cursor, if any, or this frame.
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   456
        wnd = wx.FindWindowAtPointer()
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   457
        if not wnd:
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   458
            wnd = self
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   459
        InspectionTool().Show(wnd, True)
ccb1812f8323 Added ctrl+f12 wxpython inspector shortcut for debuging
etisserant
parents: 120
diff changeset
   460
201
520d2416ff4d Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents: 200
diff changeset
   461
    def OnLogConsoleDClick(self, event):
520d2416ff4d Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents: 200
diff changeset
   462
        wx.CallAfter(self.SearchLineForError)
520d2416ff4d Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents: 200
diff changeset
   463
        event.Skip()
520d2416ff4d Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents: 200
diff changeset
   464
520d2416ff4d Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents: 200
diff changeset
   465
    def SearchLineForError(self):
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   466
        if self.PluginRoot is not None:
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   467
            text = self.LogConsole.GetRange(0, self.LogConsole.GetInsertionPoint())
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   468
            line = self.LogConsole.GetLineText(len(text.splitlines()) - 1)
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   469
            result = MATIEC_ERROR_MODEL.match(line)
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   470
            if result is not None:
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   471
                first_line, first_column, last_line, last_column, error = result.groups()
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   472
                infos = self.PluginRoot.ShowError(self.Log,
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   473
                                                  (int(first_line), int(first_column)), 
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   474
                                                  (int(last_line), int(last_column)))
201
520d2416ff4d Adding support for highlighing compiling errors into PLCOpenEditor
lbessard
parents: 200
diff changeset
   475
		
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   476
    def OnCloseFrame(self, event):
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   477
        if self.PluginRoot is not None:
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   478
            if self.PluginRoot.ProjectTestModified():
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   479
                dialog = wx.MessageDialog(self,
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   480
                                          "Save changes ?",
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   481
                                          "Close Application", 
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   482
                                          wx.YES_NO|wx.CANCEL|wx.ICON_QUESTION)
119
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   483
                answer = dialog.ShowModal()
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   484
                dialog.Destroy()
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   485
                if answer == wx.ID_YES:
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   486
                    self.PluginRoot.SaveProject()
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   487
                    event.Skip()
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   488
                elif answer == wx.ID_NO:
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   489
                    event.Skip()
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   490
                    return
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   491
                else:
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   492
                    event.Veto()
f3819d2e8eff Added question dialog for unsaved close
etisserant
parents: 118
diff changeset
   493
                    return
220
ad3292145fc2 Fixed local PLC runtime kill on aborted quit attempt.
etisserant
parents: 218
diff changeset
   494
ad3292145fc2 Fixed local PLC runtime kill on aborted quit attempt.
etisserant
parents: 218
diff changeset
   495
        # shutdown local runtime
235
a66e150f2888 Improved debug data feedback.
etisserant
parents: 234
diff changeset
   496
        self.local_runtime.kill(gently=False)
220
ad3292145fc2 Fixed local PLC runtime kill on aborted quit attempt.
etisserant
parents: 218
diff changeset
   497
        # clear temp dir
ad3292145fc2 Fixed local PLC runtime kill on aborted quit attempt.
etisserant
parents: 218
diff changeset
   498
        shutil.rmtree(self.local_runtime_tmpdir)
ad3292145fc2 Fixed local PLC runtime kill on aborted quit attempt.
etisserant
parents: 218
diff changeset
   499
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   500
        event.Skip()
62
ddf0cdd71558 Adding support for refresh block list where beremiz loose focus
lbessard
parents: 60
diff changeset
   501
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   502
    def OnMoveWindow(self, event):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   503
        self.GetBestSize()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   504
        self.RefreshScrollBars()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   505
        event.Skip()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   506
    
62
ddf0cdd71558 Adding support for refresh block list where beremiz loose focus
lbessard
parents: 60
diff changeset
   507
    def OnFrameActivated(self, event):
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   508
        if not event.GetActive() and self.PluginRoot is not None:
62
ddf0cdd71558 Adding support for refresh block list where beremiz loose focus
lbessard
parents: 60
diff changeset
   509
            self.PluginRoot.RefreshPluginsBlockLists()
ddf0cdd71558 Adding support for refresh block list where beremiz loose focus
lbessard
parents: 60
diff changeset
   510
    
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
   511
    def RefreshMainMenu(self):
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   512
        if self.PluginRoot is not None:
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   513
##            self.MenuBar.EnableTop(1, True)
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   514
##            self.MenuBar.EnableTop(2, True)
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   515
            self.FileMenu.Enable(wx.ID_SAVE, True)
249
a770187273e9 Bug with Open, Reopen and Close Project fixed
lbessard
parents: 248
diff changeset
   516
            self.FileMenu.Enable(wx.ID_CLOSE_ALL, True)
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   517
            self.FileMenu.Enable(wx.ID_PROPERTIES, True)
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   518
        else:
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   519
##            self.MenuBar.EnableTop(1, False)
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   520
##            self.MenuBar.EnableTop(2, False)
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   521
            self.FileMenu.Enable(wx.ID_SAVE, False)
249
a770187273e9 Bug with Open, Reopen and Close Project fixed
lbessard
parents: 248
diff changeset
   522
            self.FileMenu.Enable(wx.ID_CLOSE_ALL, False)
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   523
            self.FileMenu.Enable(wx.ID_PROPERTIES, False)
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   524
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   525
    def RefreshScrollBars(self):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   526
        xstart, ystart = self.PLCConfig.GetViewStart()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   527
        window_size = self.PLCConfig.GetClientSize()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   528
        sizer = self.PLCConfig.GetSizer()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   529
        if sizer:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   530
            maxx, maxy = sizer.GetMinSize()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   531
            self.PLCConfig.SetScrollbars(SCROLLBAR_UNIT, SCROLLBAR_UNIT, 
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
   532
                maxx / SCROLLBAR_UNIT, maxy / SCROLLBAR_UNIT, 
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
   533
                max(0, min(xstart, (maxx - window_size[0]) / SCROLLBAR_UNIT)), 
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
   534
                max(0, min(ystart, (maxy - window_size[1]) / SCROLLBAR_UNIT)))
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   535
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   536
    def RefreshPLCParams(self):
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   537
        self.Freeze()
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   538
        self.ClearSizer(self.PLCParamsSizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   539
        
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   540
        if self.PluginRoot is not None:    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   541
            plcwindow = wx.Panel(self.PLCConfig, -1, size=wx.Size(-1, -1))
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   542
            if self.PluginRoot.PlugTestModified():
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   543
                bkgdclr = CHANGED_TITLE_COLOUR
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   544
            else:
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   545
                bkgdclr = TITLE_COLOUR
129
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   546
                
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   547
            if self.PluginRoot not in self.PluginInfos:
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   548
                self.PluginInfos[self.PluginRoot] = {"middle_visible" : False}
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   549
            
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   550
            plcwindow.SetBackgroundColour(TITLE_COLOUR)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   551
            self.PLCParamsSizer.AddWindow(plcwindow, 0, border=0, flag=wx.GROW)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   552
            
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   553
            plcwindowsizer = wx.BoxSizer(wx.HORIZONTAL)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   554
            plcwindow.SetSizer(plcwindowsizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   555
            
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   556
            st = wx.StaticText(plcwindow, -1)
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   557
            st.SetFont(wx.Font(faces["size"], wx.DEFAULT, wx.NORMAL, wx.BOLD, faceName = faces["helv"]))
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   558
            st.SetLabel(self.PluginRoot.GetProjectName())
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   559
            plcwindowsizer.AddWindow(st, 0, border=5, flag=wx.ALL|wx.ALIGN_CENTER)
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   560
            
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   561
            addbutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   562
            addbutton = wx.lib.buttons.GenBitmapButton(id=addbutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'Add.png')),
197
a50b5fa04c57 SVG/Inkscape based icon generation script + SVG drawing.
etisserant
parents: 193
diff changeset
   563
                  name='AddPluginButton', parent=plcwindow, pos=wx.Point(0, 0),
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   564
                  size=wx.Size(16, 16), style=wx.NO_BORDER)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   565
            addbutton.SetToolTipString("Add a sub plugin")
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   566
            addbutton.Bind(wx.EVT_BUTTON, self.Gen_AddPluginMenu(self.PluginRoot), id=addbutton_id)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   567
            plcwindowsizer.AddWindow(addbutton, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   568
    
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   569
            plcwindowmainsizer = wx.BoxSizer(wx.VERTICAL)
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   570
            plcwindowsizer.AddSizer(plcwindowmainsizer, 0, border=5, flag=wx.ALL)
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   571
            
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   572
            plcwindowbuttonsizer = wx.BoxSizer(wx.HORIZONTAL)
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   573
            plcwindowmainsizer.AddSizer(plcwindowbuttonsizer, 0, border=0, flag=wx.ALIGN_CENTER)
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   574
            
129
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   575
            msizer = self.GenerateMethodButtonSizer(self.PluginRoot, plcwindow, not self.PluginInfos[self.PluginRoot]["middle_visible"])
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   576
            plcwindowbuttonsizer.AddSizer(msizer, 0, border=0, flag=wx.GROW)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   577
            
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   578
            paramswindow = wx.Panel(plcwindow, -1, size=wx.Size(-1, -1))
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   579
            paramswindow.SetBackgroundColour(TITLE_COLOUR)
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   580
            plcwindowbuttonsizer.AddWindow(paramswindow, 0, border=0, flag=0)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   581
            
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   582
            psizer = wx.BoxSizer(wx.HORIZONTAL)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   583
            paramswindow.SetSizer(psizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   584
            
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   585
            plugin_infos = self.PluginRoot.GetParamsAttributes()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   586
            self.RefreshSizerElement(paramswindow, psizer, self.PluginRoot, plugin_infos, None, False)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   587
            
129
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   588
            if not self.PluginInfos[self.PluginRoot]["middle_visible"]:
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   589
                paramswindow.Hide()
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   590
            
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   591
            minimizebutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   592
            minimizebutton = wx.lib.buttons.GenBitmapToggleButton(id=minimizebutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'Maximize.png')),
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   593
                  name='MinimizeButton', parent=plcwindow, pos=wx.Point(0, 0),
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   594
                  size=wx.Size(24, 24), style=wx.NO_BORDER)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   595
            make_genbitmaptogglebutton_flat(minimizebutton)
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   596
            minimizebutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'Minimize.png')))
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   597
            plcwindowbuttonsizer.AddWindow(minimizebutton, 0, border=5, flag=wx.ALL)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   598
            
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   599
#            if len(self.PluginRoot.PlugChildsTypes) > 0:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   600
#                addsizer = self.GenerateAddButtonSizer(self.PluginRoot, plcwindow)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   601
#                plcwindowbuttonsizer.AddSizer(addsizer, 0, border=0, flag=0)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   602
#            else:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   603
#                addsizer = None
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   604
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   605
            def togglewindow(event):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   606
                if minimizebutton.GetToggle():
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   607
                    paramswindow.Show()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   608
                    msizer.SetCols(1)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   609
#                    if addsizer is not None:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   610
#                        addsizer.SetCols(1)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   611
                else:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   612
                    paramswindow.Hide()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   613
                    msizer.SetCols(len(self.PluginRoot.PluginMethods))
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   614
#                    if addsizer is not None:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   615
#                        addsizer.SetCols(len(self.PluginRoot.PlugChildsTypes))
129
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   616
                self.PluginInfos[self.PluginRoot]["middle_visible"] = minimizebutton.GetToggle()
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   617
                self.PLCConfigMainSizer.Layout()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   618
                self.RefreshScrollBars()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   619
                event.Skip()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   620
            minimizebutton.Bind(wx.EVT_BUTTON, togglewindow, id=minimizebutton_id)
101
93e487ccee14 Display bugs on Windows fixed
lbessard
parents: 99
diff changeset
   621
        
129
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   622
            self.PluginInfos[self.PluginRoot]["main"] = plcwindow
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
   623
            self.PluginInfos[self.PluginRoot]["params"] = paramswindow
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   624
            
101
93e487ccee14 Display bugs on Windows fixed
lbessard
parents: 99
diff changeset
   625
        self.PLCConfigMainSizer.Layout()
93e487ccee14 Display bugs on Windows fixed
lbessard
parents: 99
diff changeset
   626
        self.RefreshScrollBars()
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   627
        self.Thaw()
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   628
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   629
#    def GenerateAddButtonSizer(self, plugin, parent, horizontal = True):
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   630
#        if horizontal:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   631
#            addsizer = wx.FlexGridSizer(cols=len(plugin.PluginMethods))
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   632
#        else:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   633
#            addsizer = wx.FlexGridSizer(cols=1)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   634
#        for name, XSDClass, help in plugin.PlugChildsTypes:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   635
#            addbutton_id = wx.NewId()
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   636
#            addbutton = wx.lib.buttons.GenButton(id=addbutton_id, label="Add %s"%help,
197
a50b5fa04c57 SVG/Inkscape based icon generation script + SVG drawing.
etisserant
parents: 193
diff changeset
   637
#                  name='AddPluginButton', parent=parent, pos=wx.Point(0, 0),
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   638
#                  style=wx.NO_BORDER)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   639
#            font = addbutton.GetFont()
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   640
#            font.SetUnderlined(True)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   641
#            addbutton.SetFont(font)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   642
#            addbutton._GetLabelSize = gen_textbutton_GetLabelSize(addbutton)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   643
#            addbutton.SetForegroundColour(wx.BLUE)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   644
#            addbutton.SetToolTipString("Add a \"%s\" plugin to this one"%name)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   645
#            addbutton.Bind(wx.EVT_BUTTON, self._GetAddPluginFunction(name, plugin), id=addbutton_id)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   646
#            addsizer.AddWindow(addbutton, 0, border=0, flag=0)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   647
#        return addsizer
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   648
230
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   649
    normal_bt_font=wx.Font(faces["size"] / 3, wx.DEFAULT, wx.NORMAL, 0, faceName = faces["helv"])
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   650
    mouseover_bt_font=wx.Font(faces["size"] / 3, wx.DEFAULT, wx.NORMAL, 0, underline=True, faceName = faces["helv"])
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   651
    def GenerateMethodButtonSizer(self, plugin, parent, horizontal = True):
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   652
        if horizontal:
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   653
            msizer = wx.FlexGridSizer(cols=len(plugin.PluginMethods))
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   654
        else:
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   655
            msizer = wx.FlexGridSizer(cols=1)
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   656
        for plugin_method in plugin.PluginMethods:
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
   657
            if "method" in plugin_method and plugin_method.get("shown",True):
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   658
                id = wx.NewId()
230
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   659
                label=plugin_method["name"]
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   660
                button = GenBitmapTextButton(id=id, parent=parent,
230
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   661
                    bitmap=wx.Bitmap(Bpath( "%s.png"%plugin_method.get("bitmap", os.path.join("images", "Unknown")))), label=label, 
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   662
                    name=label, pos=wx.DefaultPosition, style=wx.NO_BORDER)
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   663
                button.SetFont(self.normal_bt_font)
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   664
                button.SetToolTipString(plugin_method["tooltip"])
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   665
                button.Bind(wx.EVT_BUTTON, self.GetButtonCallBackFunction(plugin, plugin_method["method"]), id=id)
230
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   666
                # a fancy underline on mouseover
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   667
                def setFontStyle(b, s):
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   668
                    def fn(event):
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   669
                        b.SetFont(s)
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   670
                        b.Refresh()
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   671
                        event.Skip()
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   672
                    return fn
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   673
                button.Bind(wx.EVT_ENTER_WINDOW, setFontStyle(button, self.mouseover_bt_font))
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   674
                button.Bind(wx.EVT_LEAVE_WINDOW, setFontStyle(button, self.normal_bt_font))
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   675
                #hack to force size to mini
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   676
                if not plugin_method.get("enabled",True):
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   677
                    button.Disable()
230
38feaca5f06b Some GUI enhancement. Beremiz now comes with its own GenBitmapTextButton
etisserant
parents: 229
diff changeset
   678
                msizer.AddWindow(button, 0, border=0, flag=wx.ALIGN_CENTER)
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   679
        return msizer
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   680
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   681
    def RefreshPluginTree(self):
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   682
        self.Freeze()
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   683
        self.ClearSizer(self.PluginTreeSizer)
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
   684
        if self.PluginRoot is not None:
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   685
            for child in self.PluginRoot.IECSortedChilds():
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   686
                self.GenerateTreeBranch(child)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   687
                if not self.PluginInfos[child]["expanded"]:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   688
                    self.CollapsePlugin(child)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   689
        self.PLCConfigMainSizer.Layout()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   690
        self.RefreshScrollBars()
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   691
        self.Thaw()
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   692
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   693
    def SetPluginParamsAttribute(self, plugin, *args, **kwargs):
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   694
        res, StructChanged = plugin.SetParamsAttribute(*args, **kwargs)
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   695
        if StructChanged:
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   696
            wx.CallAfter(self.RefreshPluginTree)
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   697
        else:
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   698
            if plugin == self.PluginRoot:
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   699
                bkgdclr = CHANGED_TITLE_COLOUR
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   700
                items = ["main", "params"]
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   701
            else:
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   702
                bkgdclr = CHANGED_WINDOW_COLOUR
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   703
                items = ["left", "middle", "params"]
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   704
            for i in items:
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   705
                self.PluginInfos[plugin][i].SetBackgroundColour(bkgdclr)
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   706
                self.PluginInfos[plugin][i].Refresh()
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   707
        return res
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   708
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   709
    def ExpandPlugin(self, plugin, force = False):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   710
        for child in self.PluginInfos[plugin]["children"]:
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   711
            self.PluginInfos[child]["left"].Show()
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   712
            self.PluginInfos[child]["middle"].Show()
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   713
#            self.PluginTreeSizer.Show(self.PluginInfos[child]["right"])
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   714
            if force or not self.PluginInfos[child]["expanded"]:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   715
                self.ExpandPlugin(child, force)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   716
                if force:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   717
                    self.PluginInfos[child]["expanded"] = True
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   718
    
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   719
    def CollapsePlugin(self, plugin, force = False):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   720
        for child in self.PluginInfos[plugin]["children"]:
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   721
            self.PluginInfos[child]["left"].Hide()
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   722
            self.PluginInfos[child]["middle"].Hide()
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   723
#            self.PluginTreeSizer.Hide(self.PluginInfos[child]["right"])
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   724
            if force or self.PluginInfos[child]["expanded"]:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   725
                self.CollapsePlugin(child, force)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   726
                if force:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   727
                    self.PluginInfos[child]["expanded"] = False
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   728
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   729
    def GenerateTreeBranch(self, plugin):
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   730
        leftwindow = wx.Panel(self.PLCConfig, -1, size=wx.Size(-1, -1))
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   731
        if plugin.PlugTestModified():
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   732
            bkgdclr=CHANGED_WINDOW_COLOUR
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   733
        else:
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   734
            bkgdclr=WINDOW_COLOUR
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   735
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   736
        leftwindow.SetBackgroundColour(bkgdclr)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   737
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   738
        if plugin not in self.PluginInfos:
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   739
            self.PluginInfos[plugin] = {"expanded" : False, "left_visible" : False, "middle_visible" : False}
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   740
            
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   741
        self.PluginInfos[plugin]["children"] = plugin.IECSortedChilds()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   742
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   743
        self.PluginTreeSizer.AddWindow(leftwindow, 0, border=0, flag=wx.GROW)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   744
        
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   745
        leftwindowsizer = wx.FlexGridSizer(cols=1, rows=3)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   746
        leftwindowsizer.AddGrowableCol(0)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   747
        leftwindowsizer.AddGrowableRow(2)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   748
        leftwindow.SetSizer(leftwindowsizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   749
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   750
        leftbuttonmainsizer = wx.FlexGridSizer(cols=3, rows=1)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   751
        leftbuttonmainsizer.AddGrowableCol(0)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   752
        leftwindowsizer.AddSizer(leftbuttonmainsizer, 0, border=5, flag=wx.GROW|wx.LEFT|wx.RIGHT) #|wx.TOP
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   753
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   754
        leftbuttonsizer = wx.BoxSizer(wx.HORIZONTAL)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   755
        leftbuttonmainsizer.AddSizer(leftbuttonsizer, 0, border=5, flag=wx.GROW|wx.RIGHT)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   756
        
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   757
        leftsizer = wx.BoxSizer(wx.VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   758
        leftbuttonsizer.AddSizer(leftsizer, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   759
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   760
        rolesizer = wx.BoxSizer(wx.HORIZONTAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   761
        leftsizer.AddSizer(rolesizer, 0, border=0, flag=wx.GROW|wx.RIGHT)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   762
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   763
        enablebutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   764
        enablebutton = wx.lib.buttons.GenBitmapToggleButton(id=enablebutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'Disabled.png')),
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   765
              name='EnableButton', parent=leftwindow, size=wx.Size(16, 16), pos=wx.Point(0, 0), style=0)#wx.NO_BORDER)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   766
        enablebutton.SetToolTipString("Enable/Disable this plugin")
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   767
        make_genbitmaptogglebutton_flat(enablebutton)
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   768
        enablebutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'Enabled.png')))
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   769
        enablebutton.SetToggle(plugin.MandatoryParams[1].getEnabled())
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   770
        def toggleenablebutton(event):
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
   771
            res = self.SetPluginParamsAttribute(plugin, "BaseParams.Enabled", enablebutton.GetToggle())
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   772
            enablebutton.SetToggle(res)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   773
            event.Skip()
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   774
        enablebutton.Bind(wx.EVT_BUTTON, toggleenablebutton, id=enablebutton_id)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   775
        rolesizer.AddWindow(enablebutton, 0, border=0, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   776
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   777
        roletext = wx.StaticText(leftwindow, -1)
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   778
        roletext.SetLabel(plugin.PlugHelp)
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   779
        rolesizer.AddWindow(roletext, 0, border=5, flag=wx.RIGHT|wx.ALIGN_LEFT)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   780
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   781
        plugin_IECChannel = plugin.BaseParams.getIEC_Channel()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   782
        
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   783
        iecsizer = wx.BoxSizer(wx.HORIZONTAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   784
        leftsizer.AddSizer(iecsizer, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   785
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   786
        st = wx.StaticText(leftwindow, -1)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   787
        st.SetFont(wx.Font(faces["size"], wx.DEFAULT, wx.NORMAL, wx.BOLD, faceName = faces["helv"]))
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   788
        st.SetLabel(plugin.GetFullIEC_Channel())
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   789
        iecsizer.AddWindow(st, 0, border=0, flag=0)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   790
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   791
        updownsizer = wx.BoxSizer(wx.VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   792
        iecsizer.AddSizer(updownsizer, 0, border=5, flag=wx.LEFT|wx.ALIGN_CENTER_VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   793
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   794
        if plugin_IECChannel > 0:
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   795
            ieccdownbutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   796
            ieccdownbutton = wx.lib.buttons.GenBitmapButton(id=ieccdownbutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'IECCDown.png')),
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   797
                  name='IECCDownButton', parent=leftwindow, pos=wx.Point(0, 0),
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   798
                  size=wx.Size(16, 16), style=wx.NO_BORDER)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   799
            ieccdownbutton.Bind(wx.EVT_BUTTON, self.GetItemChannelChangedFunction(plugin, plugin_IECChannel - 1), id=ieccdownbutton_id)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   800
            updownsizer.AddWindow(ieccdownbutton, 0, border=0, flag=wx.ALIGN_LEFT)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   801
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   802
        ieccupbutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   803
        ieccupbutton = wx.lib.buttons.GenBitmapTextButton(id=ieccupbutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'IECCUp.png')),
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   804
              name='IECCUpButton', parent=leftwindow, pos=wx.Point(0, 0),
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   805
              size=wx.Size(16, 16), style=wx.NO_BORDER)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   806
        ieccupbutton.Bind(wx.EVT_BUTTON, self.GetItemChannelChangedFunction(plugin, plugin_IECChannel + 1), id=ieccupbutton_id)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   807
        updownsizer.AddWindow(ieccupbutton, 0, border=0, flag=wx.ALIGN_LEFT)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   808
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   809
        adddeletesizer = wx.BoxSizer(wx.VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   810
        iecsizer.AddSizer(adddeletesizer, 0, border=5, flag=wx.LEFT|wx.ALIGN_CENTER_VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   811
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   812
        deletebutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   813
        deletebutton = wx.lib.buttons.GenBitmapButton(id=deletebutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'Delete.png')),
197
a50b5fa04c57 SVG/Inkscape based icon generation script + SVG drawing.
etisserant
parents: 193
diff changeset
   814
              name='DeletePluginButton', parent=leftwindow, pos=wx.Point(0, 0),
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   815
              size=wx.Size(16, 16), style=wx.NO_BORDER)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   816
        deletebutton.SetToolTipString("Delete this plugin")
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   817
        deletebutton.Bind(wx.EVT_BUTTON, self.GetDeleteButtonFunction(plugin), id=deletebutton_id)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   818
        adddeletesizer.AddWindow(deletebutton, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   819
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   820
        if len(plugin.PlugChildsTypes) > 0:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   821
            addbutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   822
            addbutton = wx.lib.buttons.GenBitmapButton(id=addbutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'Add.png')),
197
a50b5fa04c57 SVG/Inkscape based icon generation script + SVG drawing.
etisserant
parents: 193
diff changeset
   823
                  name='AddPluginButton', parent=leftwindow, pos=wx.Point(0, 0),
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   824
                  size=wx.Size(16, 16), style=wx.NO_BORDER)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   825
            addbutton.SetToolTipString("Add a sub plugin")
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   826
            addbutton.Bind(wx.EVT_BUTTON, self.Gen_AddPluginMenu(plugin), id=addbutton_id)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   827
            adddeletesizer.AddWindow(addbutton, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   828
        
199
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   829
        expandbutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   830
        expandbutton = wx.lib.buttons.GenBitmapToggleButton(id=expandbutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'plus.png')),
199
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   831
              name='ExpandButton', parent=leftwindow, pos=wx.Point(0, 0),
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   832
              size=wx.Size(13, 13), style=wx.NO_BORDER)
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   833
        expandbutton.labelDelta = 0
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   834
        expandbutton.SetBezelWidth(0)
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   835
        expandbutton.SetUseFocusIndicator(False)
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   836
        expandbutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'minus.png')))
199
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   837
        expandbutton.SetToggle(self.PluginInfos[plugin]["expanded"])
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   838
            
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   839
        if len(self.PluginInfos[plugin]["children"]) > 0:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   840
            def togglebutton(event):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   841
                if expandbutton.GetToggle():
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   842
                    self.ExpandPlugin(plugin)
89
0ab2868c6aa6 Added right aligment of parameteres blocks
etisserant
parents: 88
diff changeset
   843
                else:
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   844
                    self.CollapsePlugin(plugin)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   845
                self.PluginInfos[plugin]["expanded"] = expandbutton.GetToggle()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   846
                self.PLCConfigMainSizer.Layout()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   847
                self.RefreshScrollBars()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   848
                event.Skip()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   849
            expandbutton.Bind(wx.EVT_BUTTON, togglebutton, id=expandbutton_id)
199
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   850
        else:
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   851
            expandbutton.Enable(False)
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   852
        iecsizer.AddWindow(expandbutton, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   853
        
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   854
        tc_id = wx.NewId()
199
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   855
        tc = wx.TextCtrl(leftwindow, tc_id, size=wx.Size(150, 25), style=wx.NO_BORDER)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   856
        tc.SetFont(wx.Font(faces["size"] * 0.75, wx.DEFAULT, wx.NORMAL, wx.BOLD, faceName = faces["helv"]))
214
b4531bf9bdb3 Modification in catched wxTextCtrl events
lbessard
parents: 203
diff changeset
   857
        tc.ChangeValue(plugin.MandatoryParams[1].getName())
b4531bf9bdb3 Modification in catched wxTextCtrl events
lbessard
parents: 203
diff changeset
   858
        tc.Bind(wx.EVT_TEXT, self.GetTextCtrlCallBackFunction(tc, plugin, "BaseParams.Name"), id=tc_id)
199
aa5f43bafad4 minor gui improvements :
etisserant
parents: 197
diff changeset
   859
        iecsizer.AddWindow(tc, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER_VERTICAL)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   860
       
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   861
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   862
        leftminimizebutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   863
        leftminimizebutton = wx.lib.buttons.GenBitmapToggleButton(id=leftminimizebutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'ShowVars.png')),
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   864
              name='MinimizeButton', parent=leftwindow, pos=wx.Point(0, 0),
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   865
              size=wx.Size(24, 24), style=wx.NO_BORDER)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   866
        make_genbitmaptogglebutton_flat(leftminimizebutton)
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   867
        leftminimizebutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'HideVars.png')))
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   868
        leftminimizebutton.SetToggle(self.PluginInfos[plugin]["left_visible"])
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   869
        def toggleleftwindow(event):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   870
            if leftminimizebutton.GetToggle():
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   871
                leftwindowsizer.Show(1)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   872
            else:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   873
                leftwindowsizer.Hide(1)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   874
            self.PluginInfos[plugin]["left_visible"] = leftminimizebutton.GetToggle()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   875
            self.PLCConfigMainSizer.Layout()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   876
            self.RefreshScrollBars()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   877
            event.Skip()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   878
        leftminimizebutton.Bind(wx.EVT_BUTTON, toggleleftwindow, id=leftminimizebutton_id)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   879
        leftbuttonmainsizer.AddWindow(leftminimizebutton, 0, border=5, flag=wx.RIGHT|wx.ALIGN_CENTER)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   880
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   881
        locations = plugin.GetLocations()
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   882
        lb = wx.ListBox(leftwindow, -1, size=wx.Size(-1, max(1, min(len(locations), 4)) * 25), style=wx.NO_BORDER)
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   883
        for location in locations:
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   884
            lb.Append(location["NAME"].replace("__", "%").replace("_", "."))
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   885
        if not self.PluginInfos[plugin]["left_visible"]:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   886
            lb.Hide()
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   887
        self.PluginInfos[plugin]["variable_list"] = lb
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   888
        leftwindowsizer.AddWindow(lb, 0, border=5, flag=wx.GROW|wx.LEFT|wx.RIGHT|wx.BOTTOM)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   889
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   890
        middlewindow = wx.Panel(self.PLCConfig, -1, size=wx.Size(-1, -1))
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   891
        middlewindow.SetBackgroundColour(bkgdclr)
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   892
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   893
        self.PluginTreeSizer.AddWindow(middlewindow, 0, border=0, flag=wx.GROW)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   894
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   895
        middlewindowmainsizer = wx.BoxSizer(wx.VERTICAL)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   896
        middlewindow.SetSizer(middlewindowmainsizer)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   897
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   898
        middlewindowsizer = wx.FlexGridSizer(cols=2, rows=1)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   899
        middlewindowsizer.AddGrowableCol(1)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   900
        middlewindowsizer.AddGrowableRow(0)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   901
        middlewindowmainsizer.AddSizer(middlewindowsizer, 0, border=8, flag=wx.TOP|wx.GROW)
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   902
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   903
        msizer = self.GenerateMethodButtonSizer(plugin, middlewindow, not self.PluginInfos[plugin]["middle_visible"])
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   904
        middlewindowsizer.AddSizer(msizer, 0, border=0, flag=wx.GROW)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   905
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   906
        middleparamssizer = wx.BoxSizer(wx.HORIZONTAL)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   907
        middlewindowsizer.AddSizer(middleparamssizer, 0, border=0, flag=wx.ALIGN_RIGHT)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   908
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   909
        paramswindow = wx.Panel(middlewindow, -1, size=wx.Size(-1, -1))
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   910
        paramswindow.SetBackgroundColour(bkgdclr)
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   911
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   912
        psizer = wx.BoxSizer(wx.HORIZONTAL)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   913
        paramswindow.SetSizer(psizer)
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   914
        self.PluginInfos[plugin]["params"] = paramswindow
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   915
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   916
        middleparamssizer.AddWindow(paramswindow, 0, border=5, flag=wx.ALL)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   917
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   918
        plugin_infos = plugin.GetParamsAttributes()
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   919
        self.RefreshSizerElement(paramswindow, psizer, plugin, plugin_infos, None, False)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   920
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   921
        if not self.PluginInfos[plugin]["middle_visible"]:
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   922
            paramswindow.Hide()
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   923
        
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   924
        middleminimizebutton_id = wx.NewId()
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   925
        middleminimizebutton = wx.lib.buttons.GenBitmapToggleButton(id=middleminimizebutton_id, bitmap=wx.Bitmap(Bpath( 'images', 'Maximize.png')),
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   926
              name='MinimizeButton', parent=middlewindow, pos=wx.Point(0, 0),
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   927
              size=wx.Size(24, 24), style=wx.NO_BORDER)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   928
        make_genbitmaptogglebutton_flat(middleminimizebutton)
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
   929
        middleminimizebutton.SetBitmapSelected(wx.Bitmap(Bpath( 'images', 'Minimize.png')))
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   930
        middleminimizebutton.SetToggle(self.PluginInfos[plugin]["middle_visible"])
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   931
        middleparamssizer.AddWindow(middleminimizebutton, 0, border=5, flag=wx.ALL)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   932
        
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   933
#        rightwindow = wx.Panel(self.PLCConfig, -1, size=wx.Size(-1, -1))
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   934
#        rightwindow.SetBackgroundColour(wx.Colour(240,240,240))
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   935
#        
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   936
#        self.PluginTreeSizer.AddWindow(rightwindow, 0, border=0, flag=wx.GROW)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   937
#        
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   938
#        rightsizer = wx.BoxSizer(wx.VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   939
#        rightwindow.SetSizer(rightsizer)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   940
#        
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   941
#        rightmainsizer = wx.BoxSizer(wx.VERTICAL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   942
#        rightsizer.AddSizer(rightmainsizer, 0, border=5, flag=wx.ALL)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   943
#        
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   944
#        if len(plugin.PlugChildsTypes) > 0:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   945
#            addsizer = self.GenerateAddButtonSizer(plugin, rightwindow)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   946
#            rightmainsizer.AddSizer(addsizer, 0, border=4, flag=wx.TOP)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   947
#        else:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   948
#            addsizer = None
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   949
            
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   950
        def togglemiddlerightwindow(event):
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   951
            if middleminimizebutton.GetToggle():
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   952
                middleparamssizer.Show(0)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   953
                msizer.SetCols(1)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   954
#                if addsizer is not None:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   955
#                    addsizer.SetCols(1)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   956
            else:
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   957
                middleparamssizer.Hide(0)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   958
                msizer.SetCols(len(plugin.PluginMethods))
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   959
#                if addsizer is not None:
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
   960
#                    addsizer.SetCols(len(plugin.PlugChildsTypes))
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   961
            self.PluginInfos[plugin]["middle_visible"] = middleminimizebutton.GetToggle()
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   962
            self.PLCConfigMainSizer.Layout()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   963
            self.RefreshScrollBars()
84
8bc2669828e9 Plugin Tree Drawing bug hacked
lbessard
parents: 83
diff changeset
   964
            event.Skip()
99
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   965
        middleminimizebutton.Bind(wx.EVT_BUTTON, togglemiddlerightwindow, id=middleminimizebutton_id)
e5e9cb0f027f Beremiz layout improved
lbessard
parents: 98
diff changeset
   966
        
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   967
        self.PluginInfos[plugin]["left"] = leftwindow
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   968
        self.PluginInfos[plugin]["middle"] = middlewindow
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   969
#        self.PluginInfos[plugin]["right"] = rightwindow
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   970
        for child in self.PluginInfos[plugin]["children"]:
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
   971
            self.GenerateTreeBranch(child)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   972
            if not self.PluginInfos[child]["expanded"]:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   973
                self.CollapsePlugin(child)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   974
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   975
    def RefreshVariableLists(self):
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   976
        for plugin, infos in self.PluginInfos.items():
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   977
            locations = plugin.GetLocations()
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   978
            infos["variable_list"].SetSize(wx.Size(-1, max(1, min(len(locations), 4)) * 25))
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   979
            infos["variable_list"].Clear()
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   980
            for location in locations:
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   981
                infos["variable_list"].Append(location["NAME"].replace("__", "%").replace("_", "."))
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   982
        self.PLCConfigMainSizer.Layout()
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   983
        self.RefreshScrollBars()
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   984
        
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   985
    def RefreshAll(self):
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   986
        self.RefreshPLCParams()
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   987
        self.RefreshPluginTree()
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
   988
        
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   989
    def GetItemChannelChangedFunction(self, plugin, value):
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   990
        def OnPluginTreeItemChannelChanged(event):
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
   991
            res = self.SetPluginParamsAttribute(plugin, "BaseParams.IEC_Channel", value)
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   992
            event.Skip()
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   993
        return OnPluginTreeItemChannelChanged
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
   994
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
   995
    def _GetAddPluginFunction(self, name, plugin):
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   996
        def OnPluginMenu(event):
98
d359f0e7a97c Beremiz layout improved
lbessard
parents: 97
diff changeset
   997
            wx.CallAfter(self.AddPlugin, name, plugin)
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   998
            event.Skip()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
   999
        return OnPluginMenu
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1000
    
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1001
    def Gen_AddPluginMenu(self, plugin):
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1002
        def AddPluginMenu(event):
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1003
            main_menu = wx.Menu(title='')
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1004
            if len(plugin.PlugChildsTypes) > 0:
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1005
                for name, XSDClass, help in plugin.PlugChildsTypes:
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1006
                    new_id = wx.NewId()
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1007
                    main_menu.Append(help=help, id=new_id, kind=wx.ITEM_NORMAL, text="Append "+help)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1008
                    self.Bind(wx.EVT_MENU, self._GetAddPluginFunction(name, plugin), id=new_id)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1009
            self.PopupMenuXY(main_menu)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1010
            event.Skip()
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1011
        return AddPluginMenu
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1012
    
21
bded6d31365c Adding buttons for plugins
lbessard
parents: 20
diff changeset
  1013
    def GetButtonCallBackFunction(self, plugin, method):
110
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
  1014
        """ Generate the callbackfunc for a given plugin method"""
21
bded6d31365c Adding buttons for plugins
lbessard
parents: 20
diff changeset
  1015
        def OnButtonClick(event):
110
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
  1016
            # Disable button to prevent re-entrant call 
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
  1017
            event.GetEventObject().Disable()
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
  1018
            # Call
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
  1019
            getattr(plugin,method)()
110
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
  1020
            # Re-enable button 
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
  1021
            event.GetEventObject().Enable()
a05e8b30c024 Fixed way apps are launched in parralel with single log window... Tested in win32 only.
etisserant
parents: 109
diff changeset
  1022
            # Trigger refresh on Idle
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1023
            wx.CallAfter(self.RefreshAll)
21
bded6d31365c Adding buttons for plugins
lbessard
parents: 20
diff changeset
  1024
            event.Skip()
bded6d31365c Adding buttons for plugins
lbessard
parents: 20
diff changeset
  1025
        return OnButtonClick
bded6d31365c Adding buttons for plugins
lbessard
parents: 20
diff changeset
  1026
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1027
    def GetChoiceCallBackFunction(self, choicectrl, plugin, path):
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1028
        def OnChoiceChanged(event):
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
  1029
            res = self.SetPluginParamsAttribute(plugin, path, choicectrl.GetStringSelection())
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1030
            choicectrl.SetStringSelection(res)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1031
            event.Skip()
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1032
        return OnChoiceChanged
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1033
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1034
    def GetChoiceContentCallBackFunction(self, choicectrl, staticboxsizer, plugin, path):
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1035
        def OnChoiceContentChanged(event):
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
  1036
            res = self.SetPluginParamsAttribute(plugin, path, choicectrl.GetStringSelection())
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1037
            if wx.VERSION < (2, 8, 0):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1038
                self.ParamsPanel.Freeze()
129
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
  1039
                choicectrl.SetStringSelection(res)
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
  1040
                infos = self.PluginRoot.GetParamsAttributes(path)
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
  1041
                staticbox = staticboxsizer.GetStaticBox()
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
  1042
                staticbox.SetLabel("%(name)s - %(value)s"%infos)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1043
                self.RefreshSizerElement(self.ParamsPanel, staticboxsizer, infos["children"], "%s.%s"%(path, infos["name"]), selected=selected)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1044
                self.ParamsPanelMainSizer.Layout()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1045
                self.ParamsPanel.Thaw()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1046
                self.ParamsPanel.Refresh()
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1047
            else:
129
ec54cd416528 Bug with Target Type modification fixed
lbessard
parents: 127
diff changeset
  1048
                wx.CallAfter(self.RefreshAll)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1049
            event.Skip()
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1050
        return OnChoiceContentChanged
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1051
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1052
    def GetTextCtrlCallBackFunction(self, textctrl, plugin, path):
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1053
        def OnTextCtrlChanged(event):
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
  1054
            res = self.SetPluginParamsAttribute(plugin, path, textctrl.GetValue())
214
b4531bf9bdb3 Modification in catched wxTextCtrl events
lbessard
parents: 203
diff changeset
  1055
            if res != textctrl.GetValue():
b4531bf9bdb3 Modification in catched wxTextCtrl events
lbessard
parents: 203
diff changeset
  1056
                textctrl.ChangeValue(res)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1057
            event.Skip()
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1058
        return OnTextCtrlChanged
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1059
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1060
    def GetCheckBoxCallBackFunction(self, chkbx, plugin, path):
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1061
        def OnCheckBoxChanged(event):
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
  1062
            res = self.SetPluginParamsAttribute(plugin, path, chkbx.IsChecked())
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1063
            chkbx.SetValue(res)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1064
            event.Skip()
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1065
        return OnCheckBoxChanged
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1066
    
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1067
    def ClearSizer(self, sizer):
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1068
        staticboxes = []
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1069
        for item in sizer.GetChildren():
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1070
            if item.IsSizer():
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1071
                item_sizer = item.GetSizer()
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1072
                self.ClearSizer(item_sizer)
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1073
                if isinstance(item_sizer, wx.StaticBoxSizer):
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1074
                    staticboxes.append(item_sizer.GetStaticBox())
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1075
        sizer.Clear(True)
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1076
        for staticbox in staticboxes:
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1077
            staticbox.Destroy()
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1078
                
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1079
    def RefreshSizerElement(self, parent, sizer, plugin, elements, path, clean = True):
25
fa7503684c28 Adding support for using Networkedit et PLCOpenEditor in Beremiz
lbessard
parents: 24
diff changeset
  1080
        if clean:
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1081
            if wx.VERSION < (2, 8, 0):
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1082
                self.ClearSizer(sizer)
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1083
            else:
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1084
                sizer.Clear(True)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1085
        first = True
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1086
        for element_infos in elements:
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1087
            if path:
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1088
                element_path = "%s.%s"%(path, element_infos["name"])
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1089
            else:
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1090
                element_path = element_infos["name"]
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1091
            if element_infos["type"] == "element":
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1092
                staticbox = wx.StaticBox(id=-1, label=element_infos["name"], 
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1093
                    name='%s_staticbox'%element_infos["name"], parent=parent,
193
ca6ad333aa80 Warning with StaticBoxSizer fixed
lbessard
parents: 188
diff changeset
  1094
                    pos=wx.Point(0, 0), size=wx.Size(10, 0), style=0)
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1095
                staticboxsizer = wx.StaticBoxSizer(staticbox, wx.VERTICAL)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1096
                if first:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1097
                    sizer.AddSizer(staticboxsizer, 0, border=0, flag=wx.GROW|wx.TOP)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1098
                else:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1099
                    sizer.AddSizer(staticboxsizer, 0, border=0, flag=wx.GROW)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1100
                self.RefreshSizerElement(parent, staticboxsizer, plugin, element_infos["children"], element_path)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1101
            else:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1102
                boxsizer = wx.FlexGridSizer(cols=3, rows=1)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1103
                boxsizer.AddGrowableCol(1)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1104
                if first:
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1105
                    sizer.AddSizer(boxsizer, 0, border=5, flag=wx.GROW|wx.ALL)
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1106
                else:
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1107
                    sizer.AddSizer(boxsizer, 0, border=5, flag=wx.GROW|wx.LEFT|wx.RIGHT|wx.BOTTOM)
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1108
                staticbitmap = GenStaticBitmap(ID=-1, bitmapname="%s.png"%element_infos["name"],
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1109
                    name="%s_bitmap"%element_infos["name"], parent=parent,
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1110
                    pos=wx.Point(0, 0), size=wx.Size(24, 24), style=0)
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1111
                boxsizer.AddWindow(staticbitmap, 0, border=5, flag=wx.RIGHT)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1112
                statictext = wx.StaticText(id=-1, label="%s:"%element_infos["name"], 
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1113
                    name="%s_label"%element_infos["name"], parent=parent, 
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1114
                    pos=wx.Point(0, 0), size=wx.Size(100, 17), style=0)
67
862da764c5b5 Layout changed for making buttons at top of the frame always visible
lbessard
parents: 65
diff changeset
  1115
                boxsizer.AddWindow(statictext, 0, border=4, flag=wx.TOP)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1116
                id = wx.NewId()
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1117
                if isinstance(element_infos["type"], types.ListType):
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1118
                    choicectrl = wx.Choice(id=id, name=element_infos["name"], parent=parent, 
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1119
                        pos=wx.Point(0, 0), size=wx.Size(150, 25), style=0)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1120
                    boxsizer.AddWindow(choicectrl, 0, border=0, flag=0)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1121
                    if element_infos["use"] == "optional":
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1122
                        choicectrl.Append("")
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1123
                    if len(element_infos["type"]) > 0 and isinstance(element_infos["type"][0], types.TupleType):
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1124
                        for choice, xsdclass in element_infos["type"]:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1125
                            choicectrl.Append(choice)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1126
                        staticbox = wx.StaticBox(id=-1, label="%(name)s - %(value)s"%element_infos, 
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1127
                            name='%s_staticbox'%element_infos["name"], parent=parent,
193
ca6ad333aa80 Warning with StaticBoxSizer fixed
lbessard
parents: 188
diff changeset
  1128
                            pos=wx.Point(0, 0), size=wx.Size(10, 0), style=0)
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1129
                        staticboxsizer = wx.StaticBoxSizer(staticbox, wx.VERTICAL)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1130
                        sizer.AddSizer(staticboxsizer, 0, border=5, flag=wx.GROW|wx.BOTTOM)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1131
                        self.RefreshSizerElement(parent, staticboxsizer, plugin, element_infos["children"], element_path)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1132
                        callback = self.GetChoiceContentCallBackFunction(choicectrl, staticboxsizer, plugin, element_path)
23
e007d9d466d7 minor fixes
etisserant
parents: 22
diff changeset
  1133
                    else:
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1134
                        for choice in element_infos["type"]:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1135
                            choicectrl.Append(choice)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1136
                        callback = self.GetChoiceCallBackFunction(choicectrl, plugin, element_path)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1137
                    if element_infos["value"] is None:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1138
                        choicectrl.SetStringSelection("")
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1139
                    else:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1140
                        choicectrl.SetStringSelection(element_infos["value"])
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1141
                    choicectrl.Bind(wx.EVT_CHOICE, callback, id=id)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1142
                elif isinstance(element_infos["type"], types.DictType):
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1143
                    scmin = -(2**31)
23
e007d9d466d7 minor fixes
etisserant
parents: 22
diff changeset
  1144
                    scmax = 2**31-1
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1145
                    if "min" in element_infos["type"]:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1146
                        scmin = element_infos["type"]["min"]
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1147
                    if "max" in element_infos["type"]:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1148
                        scmax = element_infos["type"]["max"]
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1149
                    spinctrl = wx.SpinCtrl(id=id, name=element_infos["name"], parent=parent, 
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1150
                        pos=wx.Point(0, 0), size=wx.Size(150, 25), style=wx.SP_ARROW_KEYS|wx.ALIGN_RIGHT)
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1151
                    spinctrl.SetRange(scmin,scmax)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1152
                    boxsizer.AddWindow(spinctrl, 0, border=0, flag=0)
28
848ce4b1f9e4 Disabled unused run/edit menu, fixed some event/refresh machanisms
etisserant
parents: 25
diff changeset
  1153
                    spinctrl.SetValue(element_infos["value"])
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1154
                    spinctrl.Bind(wx.EVT_SPINCTRL, self.GetTextCtrlCallBackFunction(spinctrl, plugin, element_path), id=id)
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1155
                else:
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1156
                    if element_infos["type"] == "boolean":
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1157
                        checkbox = wx.CheckBox(id=id, name=element_infos["name"], parent=parent, 
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1158
                            pos=wx.Point(0, 0), size=wx.Size(17, 25), style=0)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1159
                        boxsizer.AddWindow(checkbox, 0, border=0, flag=0)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1160
                        checkbox.SetValue(element_infos["value"])
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1161
                        checkbox.Bind(wx.EVT_CHECKBOX, self.GetCheckBoxCallBackFunction(checkbox, plugin, element_path), id=id)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1162
                    elif element_infos["type"] in ["unsignedLong", "long","integer"]:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1163
                        if element_infos["type"].startswith("unsigned"):
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1164
                            scmin = 0
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1165
                        else:
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1166
                            scmin = -(2**31)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1167
                        scmax = 2**31-1
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1168
                        spinctrl = wx.SpinCtrl(id=id, name=element_infos["name"], parent=parent, 
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1169
                            pos=wx.Point(0, 0), size=wx.Size(150, 25), style=wx.SP_ARROW_KEYS|wx.ALIGN_RIGHT)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1170
                        spinctrl.SetRange(scmin, scmax)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1171
                        boxsizer.AddWindow(spinctrl, 0, border=0, flag=0)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1172
                        spinctrl.SetValue(element_infos["value"])
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1173
                        spinctrl.Bind(wx.EVT_SPINCTRL, self.GetTextCtrlCallBackFunction(spinctrl, plugin, element_path), id=id)
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1174
                    else:
268
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1175
                        choices = cPickle.loads(str(config.Read(element_path, cPickle.dumps([""]))))                           
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1176
                        textctrl = TextCtrlAutoComplete.TextCtrlAutoComplete(id=id, 
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1177
                                                                     name=element_infos["name"], 
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1178
                                                                     parent=parent, 
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1179
                                                                     choices=choices, 
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1180
                                                                     selectCallback = None,
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1181
                                                                     element_path=element_path,
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1182
                                                                     pos=wx.Point(0, 0), 
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1183
                                                                     size=wx.Size(150, 25), 
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1184
                                                                     style=0)
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1185
                        
188
e152b46cd9b0 Removing empty choice when parameter isn't optional
lbessard
parents: 176
diff changeset
  1186
                        boxsizer.AddWindow(textctrl, 0, border=0, flag=0)
214
b4531bf9bdb3 Modification in catched wxTextCtrl events
lbessard
parents: 203
diff changeset
  1187
                        textctrl.ChangeValue(str(element_infos["value"]))
b4531bf9bdb3 Modification in catched wxTextCtrl events
lbessard
parents: 203
diff changeset
  1188
                        textctrl.Bind(wx.EVT_TEXT, self.GetTextCtrlCallBackFunction(textctrl, plugin, element_path))
19
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1189
            first = False
73257cea38bd Adding Plugin params visualization with basic controls
lbessard
parents: 18
diff changeset
  1190
    
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1191
    def OnNewProjectMenu(self, event):
257
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1192
        if not config.HasEntry("lastopenedfolder"):
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1193
            defaultpath = os.path.expanduser("~")
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1194
        else:
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1195
            defaultpath = config.Read("lastopenedfolder")
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
  1196
        
4
e9d061c23e83 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 3
diff changeset
  1197
        dialog = wx.DirDialog(self , "Choose a project", defaultpath, wx.DD_NEW_DIR_BUTTON)
e9d061c23e83 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 3
diff changeset
  1198
        if dialog.ShowModal() == wx.ID_OK:
258
54c02b82da5f fixed bug with config
greg
parents: 257
diff changeset
  1199
            projectpath = dialog.GetPath()
54c02b82da5f fixed bug with config
greg
parents: 257
diff changeset
  1200
            dialog.Destroy()
257
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1201
            config.Write("lastopenedfolder", os.path.dirname(projectpath))
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1202
            config.Flush()
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1203
            self.PluginRoot = PluginsRoot(self, self.Log, self.runtime_port)
20
d3cb5020997b Beremiz plugins definitions.
etisserant
parents: 19
diff changeset
  1204
            res = self.PluginRoot.NewProject(projectpath)
d3cb5020997b Beremiz plugins definitions.
etisserant
parents: 19
diff changeset
  1205
            if not res :
268
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1206
                self.RefreshAll()
20
d3cb5020997b Beremiz plugins definitions.
etisserant
parents: 19
diff changeset
  1207
                self.RefreshMainMenu()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1208
            else:
20
d3cb5020997b Beremiz plugins definitions.
etisserant
parents: 19
diff changeset
  1209
                message = wx.MessageDialog(self, res, "ERROR", wx.OK|wx.ICON_ERROR)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1210
                message.ShowModal()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1211
                message.Destroy()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1212
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1213
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1214
    def OnOpenProjectMenu(self, event):
257
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1215
        if not config.HasEntry("lastopenedfolder"):
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1216
            defaultpath = os.path.expanduser("~")
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1217
        else:
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1218
            defaultpath = config.Read("lastopenedfolder")
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
  1219
        
4
e9d061c23e83 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 3
diff changeset
  1220
        dialog = wx.DirDialog(self , "Choose a project", defaultpath, wx.DD_NEW_DIR_BUTTON)
e9d061c23e83 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 3
diff changeset
  1221
        if dialog.ShowModal() == wx.ID_OK:
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1222
            projectpath = dialog.GetPath()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1223
            if os.path.isdir(projectpath):
257
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1224
                config.Write("lastopenedfolder", os.path.dirname(projectpath))
a4b01f57069a remove workspace test
greg
parents: 256
diff changeset
  1225
                config.Flush()
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1226
                self.PluginRoot = PluginsRoot(self, self.Log, self.runtime_port)
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
  1227
                result = self.PluginRoot.LoadProject(projectpath)
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1228
                if not result:
268
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1229
                    self.RefreshAll()
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1230
                    self.RefreshMainMenu()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1231
                else:
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1232
                    message = wx.MessageDialog(self, result, "Error", wx.OK|wx.ICON_ERROR)
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1233
                    message.ShowModal()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1234
                    message.Destroy()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1235
            else:
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1236
                message = wx.MessageDialog(self, "\"%s\" folder is not a valid Beremiz project\n"%projectpath, "Error", wx.OK|wx.ICON_ERROR)
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1237
                message.ShowModal()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1238
                message.Destroy()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1239
            dialog.Destroy()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1240
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1241
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1242
    def OnCloseProjectMenu(self, event):
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1243
        if self.PluginRoot is not None:
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1244
            if self.PluginRoot.ProjectTestModified():
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1245
                dialog = wx.MessageDialog(self,
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1246
                                          "Save changes ?",
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1247
                                          "Close Application", 
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1248
                                          wx.YES_NO|wx.CANCEL|wx.ICON_QUESTION)
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1249
                answer = dialog.ShowModal()
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1250
                dialog.Destroy()
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1251
                if answer == wx.ID_YES:
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1252
                    self.PluginRoot.SaveProject()
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1253
                elif answer == wx.ID_CANCEL:
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1254
                    return
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1255
            self.PluginInfos = {}
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1256
            self.PluginRoot = None
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1257
            self.Log.flush()
268
66843376a982 add autocomplete support for beremiz's textctrl
greg
parents: 260
diff changeset
  1258
            self.RefreshAll()
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1259
            self.RefreshMainMenu()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1260
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1261
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1262
    def OnSaveProjectMenu(self, event):
248
444d4db3faea Bug with Open, Reopen and Close Project fixed
lbessard
parents: 242
diff changeset
  1263
        if self.PluginRoot is not None:
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1264
            self.PluginRoot.SaveProject()
118
185d0d371ea4 Refuse close if PLC running.
etisserant
parents: 117
diff changeset
  1265
            self.RefreshAll()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1266
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1267
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1268
    def OnPropertiesMenu(self, event):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1269
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1270
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1271
    def OnQuitMenu(self, event):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1272
        self.Close()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1273
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1274
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1275
    def OnEditPLCMenu(self, event):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1276
        self.EditPLC()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1277
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1278
    
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1279
    def OnAddMenu(self, event):
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1280
        self.AddPlugin()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1281
        event.Skip()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1282
    
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1283
    def OnDeleteMenu(self, event):
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1284
        self.DeletePlugin()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1285
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1286
1
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
  1287
    def OnBuildMenu(self, event):
20
d3cb5020997b Beremiz plugins definitions.
etisserant
parents: 19
diff changeset
  1288
        #self.BuildAutom()
1
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
  1289
        event.Skip()
6e9f24fd1b98 Adding Build Method for PLC program generating
lbessard
parents: 0
diff changeset
  1290
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1291
    def OnSimulateMenu(self, event):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1292
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1293
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1294
    def OnRunMenu(self, event):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1295
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1296
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1297
    def OnSaveLogMenu(self, event):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1298
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1299
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1300
    def OnBeremizMenu(self, event):
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
  1301
        open_pdf(Bpath( "doc", "manual_beremiz.pdf"))
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1302
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1303
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1304
    def OnAboutMenu(self, event):
217
f3eb35df4d87 Now, Beremiz launch Beremiz_service at startup, with a one-time workin dir
etisserant
parents: 214
diff changeset
  1305
        OpenHtmlFrame(self,"About Beremiz", Bpath("doc","about.html"), wx.Size(550, 500))
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1306
        event.Skip()
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1307
    
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1308
    def OnAddButton(self, event):
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1309
        PluginType = self.PluginChilds.GetStringSelection()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1310
        if PluginType != "":
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1311
            self.AddPlugin(PluginType)
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1312
        event.Skip()
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1313
    
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1314
    def OnDeleteButton(self, event):
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1315
        self.DeletePlugin()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1316
        event.Skip()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1317
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1318
    def GetAddButtonFunction(self, plugin, window):
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1319
        def AddButtonFunction(event):
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1320
            if plugin and len(plugin.PlugChildsTypes) > 0:
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1321
                plugin_menu = wx.Menu(title='')
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1322
                for name, XSDClass, help in plugin.PlugChildsTypes:
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1323
                    new_id = wx.NewId()
106
9810689febb0 Added plugins creation helpstrings, changed GUI layout (more compact), solved staticbitmap issues on win32, re-designed some icons...
etisserant
parents: 105
diff changeset
  1324
                    plugin_menu.Append(help=help, id=new_id, kind=wx.ITEM_NORMAL, text=name)
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1325
                    self.Bind(wx.EVT_MENU, self._GetAddPluginFunction(name, plugin), id=new_id)
87
4de868955ee4 Bug on ToolBar and AddButton Menu popup fixed
lbessard
parents: 84
diff changeset
  1326
                window_pos = window.GetPosition()
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1327
                wx.CallAfter(self.PLCConfig.PopupMenu, plugin_menu)
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1328
            event.Skip()
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1329
        return AddButtonFunction
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1330
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1331
    def GetDeleteButtonFunction(self, plugin):
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1332
        def DeleteButtonFunction(event):
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1333
            wx.CallAfter(self.DeletePlugin, plugin)
82
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1334
            event.Skip()
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1335
        return DeleteButtonFunction
d7b4dd1f543f Beremiz layout improved for wx2.8 by inserting all control in TreeCtrl
lbessard
parents: 76
diff changeset
  1336
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1337
    def AddPlugin(self, PluginType, plugin):
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1338
        dialog = wx.TextEntryDialog(self, "Please enter a name for plugin:", "Add Plugin", "", wx.OK|wx.CANCEL)
4
e9d061c23e83 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 3
diff changeset
  1339
        if dialog.ShowModal() == wx.ID_OK:
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1340
            PluginName = dialog.GetValue()
203
cb9901076a21 Added concepts :
etisserant
parents: 201
diff changeset
  1341
            plugin.PlugAddChild(PluginName, PluginType)
17
ee8cb104dbe0 First commit of Beremiz new version with plugin support
lbessard
parents: 13
diff changeset
  1342
            self.RefreshPluginTree()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1343
        dialog.Destroy()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1344
    
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1345
    def DeletePlugin(self, plugin):
72
dc107daa2135 Bug on LeftPanelSizer with Windows fixed
lbessard
parents: 71
diff changeset
  1346
        dialog = wx.MessageDialog(self, "Really delete plugin ?", "Remove plugin", wx.YES_NO|wx.NO_DEFAULT)
50
447b7706a5b6 Added plugin deletion
etisserant
parents: 49
diff changeset
  1347
        if dialog.ShowModal() == wx.ID_YES:
97
9c6fdf60ad2e Beremiz layout changed
lbessard
parents: 94
diff changeset
  1348
            self.PluginInfos.pop(plugin)
50
447b7706a5b6 Added plugin deletion
etisserant
parents: 49
diff changeset
  1349
            plugin.PlugRemove()
447b7706a5b6 Added plugin deletion
etisserant
parents: 49
diff changeset
  1350
            del plugin
447b7706a5b6 Added plugin deletion
etisserant
parents: 49
diff changeset
  1351
            self.RefreshPluginTree()
447b7706a5b6 Added plugin deletion
etisserant
parents: 49
diff changeset
  1352
        dialog.Destroy()
7
e20fa7257d41 Added stdout/stderr separation limitation and coloration
etisserant
parents: 6
diff changeset
  1353
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1354
#-------------------------------------------------------------------------------
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1355
#                               Exception Handler
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1356
#-------------------------------------------------------------------------------
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1357
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1358
Max_Traceback_List_Size = 20
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1359
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1360
def Display_Exception_Dialog(e_type, e_value, e_tb, bug_report_path):
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1361
    trcbck_lst = []
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1362
    for i,line in enumerate(traceback.extract_tb(e_tb)):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1363
        trcbck = " " + str(i+1) + ". "
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1364
        if line[0].find(os.getcwd()) == -1:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1365
            trcbck += "file : " + str(line[0]) + ",   "
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1366
        else:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1367
            trcbck += "file : " + str(line[0][len(os.getcwd()):]) + ",   "
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1368
        trcbck += "line : " + str(line[1]) + ",   " + "function : " + str(line[2])
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1369
        trcbck_lst.append(trcbck)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1370
        
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1371
    # Allow clicking....
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1372
    cap = wx.Window_GetCapture()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1373
    if cap:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1374
        cap.ReleaseMouse()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1375
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1376
    dlg = wx.SingleChoiceDialog(None, 
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1377
        """
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1378
An unhandled exception (bug) occured. Bug report saved at :
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1379
(%s)
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1380
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1381
Please be kind enough to send this file to:
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1382
bugs_beremiz@lolitech.fr
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1383
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1384
You should now restart Beremiz.
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1385
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1386
Traceback:
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1387
""" % bug_report_path +
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1388
        str(e_type) + " : " + str(e_value), 
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1389
        "Error",
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1390
        trcbck_lst)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1391
    try:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1392
        res = (dlg.ShowModal() == wx.ID_OK)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1393
    finally:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1394
        dlg.Destroy()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1395
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1396
    return res
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1397
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1398
def Display_Error_Dialog(e_value):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1399
    message = wxMessageDialog(None, str(e_value), "Error", wxOK|wxICON_ERROR)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1400
    message.ShowModal()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1401
    message.Destroy()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1402
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1403
def get_last_traceback(tb):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1404
    while tb.tb_next:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1405
        tb = tb.tb_next
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1406
    return tb
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1407
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1408
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1409
def format_namespace(d, indent='    '):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1410
    return '\n'.join(['%s%s: %s' % (indent, k, repr(v)[:10000]) for k, v in d.iteritems()])
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1411
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1412
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1413
ignored_exceptions = [] # a problem with a line in a module is only reported once per session
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1414
5
9565bb5facf7 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 4
diff changeset
  1415
def AddExceptHook(path, app_version='[No version]'):#, ignored_exceptions=[]):
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1416
    
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1417
    def handle_exception(e_type, e_value, e_traceback):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1418
        traceback.print_exception(e_type, e_value, e_traceback) # this is very helpful when there's an exception in the rest of this func
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1419
        last_tb = get_last_traceback(e_traceback)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1420
        ex = (last_tb.tb_frame.f_code.co_filename, last_tb.tb_frame.f_lineno)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1421
        if str(e_value).startswith("!!!"):
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1422
            Display_Error_Dialog(e_value)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1423
        elif ex not in ignored_exceptions:
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1424
            date = time.ctime()
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1425
            bug_report_path = path+os.sep+"bug_report_"+date.replace(':','-').replace(' ','_')+".txt"
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1426
            result = Display_Exception_Dialog(e_type,e_value,e_traceback,bug_report_path)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1427
            if result:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1428
                ignored_exceptions.append(ex)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1429
                info = {
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1430
                    'app-title' : wx.GetApp().GetAppName(), # app_title
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1431
                    'app-version' : app_version,
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1432
                    'wx-version' : wx.VERSION_STRING,
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1433
                    'wx-platform' : wx.Platform,
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1434
                    'python-version' : platform.python_version(), #sys.version.split()[0],
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1435
                    'platform' : platform.platform(),
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1436
                    'e-type' : e_type,
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1437
                    'e-value' : e_value,
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1438
                    'date' : date,
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1439
                    'cwd' : os.getcwd(),
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1440
                    }
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1441
                if e_traceback:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1442
                    info['traceback'] = ''.join(traceback.format_tb(e_traceback)) + '%s: %s' % (e_type, e_value)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1443
                    last_tb = get_last_traceback(e_traceback)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1444
                    exception_locals = last_tb.tb_frame.f_locals # the locals at the level of the stack trace where the exception actually occurred
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1445
                    info['locals'] = format_namespace(exception_locals)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1446
                    if 'self' in exception_locals:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1447
                        info['self'] = format_namespace(exception_locals['self'].__dict__)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1448
                
109
f27ca37b6e7a Added enable/disable of plugin method buttons. Fixed alpha graying problem with disabled buttons. Updated debug dialog message with bug report path
etisserant
parents: 106
diff changeset
  1449
                output = open(bug_report_path,'w')
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1450
                lst = info.keys()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1451
                lst.sort()
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1452
                for a in lst:
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1453
                    output.write(a+":\n"+str(info[a])+"\n\n")
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1454
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1455
    #sys.excepthook = lambda *args: wx.CallAfter(handle_exception, *args)
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1456
    sys.excepthook = handle_exception
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1457
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1458
if __name__ == '__main__':
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1459
    # Install a exception handle for bug reports
5
9565bb5facf7 Cleaning code for using only wxPython 2.6 class naming
lbessard
parents: 4
diff changeset
  1460
    AddExceptHook(os.getcwd(),__version__)
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1461
    
256
1da137b99948 add buildpath parameter for beremiz
greg
parents: 249
diff changeset
  1462
    frame = Beremiz(None, projectOpen, buildpath)
103
05b58747ca5d fix bzr.ico -> icon for windows installer
greg
parents: 102
diff changeset
  1463
    frame.Show()
133
d85b937cdac3 change splash.Hide() with splash.Close()
greg
parents: 129
diff changeset
  1464
    splash.Close()
0
215982c73cd6 First Beremiz commit
lbessard
parents:
diff changeset
  1465
    app.MainLoop()