dialogs/SFCDivergenceDialog.py
author Laurent Bessard
Thu, 05 Dec 2013 20:06:19 +0100
changeset 1382 675a6229fc60
parent 1259 8350222a81c3
child 1571 486f94a8032c
permissions -rw-r--r--
Fixed bugs in SFC when loading transition condition and referenced transition or action body
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