dialogs/SFCDivergenceDialog.py
author Laurent Bessard
Fri, 27 Sep 2013 16:22:40 +0200
changeset 1330 96b242e4c59d
parent 1259 8350222a81c3
child 1571 486f94a8032c
permissions -rw-r--r--
Added support for loading XML file even if not following XSD schema (but still following XML syntax), warning user of errors in XML file
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     1
# -*- coding: utf-8 -*-
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     2
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     3
#This file is part of PLCOpenEditor, a library implementing an IEC 61131-3 editor
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     4
#based on the plcopen standard. 
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     5
#
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     6
#Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     7
#
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     8
#See COPYING file for copyrights details.
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     9
#
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    10
#This library is free software; you can redistribute it and/or
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    11
#modify it under the terms of the GNU General Public
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    12
#License as published by the Free Software Foundation; either
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    13
#version 2.1 of the License, or (at your option) any later version.
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    14
#
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    15
#This library is distributed in the hope that it will be useful,
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    16
#but WITHOUT ANY WARRANTY; without even the implied warranty of
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    17
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    18
#General Public License for more details.
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    19
#
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    20
#You should have received a copy of the GNU General Public
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    21
#License along with this library; if not, write to the Free Software
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    22
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    23
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    24
import wx
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    25
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    26
from graphics.GraphicCommons import SELECTION_DIVERGENCE, \
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    27
    SELECTION_CONVERGENCE, SIMULTANEOUS_DIVERGENCE, SIMULTANEOUS_CONVERGENCE
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    28
from graphics.SFC_Objects import SFC_Divergence
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    29
from BlockPreviewDialog import BlockPreviewDialog
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    30
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    31
#-------------------------------------------------------------------------------
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    32
#                         Create New Divergence Dialog
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    33
#-------------------------------------------------------------------------------
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    34
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    35
"""
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    36
Class that implements a dialog for defining parameters for creating a new
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    37
divergence graphic element
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    38
"""
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    39
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    40
class SFCDivergenceDialog(BlockPreviewDialog):
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    41
    
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    42
    def __init__(self, parent, controller, tagname):
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    43
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    44
        Constructor
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    45
        @param parent: Parent wx.Window of dialog for modal
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    46
        @param controller: Reference to project controller
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    47
        @param tagname: Tagname of project POU edited
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    48
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    49
        BlockPreviewDialog.__init__(self, parent, controller, tagname, 
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    50
              size=wx.Size(500, 300), 
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    51
              title=_('Create a new divergence or convergence'))
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    52
        
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    53
        # Init common sizers
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    54
        self._init_sizers(2, 0, 7, None, 2, 1)
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    55
        
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    56
        # Create label for divergence type
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    57
        type_label = wx.StaticText(self, label=_('Type:'))
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    58
        self.LeftGridSizer.AddWindow(type_label, flag=wx.GROW)
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    59
        
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    60
        # Create radio buttons for selecting divergence type
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    61
        self.TypeRadioButtons = {}
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    62
        first = True
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    63
        for type, label in [
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    64
                (SELECTION_DIVERGENCE, _('Selection Divergence')),
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    65
                (SELECTION_CONVERGENCE, _('Selection Convergence')),
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    66
                (SIMULTANEOUS_DIVERGENCE, _('Simultaneous Divergence')),
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    67
                (SIMULTANEOUS_CONVERGENCE, _('Simultaneous Convergence'))]:
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    68
            radio_button = wx.RadioButton(self, label=label, 
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    69
                  style=(wx.RB_GROUP if first else 0))
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    70
            radio_button.SetValue(first)
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    71
            self.Bind(wx.EVT_RADIOBUTTON, self.OnTypeChanged, radio_button)
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    72
            self.LeftGridSizer.AddWindow(radio_button, flag=wx.GROW)
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    73
            self.TypeRadioButtons[type] = radio_button
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    74
            first = False
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    75
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    76
        # Create label for number of divergence sequences
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    77
        sequences_label = wx.StaticText(self, 
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    78
              label=_('Number of sequences:'))
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    79
        self.LeftGridSizer.AddWindow(sequences_label, flag=wx.GROW)
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    80
        
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    81
        # Create spin control for defining number of divergence sequences
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    82
        self.Sequences = wx.SpinCtrl(self, min=2, max=20)
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    83
        self.Bind(wx.EVT_SPINCTRL, self.OnSequencesChanged, self.Sequences)
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    84
        self.LeftGridSizer.AddWindow(self.Sequences, flag=wx.GROW)
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    85
        
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    86
        # Add preview panel and associated label to sizers
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    87
        self.RightGridSizer.AddWindow(self.PreviewLabel, flag=wx.GROW)
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    88
        self.RightGridSizer.AddWindow(self.Preview, flag=wx.GROW)
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    89
        
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    90
        # Add buttons sizer to sizers
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    91
        self.MainSizer.AddSizer(self.ButtonSizer, border=20, 
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    92
              flag=wx.ALIGN_RIGHT|wx.BOTTOM|wx.LEFT|wx.RIGHT)
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    93
        
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    94
        # Selection divergence radio button is default control having keyboard
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    95
        # focus
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    96
        self.TypeRadioButtons[SELECTION_DIVERGENCE].SetFocus()
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    97
    
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    98
    def GetMinElementSize(self):
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
    99
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   100
        Get minimal graphic element size
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   101
        @return: Tuple containing minimal size (width, height) or None if no
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   102
        element defined
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   103
        """
1259
8350222a81c3 Added support for adding graphic element when dropping wire in midair
Laurent Bessard
parents: 1251
diff changeset
   104
        return self.Element.GetMinSize(True)
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   105
    
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   106
    def GetDivergenceType(self):
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   107
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   108
        Return type selected for SFC divergence
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   109
        @return: Type selected (None if not found)
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   110
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   111
        # Go through radio buttons and return type associated to the one that
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   112
        # is selected
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   113
        for type, control in self.TypeRadioButtons.iteritems():
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   114
            if control.GetValue():
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   115
                return type
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   116
        return None
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   117
    
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   118
    def GetValues(self):
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   119
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   120
        Set default SFC divergence parameters
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   121
        @param values: Divergence parameters values
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   122
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   123
        return {"type": self.GetDivergenceType(),
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   124
                "number": self.Sequences.GetValue()}
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   125
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   126
    def OnTypeChanged(self, event):
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   127
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   128
        Called when SFC divergence type changed
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   129
        @param event: wx.RadioButtonEvent
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   130
        """
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   131
        self.RefreshPreview()
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   132
        event.Skip()
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   133
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   134
    def OnSequencesChanged(self, event):
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   135
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   136
        Called when SFC divergence number of sequences changed
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   137
        @param event: wx.SpinEvent
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   138
        """
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   139
        self.RefreshPreview()
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   140
        event.Skip()
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   141
        
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   142
    def RefreshPreview(self):
1251
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   143
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   144
        Refresh preview panel of graphic element
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   145
        Override BlockPreviewDialog function
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   146
        """
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   147
        # Set graphic element displayed, creating a SFC divergence
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   148
        self.Element = SFC_Divergence(self.Preview, 
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   149
                                      self.GetDivergenceType(), 
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   150
                                      self.Sequences.GetValue())
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   151
        
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   152
        # Call BlockPreviewDialog function
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   153
        BlockPreviewDialog.RefreshPreview(self)
d9ed42e44a50 Rewrite SFCDivergenceDialog
Laurent Bessard
parents: 814
diff changeset
   154