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