dialogs/ConnectionDialog.py
author Edouard Tisserant
Mon, 07 Oct 2019 12:02:45 +0200
branchsvghmi
changeset 2791 d022523cb621
parent 2591 5f685bcd3ad6
child 3303 0ffb41625592
permissions -rw-r--r--
SVGHMI: now generating JS object describing widgets and pointing to SVG elements
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     1
#!/usr/bin/env python
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
     3
1571
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
     4
# This file is part of Beremiz, a Integrated Development Environment for
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
     5
# programming IEC 61131-3 automates supporting plcopen standard and CanFestival.
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
     6
#
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
     7
# Copyright (C) 2007: Edouard TISSERANT and Laurent BESSARD
1696
8043f32de7b8 make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1571
diff changeset
     8
# Copyright (C) 2017: Andrey Skvortsov <andrej.skvortzov@gmail.com>
1571
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
     9
#
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    10
# See COPYING file for copyrights details.
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    11
#
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    12
# This program is free software; you can redistribute it and/or
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    13
# modify it under the terms of the GNU General Public License
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    14
# as published by the Free Software Foundation; either version 2
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    15
# of the License, or (at your option) any later version.
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    16
#
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    17
# This program is distributed in the hope that it will be useful,
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    18
# but WITHOUT ANY WARRANTY; without even the implied warranty of
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    19
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    20
# GNU General Public License for more details.
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    21
#
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    22
# You should have received a copy of the GNU General Public License
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    23
# along with this program; if not, write to the Free Software
486f94a8032c fix license notices in source files and license files under GPLv2+
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1487
diff changeset
    24
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    25
1853
47a3f39bead0 fix pylint warning "(relative-import) Relative import 'Y', should be 'X.Y'"
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1782
diff changeset
    26
47a3f39bead0 fix pylint warning "(relative-import) Relative import 'Y', should be 'X.Y'"
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1782
diff changeset
    27
from __future__ import absolute_import
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    28
import wx
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    29
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    30
from graphics.GraphicCommons import CONNECTOR, CONTINUATION
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    31
from graphics.FBD_Objects import FBD_Connector
1853
47a3f39bead0 fix pylint warning "(relative-import) Relative import 'Y', should be 'X.Y'"
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1782
diff changeset
    32
from dialogs.BlockPreviewDialog import BlockPreviewDialog
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    33
1782
5b6ad7a7fd9d clean-up: fix PEP8 E265 block comment should start with '# '
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1768
diff changeset
    34
# -------------------------------------------------------------------------------
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    35
#                       Set Connection Parameters Dialog
1782
5b6ad7a7fd9d clean-up: fix PEP8 E265 block comment should start with '# '
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1768
diff changeset
    36
# -------------------------------------------------------------------------------
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    37
1249
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
    38
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    39
class ConnectionDialog(BlockPreviewDialog):
1736
7e61baa047f0 clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1730
diff changeset
    40
    """
7e61baa047f0 clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1730
diff changeset
    41
    Class that implements a dialog for defining parameters of a connection graphic
7e61baa047f0 clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1730
diff changeset
    42
    element
7e61baa047f0 clean-up: fix PEP8 E302 expected 2 blank lines, found 1
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1730
diff changeset
    43
    """
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    44
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    45
    def __init__(self, parent, controller, tagname, apply_button=False):
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    46
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    47
        Constructor
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    48
        @param parent: Parent wx.Window of dialog for modal
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    49
        @param controller: Reference to project controller
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    50
        @param tagname: Tagname of project POU edited
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    51
        @param apply_button: Enable button for applying connector modification
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    52
        to all connector having the same name in POU (default: False)
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    53
        """
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    54
        BlockPreviewDialog.__init__(self, parent, controller, tagname,
1768
691083b5682a clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1745
diff changeset
    55
                                    title=_('Connection Properties'))
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    56
1250
7e6de17c687a Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents: 1249
diff changeset
    57
        # Init common sizers
1696
8043f32de7b8 make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1571
diff changeset
    58
        self._init_sizers(2, 0, 7, 1, 0, None)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    59
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    60
        # Create label for connection type
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    61
        type_label = wx.StaticText(self, label=_('Type:'))
1250
7e6de17c687a Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents: 1249
diff changeset
    62
        self.LeftGridSizer.AddWindow(type_label, flag=wx.GROW)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    63
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    64
        # Create radio buttons for selecting connection type
1246
101625efb1c1 Rewrite LDElementDialog
Laurent Bessard
parents: 1245
diff changeset
    65
        self.TypeRadioButtons = {}
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    66
        first = True
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    67
        for type, label in [(CONNECTOR, _('Connector')),
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    68
                            (CONTINUATION, _('Continuation'))]:
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    69
            radio_button = wx.RadioButton(self, label=label,
1768
691083b5682a clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1745
diff changeset
    70
                                          style=(wx.RB_GROUP if first else 0))
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    71
            radio_button.SetValue(first)
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    72
            self.Bind(wx.EVT_RADIOBUTTON, self.OnTypeChanged, radio_button)
1250
7e6de17c687a Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents: 1249
diff changeset
    73
            self.LeftGridSizer.AddWindow(radio_button, flag=wx.GROW)
1246
101625efb1c1 Rewrite LDElementDialog
Laurent Bessard
parents: 1245
diff changeset
    74
            self.TypeRadioButtons[type] = radio_button
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    75
            first = False
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    76
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    77
        # Create label for connection name
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    78
        name_label = wx.StaticText(self, label=_('Name:'))
1250
7e6de17c687a Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents: 1249
diff changeset
    79
        self.LeftGridSizer.AddWindow(name_label, flag=wx.GROW)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    80
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    81
        # Create text control for defining connection name
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    82
        self.ConnectionName = wx.TextCtrl(self)
1740
b789b695b5c6 clean-up: fix PEP8 E231 missing whitespace after ':' or ','
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1736
diff changeset
    83
        self.ConnectionName.SetMinSize(wx.Size(200, -1))
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
    84
        self.Bind(wx.EVT_TEXT, self.OnNameChanged, self.ConnectionName)
1250
7e6de17c687a Rewrite SFCStepDialog and factorize code for creating common dialog sizers
Laurent Bessard
parents: 1249
diff changeset
    85
        self.LeftGridSizer.AddWindow(self.ConnectionName, flag=wx.GROW)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    86
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    87
        # Add preview panel and associated label to sizers
1740
b789b695b5c6 clean-up: fix PEP8 E231 missing whitespace after ':' or ','
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1736
diff changeset
    88
        self.Preview.SetMinSize(wx.Size(-1, 100))
1696
8043f32de7b8 make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1571
diff changeset
    89
        self.LeftGridSizer.AddWindow(self.PreviewLabel, flag=wx.GROW)
8043f32de7b8 make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1571
diff changeset
    90
        self.LeftGridSizer.AddWindow(self.Preview, flag=wx.GROW)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    91
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    92
        # Add buttons sizer to sizers
1768
691083b5682a clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1745
diff changeset
    93
        self.MainSizer.AddSizer(
691083b5682a clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1745
diff changeset
    94
            self.ButtonSizer, border=20,
691083b5682a clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1745
diff changeset
    95
            flag=wx.ALIGN_RIGHT | wx.BOTTOM | wx.LEFT | wx.RIGHT)
1696
8043f32de7b8 make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1571
diff changeset
    96
        self.ColumnSizer.RemoveSizer(self.RightGridSizer)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
    97
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    98
        # Add button for applying connection name modification to all connection
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
    99
        # of POU
856
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   100
        if apply_button:
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   101
            self.ApplyToAllButton = wx.Button(self, label=_("Propagate Name"))
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   102
            self.ApplyToAllButton.SetToolTipString(
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   103
                _("Apply name modification to all continuations with the same name"))
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   104
            self.Bind(wx.EVT_BUTTON, self.OnApplyToAll, self.ApplyToAllButton)
1696
8043f32de7b8 make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1571
diff changeset
   105
            self.ButtonSizer.AddWindow(self.ApplyToAllButton, flag=wx.LEFT)
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   106
        else:
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   107
            self.ConnectionName.ChangeValue(
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   108
                controller.GenerateNewName(
1878
fb73a6b6622d fix pylint warning '(bad-continuation) Wrong hanging indentation before block'
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1853
diff changeset
   109
                    tagname, None, "Connection%d", 0))
1696
8043f32de7b8 make all dialog have non-fixed size
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1571
diff changeset
   110
        self.Fit()
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   111
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   112
        # Connector radio button is default control having keyboard focus
1246
101625efb1c1 Rewrite LDElementDialog
Laurent Bessard
parents: 1245
diff changeset
   113
        self.TypeRadioButtons[CONNECTOR].SetFocus()
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   114
1249
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   115
    def GetConnectionType(self):
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   116
        """
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   117
        Return type selected for connection
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   118
        @return: Type selected (CONNECTOR or CONTINUATION)
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   119
        """
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   120
        return (CONNECTOR
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   121
                if self.TypeRadioButtons[CONNECTOR].GetValue()
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   122
                else CONTINUATION)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   123
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   124
    def SetValues(self, values):
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   125
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   126
        Set default connection parameters
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   127
        @param values: Connection parameters values
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   128
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   129
        # For each parameters defined, set corresponding control value
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   130
        for name, value in values.items():
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   131
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   132
            # Parameter is connection type
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   133
            if name == "type":
1246
101625efb1c1 Rewrite LDElementDialog
Laurent Bessard
parents: 1245
diff changeset
   134
                self.TypeRadioButtons[value].SetValue(True)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   135
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   136
            # Parameter is connection name
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   137
            elif name == "name":
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   138
                self.ConnectionName.SetValue(value)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   139
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   140
        # Refresh preview panel
2591
5f685bcd3ad6 Fixed refresh problem following 9c5f835b031e, 9622418ac28c, c67488bd8134 : force redraw only through EVT_PAINT event and use wxPaintDC, as described in wx documentation
Edouard Tisserant
parents: 2587
diff changeset
   141
        self.RefreshPreview()
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   142
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   143
    def GetValues(self):
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   144
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   145
        Return connection parameters defined in dialog
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   146
        @return: {parameter_name: parameter_value,...}
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   147
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   148
        values = {
1249
b956c924cbbd Rewrite LDPowerRailDialog
Laurent Bessard
parents: 1247
diff changeset
   149
            "type": self.GetConnectionType(),
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   150
            "name": self.ConnectionName.GetValue()}
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   151
        values["width"], values["height"] = self.Element.GetSize()
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   152
        return values
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   153
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   154
    def TestConnectionName(self):
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   155
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   156
        Test that connection name is valid
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   157
        @return: True if connection name is valid
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   158
        """
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   159
        message = None
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   160
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   161
        # Get connection name typed by user
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   162
        connection_name = self.ConnectionName.GetValue()
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   163
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   164
        # Test that a name have been defined
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   165
        if connection_name == "":
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   166
            message = _("Form isn't complete. Name must be filled!")
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   167
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   168
        # If an error have been identify, show error message dialog
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   169
        if message is not None:
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   170
            self.ShowErrorMessage(message)
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   171
            # Test failed
856
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   172
            return False
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   173
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   174
        # Return result of element name test
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   175
        return self.TestElementName(connection_name)
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   176
856
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   177
    def OnOK(self, event):
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   178
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   179
        Called when dialog OK button is pressed
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   180
        Test if connection name is valid
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   181
        @param event: wx.Event from OK button
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   182
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   183
        # Close dialog if connection name is valid
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   184
        if self.TestConnectionName():
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   185
            self.EndModal(wx.ID_OK)
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   186
856
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   187
    def OnApplyToAll(self, event):
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   188
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   189
        Called when Apply To All button is pressed
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   190
        Test if connection name is valid
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   191
        @param event: wx.Event from OK button
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   192
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   193
        # Close dialog if connection name is valid
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   194
        if self.TestConnectionName():
856
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   195
            self.EndModal(wx.ID_YESTOALL)
b64e436f000e Adding button in ConnectionDialog to propagate connection name modification to all connections with the same name in POU
Laurent Bessard
parents: 814
diff changeset
   196
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   197
    def OnTypeChanged(self, event):
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   198
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   199
        Called when connection type changed
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   200
        @param event: wx.RadioButtonEvent
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   201
        """
2591
5f685bcd3ad6 Fixed refresh problem following 9c5f835b031e, 9622418ac28c, c67488bd8134 : force redraw only through EVT_PAINT event and use wxPaintDC, as described in wx documentation
Edouard Tisserant
parents: 2587
diff changeset
   202
        self.RefreshPreview()
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   203
        event.Skip()
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   204
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   205
    def OnNameChanged(self, event):
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   206
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   207
        Called when connection name value changed
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   208
        @param event: wx.TextEvent
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   209
        """
2591
5f685bcd3ad6 Fixed refresh problem following 9c5f835b031e, 9622418ac28c, c67488bd8134 : force redraw only through EVT_PAINT event and use wxPaintDC, as described in wx documentation
Edouard Tisserant
parents: 2587
diff changeset
   210
        self.RefreshPreview()
814
5743cbdff669 Integration of PLCOpenEditor into Beremiz
Laurent Bessard
parents:
diff changeset
   211
        event.Skip()
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   212
2587
c67488bd8134 Fixed preview drawing/refresh problem in sfc/ld/fbd graphical element creation dialogs on windows (introduced in 9c5f835b031e, continuation of 9622418ac28c)
Edouard Tisserant
parents: 1878
diff changeset
   213
    def DrawPreview(self):
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   214
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   215
        Refresh preview panel of graphic element
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   216
        Override BlockPreviewDialog function
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   217
        """
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   218
        # Set graphic element displayed, creating a FBD connection element
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   219
        self.Element = FBD_Connector(self.Preview,
1768
691083b5682a clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1745
diff changeset
   220
                                     self.GetConnectionType(),
691083b5682a clean-up: fix PEP8 E128 continuation line under-indented for visual indent
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1745
diff changeset
   221
                                     self.ConnectionName.GetValue())
1730
64d8f52bc8c8 clean-up for PEP8: fix W291 trailing whitespace
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 1696
diff changeset
   222
1245
d34ba528346b Rewrite ConnectionDialog
Laurent Bessard
parents: 856
diff changeset
   223
        # Call BlockPreviewDialog function
2587
c67488bd8134 Fixed preview drawing/refresh problem in sfc/ld/fbd graphical element creation dialogs on windows (introduced in 9c5f835b031e, continuation of 9622418ac28c)
Edouard Tisserant
parents: 1878
diff changeset
   224
        BlockPreviewDialog.DrawPreview(self)