TextViewer.py
author lbessard
Thu, 26 Jul 2007 17:23:21 +0200
changeset 56 7187e1c00975
parent 53 4988262d03e3
child 58 39cd981ff242
permissions -rw-r--r--
Adding support for Undo/Redo and Unsaved File On Close detection
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     1
#!/usr/bin/env python
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     2
# -*- coding: utf-8 -*-
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     3
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     4
#This file is part of PLCOpenEditor, a library implementing an IEC 61131-3 editor
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     5
#based on the plcopen standard. 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     6
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     7
#Copyright (C): Edouard TISSERANT and Laurent BESSARD
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     8
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
     9
#See COPYING file for copyrights details.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    10
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    11
#This library is free software; you can redistribute it and/or
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    12
#modify it under the terms of the GNU General Public
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    13
#License as published by the Free Software Foundation; either
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    14
#version 2.1 of the License, or (at your option) any later version.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    15
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    16
#This library is distributed in the hope that it will be useful,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    17
#but WITHOUT ANY WARRANTY; without even the implied warranty of
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    18
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    19
#Lesser General Public License for more details.
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    20
#
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    21
#You should have received a copy of the GNU General Public
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    22
#License along with this library; if not, write to the Free Software
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    23
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    24
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    25
from wxPython.wx import *
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    26
from wxPython.stc import * 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    27
import wx
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    28
from types import *
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    29
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    30
import re
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    31
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    32
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    33
#                         Textual programs Viewer class
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    34
#-------------------------------------------------------------------------------
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    35
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    36
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    37
NEWLINE = "\n"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    38
NUMBERS = [str(i) for i in xrange(10)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    39
LETTERS = ['_']
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    40
for i in xrange(26):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    41
    LETTERS.append(chr(ord('a') + i))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    42
    LETTERS.append(chr(ord('A') + i))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    43
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    44
[wxSTC_PLC_WORD, wxSTC_PLC_COMMENT, wxSTC_PLC_NUMBER, wxSTC_PLC_VARIABLE, 
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    45
 wxSTC_PLC_FUNCTION, wxSTC_PLC_JUMP] = range(6)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    46
[SPACE, WORD, NUMBER, COMMENT] = range(4)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    47
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    48
[wxID_TEXTVIEWER,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    49
] = [wx.NewId() for _init_ctrls in range(1)]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    50
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    51
if wx.Platform == '__WXMSW__':
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    52
    faces = { 'times': 'Times New Roman',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    53
              'mono' : 'Courier New',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    54
              'helv' : 'Arial',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    55
              'other': 'Comic Sans MS',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    56
              'size' : 10,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    57
             }
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    58
else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    59
    faces = { 'times': 'Times',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    60
              'mono' : 'Courier',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    61
              'helv' : 'Helvetica',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    62
              'other': 'new century schoolbook',
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    63
              'size' : 12,
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    64
             }
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    65
re_texts = {}
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    66
re_texts["letter"] = "[A-Za-z]"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    67
re_texts["digit"] = "[0-9]"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    68
re_texts["identifier"] = "((?:%(letter)s|(?:_(?:%(letter)s|%(digit)s)))(?:_?(?:%(letter)s|%(digit)s))*)"%re_texts
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    69
IDENTIFIER_MODEL = re.compile(re_texts["identifier"])
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    70
LABEL_MODEL = re.compile("[ \t\n]%(identifier)s:[ \t\n]"%re_texts)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    71
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    72
def GetCursorPos(old, new):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    73
    old_length = len(old)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    74
    new_length = len(new)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    75
    common_length = min(old_length, new_length)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    76
    i = 0
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    77
    for i in xrange(common_length):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    78
        if old[i] != new[i]:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    79
            break
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    80
    if old_length < new_length:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    81
        if common_length > 0 and old[i] != new[i]:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    82
            return i + new_length - old_length
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    83
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    84
            return i + new_length - old_length + 1
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    85
    elif old_length > new_length or i < min(old_length, new_length) - 1:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    86
        if common_length > 0 and old[i] != new[i]:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    87
            return i
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    88
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    89
            return i + 1
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    90
    else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    91
        return None
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
    92
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    93
class TextViewer(wxStyledTextCtrl):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    94
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    95
    def __init__(self, parent, window, controler):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    96
        wxStyledTextCtrl.__init__(self, parent, wxID_TEXTVIEWER, style=0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    97
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    98
        self.CmdKeyAssign(ord('+'), wxSTC_SCMOD_CTRL, wxSTC_CMD_ZOOMIN)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
    99
        self.CmdKeyAssign(ord('-'), wxSTC_SCMOD_CTRL, wxSTC_CMD_ZOOMOUT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   100
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   101
        self.SetViewWhiteSpace(False)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   102
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   103
        self.SetLexer(wxSTC_LEX_CONTAINER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   104
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   105
        # Global default styles for all languages
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   106
        self.StyleSetSpec(wxSTC_STYLE_DEFAULT, "face:%(mono)s,size:%(size)d" % faces)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   107
        self.StyleClearAll()  # Reset all to be like the default
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   108
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   109
        self.StyleSetSpec(wxSTC_STYLE_LINENUMBER,  "back:#C0C0C0,size:%(size)d" % faces)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   110
        self.SetSelBackground(1, "#E0E0E0")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   111
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   112
        # Highlighting styles
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   113
        self.StyleSetSpec(wxSTC_PLC_WORD, "fore:#00007F,bold,size:%(size)d" % faces)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   114
        self.StyleSetSpec(wxSTC_PLC_VARIABLE, "fore:#7F0000,size:%(size)d" % faces)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   115
        self.StyleSetSpec(wxSTC_PLC_FUNCTION, "fore:#7F7F00,size:%(size)d" % faces)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   116
        self.StyleSetSpec(wxSTC_PLC_COMMENT, "fore:#7F7F7F,size:%(size)d" % faces)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   117
        self.StyleSetSpec(wxSTC_PLC_NUMBER, "fore:#007F7F,size:%(size)d" % faces)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   118
        self.StyleSetSpec(wxSTC_PLC_JUMP, "fore:#007F00,size:%(size)d" % faces)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   119
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   120
        # Indicators styles
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   121
        self.IndicatorSetStyle(0, wxSTC_INDIC_SQUIGGLE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   122
        self.IndicatorSetForeground(0, wxRED)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   123
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   124
        # Line numbers in the margin
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   125
        self.SetMarginType(1, wxSTC_MARGIN_NUMBER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   126
        self.SetMarginWidth(1, 50)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   127
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   128
        # Indentation size
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   129
        self.SetTabWidth(2)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   130
        self.SetUseTabs(0)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   131
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   132
        self.Keywords = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   133
        self.Variables = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   134
        self.Functions = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   135
        self.Jumps = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   136
        self.TextChanged = False
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   137
        self.DisableEvents = True
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   138
        self.TextSyntax = "ST"
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   139
        self.CurrentAction = None
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   140
        
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   141
        self.Parent = window
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   142
        self.Controler = controler
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   143
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   144
        self.SetModEventMask(wxSTC_MOD_BEFOREINSERT|wxSTC_MOD_BEFOREDELETE)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   145
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   146
        EVT_KEY_DOWN(self, self.OnKeyDown)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   147
        EVT_STC_STYLENEEDED(self, wxID_TEXTVIEWER, self.OnStyleNeeded)
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   148
        EVT_STC_DO_DROP(self, wxID_TEXTVIEWER, self.OnDoDrop)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   149
        EVT_KILL_FOCUS(self, self.OnKillFocus)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   150
        EVT_STC_MODIFIED(self, wxID_TEXTVIEWER, self.OnModification)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   151
    
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   152
    def OnModification(self, event):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   153
        if not self.DisableEvents:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   154
            mod_type = event.GetModificationType()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   155
            if not (mod_type&wxSTC_PERFORMED_UNDO or mod_type&wxSTC_PERFORMED_REDO):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   156
                if mod_type&wxSTC_MOD_BEFOREINSERT:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   157
                    if self.CurrentAction == None:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   158
                        self.StartBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   159
                    elif self.CurrentAction[0] != "Add" or self.CurrentAction[1] != event.GetPosition() - 1:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   160
                        self.Controler.EndBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   161
                        self.StartBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   162
                    self.CurrentAction = ("Add", event.GetPosition())
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   163
                elif mod_type&wxSTC_MOD_BEFOREDELETE:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   164
                    if self.CurrentAction == None:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   165
                        self.StartBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   166
                    elif self.CurrentAction[0] != "Delete" or self.CurrentAction[1] != event.GetPosition() + 1:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   167
                        self.Controler.EndBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   168
                        self.StartBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   169
                    self.CurrentAction = ("Delete", event.GetPosition())
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   170
        event.Skip()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   171
    
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   172
    def OnDoDrop(self, event):
50
4610aafc884e Bugs fixed
lbessard
parents: 47
diff changeset
   173
        try:
4610aafc884e Bugs fixed
lbessard
parents: 47
diff changeset
   174
            values = eval(event.GetDragText())
4610aafc884e Bugs fixed
lbessard
parents: 47
diff changeset
   175
        except:
4610aafc884e Bugs fixed
lbessard
parents: 47
diff changeset
   176
            values = event.GetDragText()
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   177
        if isinstance(values, tuple):
53
4988262d03e3 *** empty log message ***
lbessard
parents: 50
diff changeset
   178
            if values[1] in ["functionBlock", "program", "location"]:
47
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   179
                event.SetDragText("")
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   180
            else:
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   181
                event.SetDragText(values[0])
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   182
        event.Skip()
2b2f8d88e6d3 Interface changed to show pou interface at the bottom of the window
lbessard
parents: 27
diff changeset
   183
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   184
    def SetTextSyntax(self, syntax):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   185
        self.TextSyntax = syntax
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   186
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   187
    def SetKeywords(self, keywords):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   188
        self.Keywords = [keyword.upper() for keyword in keywords]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   189
        self.Colourise(0, -1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   190
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   191
    def SetVariables(self, variables):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   192
        self.Variables = [variable.upper() for variable in variables]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   193
        self.Colourise(0, -1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   194
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   195
    def SetFunctions(self, blocktypes):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   196
        self.Functions = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   197
        for category in blocktypes:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   198
            for blocktype in category["list"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   199
                if blocktype["name"] not in self.Keywords and blocktype["name"] not in self.Variables:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   200
                    self.Functions.append(blocktype["name"].upper())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   201
        self.Colourise(0, -1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   202
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   203
    def RefreshJumpList(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   204
        self.Jumps = [jump.upper() for jump in LABEL_MODEL.findall(self.GetText())]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   205
        self.Colourise(0, -1)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   206
    
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   207
    # Buffer the last model state
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   208
    def RefreshBuffer(self):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   209
        self.Controler.BufferProject()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   210
        self.Parent.RefreshTitle()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   211
        self.Parent.RefreshEditMenu()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   212
    
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   213
    def StartBuffering(self):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   214
        self.Controler.StartBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   215
        self.Parent.RefreshTitle()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   216
        self.Parent.RefreshEditMenu()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   217
    
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   218
    def ResetBuffer(self):
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   219
        if self.CurrentAction != None:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   220
            self.Controler.EndBuffering()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   221
            self.CurrentAction = None
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   222
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   223
    def RefreshView(self):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   224
        self.ResetBuffer()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   225
        self.DisableEvents = True
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   226
        old_cursor_pos = self.GetCurrentPos()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   227
        old_text = self.GetText()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   228
        new_text = self.Controler.GetCurrentElementEditingText()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   229
        self.SetText(new_text)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   230
        new_cursor_pos = GetCursorPos(old_text, new_text)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   231
        if new_cursor_pos != None:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   232
            self.SetSelection(new_cursor_pos, new_cursor_pos)
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   233
            self.EnsureCaretVisible()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   234
        else:
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   235
            self.SetSelection(old_cursor_pos, old_cursor_pos)
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   236
        self.RefreshJumpList()
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   237
        self.EmptyUndoBuffer()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   238
        self.DisableEvents = False
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   239
        
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   240
    def OnStyleNeeded(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   241
        self.TextChanged = True
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   242
        line = self.LineFromPosition(self.GetEndStyled())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   243
        if line == 0:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   244
            start_pos = 0
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   245
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   246
            start_pos = self.GetLineEndPosition(line - 1) + 1
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   247
        end_pos = event.GetPosition()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   248
        self.StartStyling(start_pos, 0xff)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   249
        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   250
        i = start_pos
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   251
        state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   252
        line = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   253
        word = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   254
        while i < end_pos:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   255
            char = chr(self.GetCharAt(i)).upper()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   256
            line += char
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   257
            if char == NEWLINE:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   258
                if state == COMMENT:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   259
                    self.SetStyling(i - start_pos + 1, wxSTC_PLC_COMMENT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   260
                elif state == NUMBER:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   261
                    self.SetStyling(i - start_pos, wxSTC_PLC_NUMBER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   262
                elif state == WORD:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   263
                    if word in self.Keywords:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   264
                        self.SetStyling(i - start_pos, wxSTC_PLC_WORD)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   265
                    elif word in self.Variables:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   266
                        self.SetStyling(i - start_pos, wxSTC_PLC_VARIABLE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   267
                    elif word in self.Functions:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   268
                        self.SetStyling(i - start_pos, wxSTC_PLC_FUNCTION)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   269
                    elif word in self.Jumps:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   270
                        self.SetStyling(i - start_pos, wxSTC_PLC_JUMP)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   271
                    else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   272
                        self.SetStyling(i - start_pos, 31)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   273
                        if self.GetCurrentPos() < start_pos or self.GetCurrentPos() > i:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   274
                            self.StartStyling(start_pos, wxSTC_INDICS_MASK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   275
                            self.SetStyling(i - start_pos, wxSTC_INDIC0_MASK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   276
                            self.StartStyling(i, 0xff)    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   277
                else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   278
                    self.SetStyling(i - start_pos, 31)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   279
                start_pos = i
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   280
                state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   281
                line = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   282
            elif line.endswith("(*") and state != COMMENT:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   283
                self.SetStyling(i - start_pos - 1, 31)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   284
                start_pos = i
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   285
                state = COMMENT
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   286
            elif state == COMMENT:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   287
                if line.endswith("*)"):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   288
                    self.SetStyling(i - start_pos + 2, wxSTC_PLC_COMMENT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   289
                    start_pos = i + 1
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   290
                    state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   291
            elif char in LETTERS:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   292
                if state == NUMBER:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   293
                    word = "#"
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   294
                    state = WORD
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   295
                elif state == SPACE:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   296
                    self.SetStyling(i - start_pos, 31)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   297
                    word = char
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   298
                    start_pos = i
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   299
                    state = WORD
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   300
                else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   301
                    word += char
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   302
            elif char in NUMBERS or char == '.' and state != WORD:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   303
                if state == SPACE:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   304
                    self.SetStyling(i - start_pos, 31)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   305
                    start_pos = i
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   306
                    state = NUMBER
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   307
                if state == WORD and char != '.':
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   308
                    word += char
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   309
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   310
                if state == WORD:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   311
                    if word in self.Keywords:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   312
                        self.SetStyling(i - start_pos, wxSTC_PLC_WORD)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   313
                    elif word in self.Variables:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   314
                        self.SetStyling(i - start_pos, wxSTC_PLC_VARIABLE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   315
                    elif word in self.Functions:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   316
                        self.SetStyling(i - start_pos, wxSTC_PLC_FUNCTION)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   317
                    elif word in self.Jumps:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   318
                        self.SetStyling(i - start_pos, wxSTC_PLC_JUMP)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   319
                    else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   320
                        self.SetStyling(i - start_pos, 31)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   321
                        if self.GetCurrentPos() < start_pos or self.GetCurrentPos() > i:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   322
                            self.StartStyling(start_pos, wxSTC_INDICS_MASK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   323
                            self.SetStyling(i - start_pos, wxSTC_INDIC0_MASK)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   324
                            self.StartStyling(i, 0xff)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   325
                    word = ""
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   326
                    start_pos = i
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   327
                    state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   328
                elif state == NUMBER:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   329
                    self.SetStyling(i - start_pos, wxSTC_PLC_NUMBER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   330
                    start_pos = i
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   331
                    state = SPACE
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   332
            i += 1
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   333
        if state == COMMENT:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   334
            self.SetStyling(i - start_pos + 2, wxSTC_PLC_COMMENT)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   335
        elif state == NUMBER:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   336
            self.SetStyling(i - start_pos, wxSTC_PLC_NUMBER)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   337
        elif state == WORD:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   338
            if word in self.Keywords:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   339
                self.SetStyling(i - start_pos, wxSTC_PLC_WORD)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   340
            elif word in self.Variables:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   341
                self.SetStyling(i - start_pos, wxSTC_PLC_VARIABLE)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   342
            elif word in self.Functions:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   343
                self.SetStyling(i - start_pos, wxSTC_PLC_FUNCTION)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   344
            elif word in self.Jumps:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   345
                self.SetStyling(i - start_pos, wxSTC_PLC_JUMP)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   346
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   347
                self.SetStyling(i - start_pos, 31)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   348
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   349
            self.SetStyling(i - start_pos, 31)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   350
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   351
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   352
    def Cut(self):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   353
        self.ResetBuffer()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   354
        self.CmdKeyExecute(wxSTC_CMD_CUT)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   355
        self.RefreshBuffer()
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   356
    
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   357
    def Copy(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   358
        self.CmdKeyExecute(wxSTC_CMD_COPY)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   359
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   360
    def Paste(self):
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   361
        self.ResetBuffer()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   362
        self.CmdKeyExecute(wxSTC_CMD_PASTE)
56
7187e1c00975 Adding support for Undo/Redo and Unsaved File On Close detection
lbessard
parents: 53
diff changeset
   363
        self.RefreshBuffer()
27
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   364
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   365
    def RefreshModel(self):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   366
        if self.TextChanged:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   367
            self.RefreshJumpList()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   368
            self.Controler.SetCurrentElementEditingText(self.GetText())
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   369
    
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   370
    def OnKeyDown(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   371
        if self.CallTipActive():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   372
            self.CallTipCancel()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   373
        key = event.KeyCode()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   374
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   375
        # Code completion
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   376
        if key == WXK_SPACE and event.ControlDown():
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   377
            
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   378
            line = self.GetCurrentLine()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   379
            if line == 0:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   380
                start_pos = 0
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   381
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   382
                start_pos = self.GetLineEndPosition(line - 1) + 1
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   383
            end_pos = self.GetCurrentPos()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   384
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   385
            lineText = self.GetTextRange(start_pos, end_pos).replace("\t", " ")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   386
            words = lineText.split(" ")
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   387
            words = [word for i, word in enumerate(words) if word != '' or i == len(words) - 1]
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   388
                        
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   389
            kw = []
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   390
            
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   391
            if self.TextSyntax == "IL":
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   392
                if len(words) == 1:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   393
                    kw = self.Keywords
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   394
                elif len(words) == 2:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   395
                    if words[0].upper() in ["CAL", "CALC", "CALNC"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   396
                        kw = self.Functions
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   397
                    elif words[0].upper() in ["JMP", "JMPC", "JMPNC"]:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   398
                        kw = self.Jumps
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   399
                    else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   400
                        kw = self.Variables
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   401
            else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   402
                kw = self.Keywords + self.Variables + self.Functions
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   403
            if len(kw) > 0:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   404
                kw.sort()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   405
                self.AutoCompSetIgnoreCase(True)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   406
                self.AutoCompShow(len(words[-1]), " ".join(kw))
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   407
        else:
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   408
            self.TextChanged = False
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   409
            wxCallAfter(self.RefreshModel)
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   410
            event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   411
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   412
    def OnKillFocus(self, event):
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   413
        self.AutoCompCancel()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   414
        event.Skip()
dae55dd9ee14 Current developping version
lbessard
parents:
diff changeset
   415