VERSION 5.00 Object = "{2F815EB6-3A15-4C5D-ADB0-464DACCBB1BB}#1.0#0"; "VisiWinStudio.ocx" Object = "{08A903C4-400D-4A2C-9D1A-5E7018B95609}#1.0#0"; "VWSLanguage.ocx" Begin VB.Form FNumPad BackColor = &H00E0E0E0& BorderStyle = 3 'Fester Dialog ClientHeight = 3600 ClientLeft = 3945 ClientTop = 3825 ClientWidth = 3600 ClipControls = 0 'False ControlBox = 0 'False LinkTopic = "Form2" MaxButton = 0 'False MinButton = 0 'False PaletteMode = 1 'ZReihenfolge ScaleHeight = 3600 ScaleWidth = 3600 ShowInTaskbar = 0 'False Begin VB.PictureBox picKeys BorderStyle = 0 'Kein Height = 3000 Left = 0 ScaleHeight = 3000 ScaleWidth = 3600 TabIndex = 0 Top = 600 Width = 3600 Begin VisiWinStudioLib.VWSKey keyEnd Height = 1800 Index = 1 Left = 3000 TabIndex = 1 Tag = "{ENTER}" Top = 1200 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Symbol" Size = 26.25 Charset = 2 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False Picture = "NumPad.frx":0000 PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyClose Height = 600 Left = 3000 TabIndex = 2 Top = 0 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False Picture = "NumPad.frx":01C6 PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyMove Height = 600 Index = 3 Left = 1800 TabIndex = 3 Top = 0 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 5 FocusRect = 0 'False Picture = "NumPad.frx":06D2 PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyMove Height = 600 Index = 2 Left = 1200 TabIndex = 4 Top = 0 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 2 FocusRect = 0 'False Picture = "NumPad.frx":0BD6 PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyMove Height = 600 Index = 1 Left = 600 TabIndex = 5 Top = 0 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 3 FocusRect = 0 'False Picture = "NumPad.frx":10DA PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyMove Height = 600 Index = 0 Left = 0 TabIndex = 6 Top = 0 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 0 FocusRect = 0 'False Picture = "NumPad.frx":15DE PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 19 Left = 600 TabIndex = 7 Tag = "{END}" Top = 1800 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 9 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 1 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "Ende" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 18 Left = 600 TabIndex = 8 Tag = "{HOME}" Top = 1200 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 9 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 1 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "Pos1" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 11 Left = 3000 TabIndex = 9 Tag = "-" Top = 600 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "–" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 10 Left = 2400 TabIndex = 10 Tag = "." Top = 2400 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "." UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 9 Left = 2400 TabIndex = 11 Tag = "9" Top = 600 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "9" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 7 Left = 1200 TabIndex = 13 Tag = "7" Top = 600 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "7" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 6 Left = 2400 TabIndex = 14 Tag = "6" Top = 1200 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "6" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 4 Left = 1200 TabIndex = 16 Tag = "4" Top = 1200 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "4" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 3 Left = 2400 TabIndex = 17 Tag = "3" Top = 1800 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "3" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 2 Left = 1800 TabIndex = 18 Tag = "2" Top = 1800 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "2" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 1 Left = 1200 TabIndex = 19 Tag = "1" Top = 1800 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "1" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 0 Left = 1200 TabIndex = 20 Tag = "0" Top = 2400 Width = 1200 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "0" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 16 Left = 0 TabIndex = 21 Tag = "{LEFT}" Top = 2400 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False Picture = "NumPad.frx":1AE2 PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 17 Left = 600 TabIndex = 22 Tag = "{RIGHT}" Top = 2400 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False Picture = "NumPad.frx":1BE8 PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 14 Left = 0 TabIndex = 23 Tag = "{BS}" Top = 1200 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False Picture = "NumPad.frx":1CEE PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 15 Left = 0 TabIndex = 24 Tag = "{DEL}" Top = 1800 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 9 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 1 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "Entf" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyEnd Height = 600 Index = 0 Left = 0 TabIndex = 25 Tag = "{ESC}" Top = 600 Width = 1200 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 9 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 1 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "Esc" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyPad Height = 600 Left = 2400 TabIndex = 26 Top = 0 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 12632256 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False Picture = "NumPad.frx":1DF4 PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 5 Left = 1800 TabIndex = 15 Tag = "5" Top = 1200 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "5" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End Begin VisiWinStudioLib.VWSKey keyStandard Height = 600 Index = 8 Left = 1800 TabIndex = 12 Tag = "8" Top = 600 Width = 600 _cx = 5080 _cy = 5080 VWItem = "" VWItemMonitor = "" Blink = 0 BitMonitor = 0 CaptionMonitorOn= "" ForeColorMonitorOn= -2147483630 BackColorMonitorOn= -2147483633 IndexGroup = "" AuthorizationMode= 0 Authorization = "-1" FontClass = "" RecipeMember = 0 'False SetMode = 0 BitNumber = 0 Enabled = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 18 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColor = 16777215 ForeColor = 0 BorderColor2D = -2147483630 BackStyle = 1 ButtonStyle = 1 Alignment = 7 FocusRect = 0 'False PictureAlign = 7 AutoSize = -1 'True EatsCursorKeys = 0 'False GlobalHotKey = 0 'False FocusOnClick = -1 'True EventOnKeyRepeat= 0 'False Caption = "8" UseMnemonic = 0 'False Key = 0 DownWhenDisabled= 0 'False End End Begin VWSLanguageLib.VWSIndex idxLimitMin Height = 285 Left = 1800 Top = 300 Width = 1800 _cx = 5080 _cy = 5080 BackStyle = 1 Enabled = -1 'True Alignment = 7 ShadowColor1 = -2147483632 ShadowColor2 = -2147483634 ShadowDepth = 2 ShadowStyle = 4 BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 8.25 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColorOff = 14737632 BackColorOn = -2147483643 ForeColorOff = -2147483640 ForeColorOn = -2147483640 TextRotation = 0 AuthorizationMode= 1 Authorization = "" VWItem = "" Blink = 0 IndexGroup = "" IndexPrefix = "" BitNumber = 0 Mode = -1 Offset = 0 Range = 1 FontClass = "" OffsetText = 0 TextOn = "" TextOff = "0" End Begin VWSLanguageLib.VWSIndex idxLimitMax Height = 285 Left = 1800 Top = 0 Width = 1800 _cx = 5080 _cy = 5080 BackStyle = 1 Enabled = -1 'True Alignment = 7 ShadowColor1 = -2147483632 ShadowColor2 = -2147483634 ShadowDepth = 2 ShadowStyle = 4 BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 8.25 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColorOff = 14737632 BackColorOn = -2147483643 ForeColorOff = -2147483640 ForeColorOn = -2147483640 TextRotation = 0 AuthorizationMode= 1 Authorization = "" VWItem = "" Blink = 0 IndexGroup = "" IndexPrefix = "" BitNumber = 0 Mode = -1 Offset = 0 Range = 1 FontClass = "" OffsetText = 0 TextOn = "" TextOff = "100" End Begin VWSLanguageLib.VWSIndex idxLabelLimits Height = 300 Index = 1 Left = 0 Top = 300 Width = 1800 _cx = 5080 _cy = 5080 BackStyle = 1 Enabled = -1 'True Alignment = 4 ShadowColor1 = -2147483632 ShadowColor2 = -2147483634 ShadowDepth = 2 ShadowStyle = 0 BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 8.25 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColorOff = 14737632 BackColorOn = -2147483643 ForeColorOff = -2147483640 ForeColorOn = -2147483640 TextRotation = 0 AuthorizationMode= 1 Authorization = "" VWItem = "" Blink = 0 IndexGroup = "" IndexPrefix = "" BitNumber = 0 Mode = -1 Offset = 0 Range = 1 FontClass = "" OffsetText = 0 TextOn = "" TextOff = "Minimum " End Begin VWSLanguageLib.VWSIndex idxLabelLimits Height = 300 Index = 0 Left = 0 Top = 0 Width = 1800 _cx = 5080 _cy = 5080 BackStyle = 1 Enabled = -1 'True Alignment = 4 ShadowColor1 = -2147483632 ShadowColor2 = -2147483634 ShadowDepth = 2 ShadowStyle = 0 BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "Arial" Size = 8.25 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BackColorOff = 14737632 BackColorOn = -2147483643 ForeColorOff = -2147483640 ForeColorOn = -2147483640 TextRotation = 0 AuthorizationMode= 1 Authorization = "" VWItem = "" Blink = 0 IndexGroup = "" IndexPrefix = "" BitNumber = 0 Mode = -1 Offset = 0 Range = 1 FontClass = "" OffsetText = 0 TextOn = "" TextOff = "Maximum " End End Attribute VB_Name = "FNumPad" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Option Explicit '<<< Vorsicht bei Änderungen an diesem Formular>>> Public Sub ChangeLanguage() 'Liest für die neue Sprache die Tastenbeschriftung und -code ein. 'Eingabe: ' glLCID: neue Sprachkennung. ' gnCharset: Font-Characterset für die Beschriftung. ' gsVWTouchKeyboardINI: Datei, aus der die Einstellungen gelesen werden. 'Ausgabe: ' Me.key...: angepasste Schaltflächen 'Limit-Beschriftung lesen ReadLimitParams Me 'Standard-Tasten ReadKeyParams keyStandard, "NumPad", "Std" 'Esc- und Enter-Tasten ReadKeyParams keyEnd, "NumPad", "End" End Sub Public Sub CheckLimits() idxLimitMin.TextOff = gsLimitMin idxLimitMax.TextOff = gsLimitMax idxLimitMax.Visible = gfShowLimits And Len(gsLimitMax) idxLabelLimits(0).Visible = idxLimitMax.Visible idxLimitMin.Visible = gfShowLimits And Len(gsLimitMin) idxLabelLimits(1).Visible = idxLimitMin.Visible If gfShowLimits And (Len(gsLimitMin) Or Len(gsLimitMax)) Then picKeys.Top = idxLabelLimits(1).Top + idxLabelLimits(1).Height Else picKeys.Top = 0 End If Me.Height = Me.Height - Me.ScaleHeight + picKeys.Top + picKeys.Height End Sub Private Sub Form_Load() FormResize Me End Sub Private Sub keyClose_Click() Me.Hide APISetFocus glHwndControl SendMessage glHwndController, glVWM_TouchKeyboardHides, 0, ByVal 0& End Sub Private Sub keyEnd_Click(Index As Integer) APISetFocus glHwndControl SendKeys keyEnd(Index).Tag Me.Hide SendMessage glHwndController, glVWM_TouchKeyboardHides, 0, ByVal 0& End Sub Private Sub keyMove_Click(Index As Integer) 'hier wird das NumPad-Fenster in die jeweilige Bildschirmecke verschoben Select Case Index Case 0 Me.Move 0, 0 Case 1 Me.Move Screen.Width - Me.Width, 0 Case 2 Me.Move 0, Screen.Height - Me.Height Case 3 Me.Move Screen.Width - Me.Width, Screen.Height - Me.Height End Select APISetFocus glHwndControl End Sub Private Sub keyPad_Click() ShowPad vwAlphaPad APISetFocus glHwndControl End Sub Private Sub keyStandard_Click(Index As Integer) APISetFocus glHwndControl SendKeys keyStandard(Index).Tag End Sub