home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 July & August
/
Pcwk78a98.iso
/
Wtestowe
/
Netshift
/
_SETUP.1
/
NSSetup.exe
/
0
/
RCDATA
/
TFORMMAIN
/
TFORMMAIN.txt
< prev
Wrap
Text File
|
1998-03-06
|
182KB
|
6,601 lines
object FormMain: TFormMain
Left = 99
Top = 104
BorderStyle = bsSingle
Caption = 'NetShift Setup Manager v2.0'
ClientHeight = 577
ClientWidth = 532
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object Panel: TPanel
Left = 0
Top = 0
Width = 89
Height = 577
Align = alLeft
TabOrder = 1
object Image1: TImage
Left = 1
Top = 17
Width = 87
Height = 52
Align = alTop
AutoSize = True
Center = True
Picture.Data = {<image000.bmp>}
end
object BitBtn1: TBitBtn
Left = 8
Top = 501
Width = 75
Height = 25
Hint = 'Abandon changes and exit'
ParentShowHint = False
ShowHint = True
TabOrder = 4
OnClick = BitBtn1Click
Kind = bkCancel
end
object BitBtn2: TBitBtn
Left = 8
Top = 541
Width = 75
Height = 25
Hint = 'Apply changes to NetShift and exit'
ParentShowHint = False
ShowHint = True
TabOrder = 5
OnClick = BitBtn2Click
Kind = bkOK
end
object Panel1: TPanel
Left = 1
Top = 1
Width = 87
Height = 16
Align = alTop
BevelOuter = bvNone
TabOrder = 6
end
object BitBtn4: TBitBtn
Left = 8
Top = 461
Width = 75
Height = 25
Hint =
'Auto configure NetShift example settings for non-default install' +
'ation path'
Caption = 'Set Dir'
ParentShowHint = False
ShowHint = True
TabOrder = 3
Visible = False
OnClick = BitBtn4Click
Kind = bkHelp
end
object BitBtn5: TBitBtn
Left = 8
Top = 341
Width = 75
Height = 25
Hint = 'Open a configuration'
Caption = 'Open'
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = ConfigClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555555555555555555555555555555
555555555555555555555555555555555555555FFFFFFFFFF555550000000000
55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
55555575FFF75555555555700007555555555557777555555555555555555555
55555555555555555555555555555555555555555555555555550000}
NumGlyphs = 2
end
object BitBtn6: TBitBtn
Left = 8
Top = 381
Width = 75
Height = 25
Hint = 'Save a copy of the current configuration'
Caption = 'Save As'
Default = True
ModalResult = 6
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = ConfigClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
0003737FFFFFFFFF7F73300999999999003337777777777777330000}
NumGlyphs = 2
end
object bnHelp: TBitBtn
Left = 8
Top = 421
Width = 75
Height = 25
Hint = 'View the NetShift technical documentation'
Caption = 'Manual'
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = bnHelpClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FF555FFFFFFF5FF0075500000005000775F57777777F7770B0550CC0090
50E07F7F57FF77F7F7F70B055000000050E07F75F7777777F7F70B7750CC0090
50E075F7F7F577F7F7F777B050CC009050E057F7F7F577F7F7F750B050CC0090
50E057F757F577F7F7F750B770CC009050E0575F77F577F7F7F7577B00CC0090
50E0557F77F577F7F7F7550B30CC00905000557F57FF77F7F777550B30000090
50E05575F77777F7F7F7557000CC00905000555777FF77F7F777555550000090
55555555577777F7F5555555555550005555555555555777F555555555555090
55555555555557F7F555555555555000555555555555577755550000}
NumGlyphs = 2
end
end
object PageControl: TPageControl
Left = 89
Top = 0
Width = 443
Height = 577
ActivePage = TabSheet9
Align = alClient
MultiLine = True
TabOrder = 0
object TabSheet1: TTabSheet
Caption = 'Preferences'
object GroupBox1: TGroupBox
Left = 8
Top = 88
Width = 201
Height = 57
Caption = 'Default Keyboard'
TabOrder = 2
object RBQWERTY: TRadioButton
Left = 24
Top = 16
Width = 113
Height = 17
Caption = 'full QWERTY'
TabOrder = 0
end
object RBABCDEF: TRadioButton
Left = 24
Top = 32
Width = 113
Height = 17
Caption = 'limited ABCDEF'
TabOrder = 1
end
end
object GroupBox2: TGroupBox
Left = 8
Top = 216
Width = 417
Height = 57
Caption = 'Browser Information'
TabOrder = 6
object Label4: TLabel
Left = 12
Top = 83
Width = 57
Height = 13
Alignment = taRightJustify
Caption = 'DDE Server'
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton8: TSpeedButton
Left = 386
Top = 32
Width = 21
Height = 21
Caption = '...'
OnClick = SpeedButton8Click
end
object Label47: TLabel
Left = 184
Top = 83
Width = 184
Height = 13
Caption = 'WARNING! - Do not change this value'
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object RBIE: TRadioButton
Left = 24
Top = 16
Width = 113
Height = 17
Caption = 'Internet Explorer'
TabOrder = 0
OnClick = RBIEClick
end
object EBrowserFileName: TEdit
Left = 96
Top = 32
Width = 289
Height = 21
TabOrder = 2
Text = '0'
end
object EBrowserDDE: TEdit
Left = 72
Top = 80
Width = 105
Height = 21
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'EBrowserDDE'
end
object RBNetscape: TRadioButton
Left = 24
Top = 32
Width = 73
Height = 17
Caption = 'Netscape'
TabOrder = 1
OnClick = RBIEClick
end
end
object GroupBox9: TGroupBox
Left = 224
Top = 8
Width = 201
Height = 73
Caption = 'Options'
TabOrder = 1
object CBExitOn: TCheckBox
Left = 24
Top = 16
Width = 153
Height = 17
Caption = 'Exit button Visible (Clock)'
TabOrder = 0
end
object CBCancelSecurity: TCheckBox
Left = 24
Top = 32
Width = 145
Height = 17
Caption = 'Cancel Security Violations'
TabOrder = 1
end
object cbxKeyBlock: TCheckBox
Left = 24
Top = 48
Width = 97
Height = 17
Caption = 'Key Blocking'
State = cbChecked
TabOrder = 2
end
end
object GroupBox17: TGroupBox
Left = 8
Top = 280
Width = 417
Height = 121
Caption = 'Protocols to Block'
TabOrder = 7
object Label54: TLabel
Left = 46
Top = 91
Width = 39
Height = 11
Alignment = taRightJustify
Caption = 'Protocol'
end
object LBProtocols: TListBox
Left = 16
Top = 24
Width = 297
Height = 57
ItemHeight = 13
TabOrder = 0
OnClick = LBProtocolsClick
end
object BProtocolAdd: TButton
Left = 328
Top = 24
Width = 75
Height = 25
Caption = 'Add'
TabOrder = 2
OnClick = BProtocolAddClick
end
object BProtocolDelete: TButton
Left = 328
Top = 56
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 3
OnClick = BProtocolDeleteClick
end
object EProtocol: TEdit
Left = 88
Top = 88
Width = 313
Height = 21
TabOrder = 1
Text = 'ECarouselURL'
OnChange = EProtocolChange
end
end
object GroupBox22: TGroupBox
Left = 8
Top = 8
Width = 201
Height = 73
Caption = 'New Browser Windows Handling'
TabOrder = 0
object RBTransfer: TRadioButton
Left = 24
Top = 16
Width = 113
Height = 17
Caption = 'Always Transfer'
TabOrder = 0
end
object RBClose: TRadioButton
Left = 24
Top = 32
Width = 113
Height = 17
Caption = 'Always Close'
TabOrder = 1
end
object RBAskUser: TRadioButton
Left = 24
Top = 48
Width = 113
Height = 17
Caption = 'Ask User'
TabOrder = 2
end
end
object GroupBox23: TGroupBox
Left = 224
Top = 88
Width = 201
Height = 57
Caption = 'Screen Mode'
TabOrder = 3
object RBAutomatic: TRadioButton
Left = 24
Top = 16
Width = 113
Height = 17
Caption = 'Automatic'
TabOrder = 0
OnClick = RBAutomaticClick
end
object RBSetTo: TRadioButton
Left = 24
Top = 32
Width = 113
Height = 17
Caption = 'Set to'
TabOrder = 1
OnClick = RBSetToClick
end
object CBSetTo: TComboBox
Left = 80
Top = 32
Width = 97
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'640 x 480'
'800 x 600'
'1024 x 768'
'1152 x 864'
'1280 x 1024'
'1600 x 1200')
TabOrder = 2
end
end
object GroupBox24: TGroupBox
Left = 8
Top = 152
Width = 201
Height = 57
Caption = 'Scroll Button Mode'
TabOrder = 4
object RBScrollOn: TRadioButton
Left = 24
Top = 16
Width = 113
Height = 17
Caption = 'Hold to Scroll'
TabOrder = 0
end
object RBScrollOff: TRadioButton
Left = 24
Top = 32
Width = 153
Height = 17
Caption = 'Scroll half page every press'
TabOrder = 1
end
end
object GroupBox34: TGroupBox
Left = 224
Top = 152
Width = 201
Height = 57
Caption = 'Standard Buttons'
TabOrder = 5
object Label76: TLabel
Left = 16
Top = 26
Width = 97
Height = 11
Caption = 'Number of Buttons'
end
object CBButtons: TComboBox
Left = 112
Top = 24
Width = 65
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'5'
'6'
'7'
'8')
TabOrder = 0
end
end
object GroupBox40: TGroupBox
Left = 8
Top = 408
Width = 417
Height = 121
Caption = 'Dialogs To Process'
TabOrder = 8
object Label117: TLabel
Left = 46
Top = 91
Width = 92
Height = 13
Caption = 'Dialog with string ...'
end
object lbxDialogs: TListBox
Left = 16
Top = 24
Width = 297
Height = 57
ItemHeight = 13
TabOrder = 0
end
object edtDialog: TEdit
Left = 144
Top = 88
Width = 257
Height = 21
TabOrder = 1
end
object bnAddDialog: TButton
Left = 328
Top = 24
Width = 75
Height = 25
Caption = 'Add'
TabOrder = 2
OnClick = bnAddDialogClick
end
object bnDelDialog: TButton
Left = 328
Top = 56
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 3
OnClick = bnDelDialogClick
end
end
end
object TabSheet6: TTabSheet
Caption = 'Log File'
object GroupBox16: TGroupBox
Left = 224
Top = 8
Width = 201
Height = 161
Caption = 'What do you want to log?'
TabOrder = 1
object CBLogURLs: TCheckBox
Left = 16
Top = 16
Width = 97
Height = 17
Caption = 'User actions'
TabOrder = 0
end
object CBLogTimeURLs: TCheckBox
Left = 16
Top = 40
Width = 97
Height = 17
Caption = 'Timed Actions'
TabOrder = 1
end
object CBLogCarouselURLs: TCheckBox
Left = 16
Top = 64
Width = 97
Height = 17
Caption = 'Carousel Actions'
TabOrder = 2
end
object CBLogVideoStart: TCheckBox
Left = 16
Top = 88
Width = 97
Height = 17
Caption = 'Video Actions'
TabOrder = 3
end
object CBLogLoadedURLs: TCheckBox
Left = 16
Top = 112
Width = 137
Height = 17
Caption = 'Browser Loaded Pages'
TabOrder = 4
end
object CBLogProtocol: TCheckBox
Left = 16
Top = 136
Width = 137
Height = 17
Caption = 'Blocked Protocols'
TabOrder = 5
end
end
object GroupBox18: TGroupBox
Left = 8
Top = 8
Width = 201
Height = 161
Caption = 'Log file activity'
TabOrder = 0
object Label3: TLabel
Left = 46
Top = 75
Width = 22
Height = 15
Alignment = taRightJustify
Caption = 'Hour'
end
object Label48: TLabel
Left = 37
Top = 107
Width = 31
Height = 15
Alignment = taRightJustify
Caption = 'Minute'
end
object CBSaveLog: TCheckBox
Left = 16
Top = 16
Width = 97
Height = 17
Caption = 'Save Log File'
TabOrder = 0
end
object CBEmailLog: TCheckBox
Left = 16
Top = 32
Width = 97
Height = 17
Caption = 'E-mail Log File'
TabOrder = 1
end
object ELogMinute: TEdit
Left = 72
Top = 104
Width = 57
Height = 21
TabOrder = 5
Text = '0'
end
object UpDown1: TUpDown
Left = 129
Top = 72
Width = 15
Height = 21
Associate = ELogHour
Min = 0
Max = 23
Position = 0
TabOrder = 4
Wrap = False
end
object UpDown2: TUpDown
Left = 129
Top = 104
Width = 15
Height = 21
Associate = ELogMinute
Min = 0
Max = 59
Increment = 5
Position = 0
TabOrder = 6
Wrap = False
end
object CBEmailFeedback: TCheckBox
Left = 16
Top = 48
Width = 97
Height = 17
Caption = 'Email Feedback'
TabOrder = 2
end
object ELogHour: TEdit
Left = 72
Top = 72
Width = 57
Height = 21
TabOrder = 3
Text = '0'
end
end
object GroupBox19: TGroupBox
Left = 8
Top = 176
Width = 417
Height = 113
Caption = 'E-Mail Configuration'
TabOrder = 2
object Label49: TLabel
Left = 4
Top = 27
Width = 66
Height = 11
Alignment = taRightJustify
Caption = 'From Address'
end
object Label50: TLabel
Left = 16
Top = 51
Width = 53
Height = 11
Alignment = taRightJustify
Caption = 'From Name'
end
object Label51: TLabel
Left = 32
Top = 75
Width = 37
Height = 11
Alignment = taRightJustify
Caption = 'Server'
end
object EEmailFromAddress: TEdit
Left = 72
Top = 24
Width = 337
Height = 21
TabOrder = 0
Text = 'EEmailFromAddress'
end
object EEmailFromName: TEdit
Left = 72
Top = 48
Width = 337
Height = 21
TabOrder = 1
Text = 'EEmailFromName'
end
object EEmailServer: TEdit
Left = 72
Top = 72
Width = 337
Height = 21
TabOrder = 2
Text = 'EEmailServer'
end
end
object GroupBox20: TGroupBox
Left = 8
Top = 296
Width = 417
Height = 225
Caption = 'Log File Recipients'
TabOrder = 3
object Label52: TLabel
Left = 5
Top = 171
Width = 76
Height = 11
Alignment = taRightJustify
Caption = 'E-Mail Address'
end
object Label53: TLabel
Left = 45
Top = 195
Width = 36
Height = 11
Alignment = taRightJustify
Caption = 'Name'
end
object LBAddress: TListBox
Left = 16
Top = 24
Width = 297
Height = 121
ItemHeight = 13
TabOrder = 0
OnClick = LBAddressClick
end
object BRecipientAdd: TButton
Left = 328
Top = 24
Width = 75
Height = 25
Caption = 'Add'
TabOrder = 3
OnClick = BRecipientAddClick
end
object BRecipientDelete: TButton
Left = 328
Top = 56
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 4
OnClick = BRecipientDeleteClick
end
object EAddress: TEdit
Left = 88
Top = 168
Width = 313
Height = 21
TabOrder = 1
OnChange = EAddressChange
end
object EName: TEdit
Left = 88
Top = 192
Width = 313
Height = 21
TabOrder = 2
Text = '1'
OnChange = ENameChange
end
end
end
object TabSheet5: TTabSheet
Caption = 'Buttons'
object GroupBox48: TGroupBox
Left = 12
Top = 0
Width = 409
Height = 121
Caption = 'Function Buttons'
TabOrder = 0
object bnGlyphFunc: TSpeedButton
Left = 315
Top = 51
Width = 21
Height = 21
Caption = '...'
OnClick = GlyphButtonClick
end
object Label2: TLabel
Left = 45
Top = 38
Width = 21
Height = 13
Caption = 'Text'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label46: TLabel
Left = 120
Top = 38
Width = 27
Height = 13
Caption = 'Glyph'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 11
Top = 38
Width = 18
Height = 13
Caption = 'Pos'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label116: TLabel
Left = 342
Top = 38
Width = 25
Height = 13
Caption = 'State'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label152: TLabel
Left = 11
Top = 79
Width = 64
Height = 13
Caption = 'Audio Source'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label153: TLabel
Left = 120
Top = 79
Width = 69
Height = 13
Caption = 'Custom Sound'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object bnFuncSnd: TSpeedButton
Left = 315
Top = 92
Width = 21
Height = 21
Caption = '...'
OnClick = SoundClick
end
object cbGetFuncButton: TComboBox
Left = 11
Top = 14
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'Start'
'Back'
'Forward'
'Help'
'Print'
'Stop'
'Reload'
'Email')
TabOrder = 0
OnClick = cbGetFuncButtonClick
end
object edtTextFunc: TEdit
Left = 45
Top = 51
Width = 72
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'edtTextFunc'
OnChange = FunctionTextChange
end
object edtGlyphFunc: TEdit
Left = 120
Top = 51
Width = 193
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'edtGlyphFunc'
OnChange = FunctionTextChange
end
object cbxFunc: TComboBox
Left = 11
Top = 51
Width = 33
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'0'
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8')
ParentFont = False
TabOrder = 1
Text = 'ComboBox1'
OnChange = FunctionTextChange
end
object edtButState: TEdit
Left = 342
Top = 51
Width = 17
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 4
Text = '2'
OnChange = FunctionTextChange
end
object udButState: TUpDown
Left = 359
Top = 51
Width = 15
Height = 21
Associate = edtButState
Min = 1
Max = 3
Position = 2
TabOrder = 5
Wrap = False
end
object cbxFuncSnd: TComboBox
Left = 11
Top = 92
Width = 89
Height = 21
Style = csDropDownList
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'NONE'
'Machine'
'Asterisk'
'Exclamation'
'Critical'
'Question'
'Default'
'Custom')
ParentFont = False
TabOrder = 6
OnChange = FunctionTextChange
end
object edtFuncSnd: TEdit
Left = 120
Top = 92
Width = 193
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
Text = 'edtFuncSnd'
OnChange = FunctionTextChange
end
end
object GroupBox46: TGroupBox
Left = 12
Top = 129
Width = 409
Height = 129
Caption = 'Keyboard Function Buttons'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
object Label26: TLabel
Left = 13
Top = 34
Width = 27
Height = 13
Alignment = taRightJustify
Caption = 'Show'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 13
Top = 65
Width = 22
Height = 13
Alignment = taRightJustify
Caption = 'Hide'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton7: TSpeedButton
Left = 347
Top = 29
Width = 21
Height = 21
Caption = '...'
OnClick = SpeedButton7Click
end
object SpeedButton9: TSpeedButton
Left = 347
Top = 61
Width = 21
Height = 21
Caption = '...'
OnClick = SpeedButton9Click
end
object Label162: TLabel
Left = 77
Top = 16
Width = 21
Height = 13
Caption = 'Text'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label163: TLabel
Left = 152
Top = 16
Width = 27
Height = 13
Caption = 'Glyph'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label164: TLabel
Left = 43
Top = 16
Width = 18
Height = 13
Caption = 'Pos'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label168: TLabel
Left = 372
Top = 16
Width = 25
Height = 13
Caption = 'State'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label191: TLabel
Left = 77
Top = 89
Width = 64
Height = 13
Caption = 'Audio Source'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label192: TLabel
Left = 176
Top = 89
Width = 69
Height = 13
Caption = 'Custom Sound'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object bnKeyboardSnd: TSpeedButton
Left = 347
Top = 102
Width = 21
Height = 21
Caption = '...'
OnClick = SoundClick
end
object ETextShow: TEdit
Left = 77
Top = 29
Width = 72
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'ETextShow'
end
object ETextHide: TEdit
Left = 77
Top = 61
Width = 72
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'ETextHide'
end
object EGlyphShow: TEdit
Left = 152
Top = 29
Width = 193
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'Edit1'
end
object EGlyphHide: TEdit
Left = 152
Top = 61
Width = 193
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
Text = 'Edit1'
end
object CBKeyboard: TComboBox
Left = 43
Top = 45
Width = 33
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'0'
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8')
ParentFont = False
TabOrder = 0
Text = 'ComboBox1'
end
object udButState9: TUpDown
Left = 389
Top = 45
Width = 15
Height = 21
Associate = edtButState9
Min = 1
Max = 3
Position = 2
TabOrder = 8
Wrap = False
end
object edtButState9: TEdit
Left = 372
Top = 45
Width = 17
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 5
Text = '2'
end
object cbxKeyboardSnd: TComboBox
Left = 77
Top = 102
Width = 89
Height = 21
Style = csDropDownList
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'NONE'
'Machine'
'Asterisk'
'Exclamation'
'Critical'
'Question'
'Default'
'Custom')
ParentFont = False
TabOrder = 6
end
object edtKeyboardSnd: TEdit
Left = 176
Top = 102
Width = 169
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
Text = 'edtKeyboardSnd'
end
end
object GroupBox8: TGroupBox
Left = 12
Top = 264
Width = 409
Height = 121
Caption = 'Direction Buttons'
TabOrder = 2
object bnGlyphDir: TSpeedButton
Left = 281
Top = 47
Width = 21
Height = 21
Caption = '...'
OnClick = GlyphButtonClick
end
object Label22: TLabel
Left = 11
Top = 34
Width = 21
Height = 13
Caption = 'Text'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label28: TLabel
Left = 86
Top = 34
Width = 27
Height = 13
Caption = 'Glyph'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label30: TLabel
Left = 308
Top = 34
Width = 25
Height = 13
Caption = 'State'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label201: TLabel
Left = 11
Top = 75
Width = 64
Height = 13
Caption = 'Audio Source'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label202: TLabel
Left = 104
Top = 75
Width = 69
Height = 13
Caption = 'Custom Sound'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object bnDirSnd: TSpeedButton
Left = 281
Top = 88
Width = 21
Height = 21
Caption = '...'
OnClick = SoundClick
end
object cbGetDirButton: TComboBox
Left = 11
Top = 14
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'Up'
'Down'
'Left'
'Right')
TabOrder = 0
OnClick = cbGetDirButtonClick
end
object CBScrollOn: TCheckBox
Left = 176
Top = 15
Width = 134
Height = 17
Caption = 'Activate Direction Keys'
TabOrder = 1
end
object edtTextDir: TEdit
Left = 11
Top = 47
Width = 72
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'edtTextDir'
OnChange = DirTextChange
end
object edtGlyphDir: TEdit
Left = 86
Top = 47
Width = 193
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'Edit1'
OnChange = DirTextChange
end
object edtDirState: TEdit
Left = 308
Top = 47
Width = 17
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 4
Text = '2'
OnChange = DirTextChange
end
object udDirState: TUpDown
Left = 325
Top = 47
Width = 15
Height = 21
Associate = edtDirState
Min = 1
Max = 3
Position = 2
TabOrder = 5
Wrap = False
end
object cbxDirSnd: TComboBox
Left = 11
Top = 88
Width = 89
Height = 21
Style = csDropDownList
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'NONE'
'Machine'
'Asterisk'
'Exclamation'
'Critical'
'Question'
'Default'
'Custom')
ParentFont = False
TabOrder = 6
OnChange = DirTextChange
end
object edtDirSnd: TEdit
Left = 104
Top = 88
Width = 174
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
Text = 'edtDirSnd'
OnChange = DirTextChange
end
end
object GroupBox47: TGroupBox
Left = 12
Top = 392
Width = 409
Height = 121
Caption = 'Custom Buttons'
TabOrder = 3
object bnCustomGlyph: TSpeedButton
Left = 315
Top = 47
Width = 21
Height = 21
Caption = '...'
OnClick = GlyphButtonClick
end
object bnCustomURL: TSpeedButton
Left = 157
Top = 47
Width = 21
Height = 21
Caption = '...'
OnClick = SelectLocalURL
end
object bnCustomSnd: TSpeedButton
Left = 350
Top = 88
Width = 21
Height = 21
Caption = '...'
OnClick = SoundClick
end
object Label5: TLabel
Left = 11
Top = 75
Width = 21
Height = 13
Caption = 'Text'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 182
Top = 34
Width = 27
Height = 13
Caption = 'Glyph'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 342
Top = 34
Width = 25
Height = 13
Caption = 'State'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label20: TLabel
Left = 139
Top = 75
Width = 64
Height = 13
Caption = 'Audio Source'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label21: TLabel
Left = 232
Top = 75
Width = 69
Height = 13
Caption = 'Custom Sound'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 11
Top = 34
Width = 22
Height = 13
Caption = 'URL'
end
object cbGetCustomButton: TComboBox
Left = 11
Top = 14
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'Button 1'
'Button 2'
'Button 3'
'Button 4'
'Button 5'
'Button 6'
'Button 7'
'Button 8'
'Button 9'
'Button 10')
TabOrder = 0
OnClick = cbGetCustomButtonClick
end
object edtCustomURL: TEdit
Left = 11
Top = 47
Width = 145
Height = 21
TabOrder = 1
Text = 'edtCustomURL'
OnChange = CustomTextChange
end
object edtCustomText: TEdit
Left = 11
Top = 88
Width = 124
Height = 21
TabOrder = 5
Text = 'edtCustomText'
OnChange = CustomTextChange
end
object edtCustomGlyph: TEdit
Left = 182
Top = 47
Width = 131
Height = 21
TabOrder = 2
Text = 'edtCustomGlyph'
OnChange = CustomTextChange
end
object edtCustomState: TEdit
Left = 342
Top = 47
Width = 17
Height = 21
ReadOnly = True
TabOrder = 3
Text = '1'
OnChange = CustomTextChange
end
object udCustomState: TUpDown
Left = 359
Top = 47
Width = 15
Height = 21
Associate = edtCustomState
Min = 1
Max = 3
Position = 1
TabOrder = 4
Wrap = False
end
object cbxCustomSnd: TComboBox
Left = 139
Top = 88
Width = 89
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'NONE'
'Machine'
'Asterisk'
'Exclamation'
'Critical'
'Question'
'Default'
'Custom')
TabOrder = 6
OnChange = CustomTextChange
end
object edtCustomSnd: TEdit
Left = 232
Top = 88
Width = 117
Height = 21
TabOrder = 7
Text = 'edtCustomSnd'
OnChange = CustomTextChange
end
end
end
object TabSheet3: TTabSheet
Caption = 'Attract'
object GroupBox11: TGroupBox
Left = 8
Top = 16
Width = 201
Height = 97
Caption = 'Times'
TabOrder = 0
object Label43: TLabel
Left = 160
Top = 24
Width = 16
Height = 11
Caption = 'sec.'
end
object Label34: TLabel
Left = 8
Top = 19
Width = 101
Height = 14
Alignment = taRightJustify
Caption = 'Return to Start Page'
end
object Label36: TLabel
Left = 16
Top = 67
Width = 93
Height = 14
Alignment = taRightJustify
Caption = 'Start attract Video'
end
object Label35: TLabel
Left = 30
Top = 43
Width = 79
Height = 14
Alignment = taRightJustify
Caption = 'Start Carousel'
end
object Label44: TLabel
Left = 160
Top = 48
Width = 16
Height = 11
Caption = 'sec.'
end
object Label45: TLabel
Left = 160
Top = 72
Width = 16
Height = 11
Caption = 'sec.'
end
object ETimeStart: TEdit
Left = 112
Top = 16
Width = 33
Height = 21
TabOrder = 0
Text = '0'
end
object UDTimeStart: TUpDown
Left = 145
Top = 16
Width = 19
Height = 21
Associate = ETimeStart
Min = 0
Max = 21600
Increment = 10
Position = 0
TabOrder = 1
Thousands = False
Wrap = False
end
object ETimeCarousel: TEdit
Left = 112
Top = 40
Width = 33
Height = 21
TabOrder = 2
Text = '0'
end
object UDTimeCarousel: TUpDown
Left = 145
Top = 40
Width = 19
Height = 21
Associate = ETimeCarousel
Min = 0
Max = 21600
Increment = 10
Position = 0
TabOrder = 3
Thousands = False
Wrap = False
end
object ETimeVideo: TEdit
Left = 112
Top = 64
Width = 33
Height = 21
TabOrder = 4
Text = '0'
end
object UDTimeVideo: TUpDown
Left = 145
Top = 64
Width = 19
Height = 21
Associate = ETimeVideo
Min = 0
Max = 21600
Increment = 10
Position = 0
TabOrder = 5
Thousands = False
Wrap = False
end
end
object GroupBox12: TGroupBox
Left = 8
Top = 152
Width = 417
Height = 97
Caption = 'AVI Video'
TabOrder = 2
object Label37: TLabel
Left = 16
Top = 19
Width = 70
Height = 14
Alignment = taRightJustify
Caption = 'File Name'
end
object SpeedButton6: TSpeedButton
Left = 386
Top = 16
Width = 21
Height = 21
Caption = '...'
OnClick = SpeedButton6Click
end
object Label89: TLabel
Left = 16
Top = 43
Width = 70
Height = 14
Alignment = taRightJustify
Caption = 'Width'
end
object Label90: TLabel
Left = 155
Top = 48
Width = 32
Height = 14
Caption = 'pixels'
end
object Label91: TLabel
Left = 16
Top = 67
Width = 70
Height = 14
Alignment = taRightJustify
Caption = 'Height'
end
object Label92: TLabel
Left = 155
Top = 72
Width = 32
Height = 14
Caption = 'pixels'
end
object EVideoFileName: TEdit
Left = 88
Top = 16
Width = 297
Height = 21
TabOrder = 0
Text = 'EVideoFileName'
end
object EVideoWidth: TEdit
Left = 88
Top = 40
Width = 49
Height = 21
TabOrder = 1
Text = '0'
end
object UpDown6: TUpDown
Left = 137
Top = 40
Width = 19
Height = 21
Associate = EVideoWidth
Min = 0
Max = 21600
Increment = 10
Position = 0
TabOrder = 2
Thousands = False
Wrap = False
end
object EVideoHeight: TEdit
Left = 88
Top = 64
Width = 49
Height = 21
TabOrder = 3
Text = '0'
end
object UpDown7: TUpDown
Left = 137
Top = 64
Width = 19
Height = 21
Associate = EVideoHeight
Min = 0
Max = 21600
Increment = 10
Position = 0
TabOrder = 4
Thousands = False
Wrap = False
end
end
object GroupBox13: TGroupBox
Left = 8
Top = 288
Width = 417
Height = 233
Caption = 'Carousel'
TabOrder = 3
object Label38: TLabel
Left = 45
Top = 171
Width = 38
Height = 14
Alignment = taRightJustify
Caption = 'URL'
end
object Label39: TLabel
Left = 37
Top = 195
Width = 46
Height = 14
Alignment = taRightJustify
Caption = 'Time'
end
object bnCarouselURL: TSpeedButton
Left = 386
Top = 168
Width = 21
Height = 21
Caption = '...'
OnClick = SelectLocalURL
end
object LBCarouselURLS: TListBox
Left = 16
Top = 24
Width = 305
Height = 137
ItemHeight = 13
TabOrder = 0
OnClick = LBCarouselURLSClick
end
object BCarouselAdd: TButton
Left = 328
Top = 24
Width = 75
Height = 25
Caption = 'Add'
TabOrder = 4
OnClick = BCarouselAddClick
end
object BCarouselDelete: TButton
Left = 328
Top = 56
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 5
OnClick = BCarouselDeleteClick
end
object edtCarouselURL: TEdit
Left = 88
Top = 168
Width = 297
Height = 21
TabOrder = 1
Text = 'edtCarouselURL'
OnChange = edtCarouselURLChange
end
object ECarouselTime: TEdit
Left = 88
Top = 192
Width = 49
Height = 21
TabOrder = 2
Text = '1'
OnChange = ECarouselTimeChange
end
object UpDown4: TUpDown
Left = 137
Top = 192
Width = 19
Height = 21
Associate = ECarouselTime
Min = 1
Max = 21600
Increment = 5
Position = 1
TabOrder = 3
Thousands = False
Wrap = False
end
object BCarouselUp: TButton
Left = 328
Top = 88
Width = 33
Height = 25
Caption = 'Up'
TabOrder = 6
OnClick = BCarouselUpClick
end
object BCarouselDown: TButton
Left = 368
Top = 88
Width = 33
Height = 25
Caption = 'Down'
TabOrder = 7
OnClick = BCarouselDownClick
end
end
object GroupBox15: TGroupBox
Left = 224
Top = 16
Width = 201
Height = 97
Caption = 'Carousel Options'
TabOrder = 1
object CBGoToStart: TCheckBox
Left = 8
Top = 40
Width = 169
Height = 17
Caption = 'Load Start page after Carousel'
TabOrder = 0
end
end
end
object TabSheet4: TTabSheet
Caption = 'Banners && URLs'
object GroupBox14: TGroupBox
Left = 8
Top = 256
Width = 417
Height = 265
Caption = 'Banner Graphics'
TabOrder = 2
object Label40: TLabel
Left = 48
Top = 211
Width = 38
Height = 14
Alignment = taRightJustify
Caption = 'URL'
end
object Label41: TLabel
Left = 40
Top = 235
Width = 46
Height = 14
Alignment = taRightJustify
Caption = 'Time'
end
object Label42: TLabel
Left = 16
Top = 187
Width = 70
Height = 14
Alignment = taRightJustify
Caption = 'Graphic File'
end
object SBFindBanner: TSpeedButton
Left = 386
Top = 184
Width = 21
Height = 21
Caption = '...'
OnClick = SBFindBannerClick
end
object bnBannerURL: TSpeedButton
Left = 386
Top = 208
Width = 21
Height = 21
Caption = '...'
OnClick = SelectLocalURL
end
object LBBannerGraphics: TListBox
Left = 14
Top = 15
Width = 299
Height = 162
ItemHeight = 13
TabOrder = 0
OnClick = LBBannerGraphicsClick
end
object BBannerAdd: TButton
Left = 328
Top = 24
Width = 75
Height = 25
Caption = 'Add'
TabOrder = 5
OnClick = BBannerAddClick
end
object BBannerDelete: TButton
Left = 328
Top = 56
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 6
OnClick = BBannerDeleteClick
end
object UpDown5: TUpDown
Left = 137
Top = 232
Width = 19
Height = 21
Associate = EBannerTime
Min = 1
Max = 21600
Increment = 5
Position = 1
TabOrder = 4
Thousands = False
Wrap = False
end
object EBannerGraphic: TEdit
Left = 88
Top = 184
Width = 297
Height = 21
TabOrder = 1
Text = 'Edit38'
OnChange = EBannerGraphicChange
end
object edtBannerURL: TEdit
Left = 88
Top = 208
Width = 297
Height = 21
TabOrder = 2
Text = 'Edit38'
OnChange = edtBannerURLChange
end
object EBannerTime: TEdit
Left = 88
Top = 232
Width = 49
Height = 21
TabOrder = 3
Text = '1'
OnChange = EBannerTimeChange
end
object BBannerUp: TButton
Left = 328
Top = 88
Width = 33
Height = 25
Caption = 'Up'
TabOrder = 7
OnClick = BBannerUpClick
end
object BBannerDown: TButton
Left = 368
Top = 88
Width = 33
Height = 25
Caption = 'Down'
TabOrder = 8
OnClick = BBannerDownClick
end
end
object GroupBox21: TGroupBox
Left = 8
Top = 8
Width = 417
Height = 73
Caption = 'Logo Settings'
TabOrder = 0
object Label31: TLabel
Left = 24
Top = 18
Width = 40
Height = 14
Alignment = taRightJustify
Caption = 'URL'
end
object bnLogoFile: TSpeedButton
Left = 386
Top = 40
Width = 21
Height = 21
Caption = '...'
OnClick = GlyphButtonClick
end
object Label55: TLabel
Left = 8
Top = 42
Width = 56
Height = 14
Alignment = taRightJustify
Caption = 'Graphic File'
end
object bnURLSLogo: TSpeedButton
Left = 386
Top = 16
Width = 21
Height = 21
Caption = '...'
OnClick = SelectLocalURL
end
object edtURLSLogo: TEdit
Left = 72
Top = 16
Width = 313
Height = 21
TabOrder = 0
Text = 'edtURLSLogo'
end
object edtLogoFile: TEdit
Left = 72
Top = 40
Width = 313
Height = 21
TabOrder = 1
end
end
object GroupBox10: TGroupBox
Left = 8
Top = 128
Width = 417
Height = 73
Caption = 'Button URLs'
TabOrder = 1
object Label32: TLabel
Left = 32
Top = 42
Width = 32
Height = 14
Alignment = taRightJustify
Caption = 'Help'
end
object Label33: TLabel
Left = 24
Top = 18
Width = 40
Height = 14
Alignment = taRightJustify
Caption = 'Start'
end
object bnURLSHelp: TSpeedButton
Left = 386
Top = 40
Width = 21
Height = 21
Caption = '...'
OnClick = SelectLocalURL
end
object bnURLSStart: TSpeedButton
Left = 386
Top = 16
Width = 21
Height = 21
Caption = '...'
OnClick = SelectLocalURL
end
object edtURLSHelp: TEdit
Left = 72
Top = 40
Width = 313
Height = 21
TabOrder = 1
Text = 'edtURLSHelp'
end
object edtURLSStart: TEdit
Left = 72
Top = 16
Width = 313
Height = 21
TabOrder = 0
Text = 'edtURLSStart'
end
end
end
object TabSheet7: TTabSheet
Caption = 'Command'
object GroupBox25: TGroupBox
Left = 8
Top = 8
Width = 201
Height = 73
Caption = 'URL Commands'
TabOrder = 0
object RBCommandEnabled: TRadioButton
Left = 24
Top = 16
Width = 73
Height = 17
Caption = 'Enabled'
TabOrder = 0
end
object RBCommandDisabled: TRadioButton
Left = 24
Top = 40
Width = 73
Height = 17
Caption = 'Disabled'
TabOrder = 1
end
end
object GroupBox26: TGroupBox
Left = 224
Top = 8
Width = 201
Height = 73
Caption = 'Dynamic Program Execution'
TabOrder = 1
object RBExecuteEnabled: TRadioButton
Left = 24
Top = 16
Width = 73
Height = 17
Caption = 'Enabled'
TabOrder = 0
end
object RBExecuteDisabled: TRadioButton
Left = 24
Top = 40
Width = 73
Height = 17
Caption = 'Disabled'
TabOrder = 1
end
end
object GroupBox27: TGroupBox
Left = 8
Top = 224
Width = 417
Height = 273
Caption = 'Program Files'
TabOrder = 3
object Label58: TLabel
Left = 24
Top = 243
Width = 62
Height = 15
Alignment = taRightJustify
Caption = 'Program File'
end
object SBFindProgram: TSpeedButton
Left = 386
Top = 240
Width = 21
Height = 21
Caption = '...'
OnClick = SBFindProgramClick
end
object LBPrograms: TListBox
Left = 14
Top = 15
Width = 297
Height = 218
ItemHeight = 13
TabOrder = 0
OnClick = LBProgramsClick
end
object BProgramAdd: TButton
Left = 328
Top = 24
Width = 75
Height = 25
Caption = 'Add'
TabOrder = 2
OnClick = BProgramAddClick
end
object BProgramDelete: TButton
Left = 328
Top = 56
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 3
OnClick = BProgramDeleteClick
end
object EProgram: TEdit
Left = 88
Top = 240
Width = 297
Height = 21
TabOrder = 1
Text = 'Edit38'
OnChange = EProgramChange
end
object BProgramUp: TButton
Left = 328
Top = 88
Width = 33
Height = 25
Caption = 'Up'
TabOrder = 4
OnClick = BProgramUpClick
end
object BProgramDown: TButton
Left = 368
Top = 88
Width = 33
Height = 25
Caption = 'Down'
TabOrder = 5
OnClick = BProgramDownClick
end
end
object GroupBox28: TGroupBox
Left = 8
Top = 120
Width = 417
Height = 65
Caption = 'Command Password'
TabOrder = 2
object Label56: TLabel
Left = 32
Top = 27
Width = 54
Height = 14
Alignment = taRightJustify
Caption = 'Password'
end
object ECommandPassword: TEdit
Left = 88
Top = 24
Width = 321
Height = 21
TabOrder = 0
Text = 'ECommandPassword'
end
end
end
object TabSheet9: TTabSheet
Caption = 'Security && Messages'
object GroupBox35: TGroupBox
Left = 8
Top = 64
Width = 417
Height = 57
Caption = 'Password Sequence'
TabOrder = 1
object RBPasswordEnabled: TRadioButton
Left = 96
Top = 16
Width = 185
Height = 17
Caption = 'Password Sequence is Enabled'
TabOrder = 0
end
object RBPasswordDisabled: TRadioButton
Left = 96
Top = 32
Width = 193
Height = 17
Caption = 'Password Sequence is Disabled'
TabOrder = 1
end
end
object GroupBox36: TGroupBox
Left = 8
Top = 128
Width = 417
Height = 193
Caption = 'Password Sequence'
TabOrder = 2
object Label77: TLabel
Left = 32
Top = 155
Width = 54
Height = 14
Alignment = taRightJustify
Caption = 'Object'
end
object LBPassword: TListBox
Left = 14
Top = 23
Width = 297
Height = 114
ItemHeight = 13
TabOrder = 0
OnClick = LBPasswordClick
end
object Button1: TButton
Left = 328
Top = 24
Width = 75
Height = 25
Caption = 'Add'
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 328
Top = 56
Width = 75
Height = 25
Caption = 'Delete'
TabOrder = 3
OnClick = Button2Click
end
object Button3: TButton
Left = 328
Top = 88
Width = 33
Height = 25
Caption = 'Up'
TabOrder = 4
OnClick = Button3Click
end
object Button4: TButton
Left = 368
Top = 88
Width = 33
Height = 25
Caption = 'Down'
TabOrder = 5
OnClick = Button4Click
end
object CBObject: TComboBox
Left = 88
Top = 152
Width = 281
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'A - Clock'
'B - Banner'
'C - Logo'
'D - Custom Button 1'
'E - Custom Button 2'
'F - Custom Button 3 '
'G - Custom Button 4 '
'H - Custom Button 5'
'I - Custom Button 6'
'J - Custom Button 7'
'K - Custom Button 8'
'L - Custom Button 9'
'M - Custom Button 10'
'N - Up Button'
'O - Down Button'
'P - Left Button'
'Q - Right Button'
'R - Start Button'
'S - Back Button'
'T - Forward Button'
'U - Help Button'
'V - Print Button'
'W - Stop Button'
'X - Reload Button'
'Y - Email Button'
'Z - Keyboard Button')
TabOrder = 1
OnChange = CBObjectChange
end
end
object GroupBox38: TGroupBox
Left = 8
Top = 328
Width = 417
Height = 193
Caption = 'End User Messaging'
TabOrder = 3
object Label10: TLabel
Left = 8
Top = 96
Width = 58
Height = 13
Caption = 'Please Note'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
end
object Label11: TLabel
Left = 8
Top = 120
Width = 391
Height = 39
Caption =
'Messaging information is saved to the keyboard configuration fil' +
'e, NSLang.ini. This enables you to compose messages in a langua' +
'ge that corresponds to your virtual keyboard. For this reason an' +
'y editing of these messages will cause Setup'
WordWrap = True
end
object Label12: TLabel
Left = 8
Top = 160
Width = 356
Height = 26
Caption =
'Manager to detect a change in your keyboard and thus prompt you ' +
'to save your modifications.'
WordWrap = True
end
object cbMessages: TComboBox
Left = 8
Top = 24
Width = 401
Height = 21
Style = csDropDownList
DropDownCount = 11
ItemHeight = 13
Items.Strings = (
'New Browser Window Detected - Title'
'New Browser Window Detected - Transfer'
'New Browser Window Detected - Remove'
'Email message - Server incorrect.'
'Email message - User Name incorrect.'
'Email message - Password incorrect.'
'Email message - From required.'
'Email message - To required.'
'Email message - Bad address syntax.'
'Email message - Delete Email.'
'Email message - Current email activity cancelled.')
TabOrder = 0
OnClick = cbMessagesClick
end
object edtMessages: TEdit
Left = 8
Top = 64
Width = 401
Height = 21
TabOrder = 1
OnChange = edtMessagesChange
end
end
object GroupBox39: TGroupBox
Left = 7
Top = 0
Width = 417
Height = 57
Caption = 'Blocking Right Mouse Button'
TabOrder = 0
object RBBlockedEnabled: TRadioButton
Left = 96
Top = 16
Width = 185
Height = 17
Caption = 'Blocked (Internet Explorer only)'
TabOrder = 0
end
object RBBlockedDisabled: TRadioButton
Left = 96
Top = 32
Width = 225
Height = 17
Caption = 'Not Blocked - Pop up menu will display'
TabOrder = 1
end
end
end
object TabSheet10: TTabSheet
Caption = 'Keyboard'
object ScrollBox1: TScrollBox
Left = 8
Top = 8
Width = 417
Height = 233
TabOrder = 0
object Notebook: TNotebook
Left = 0
Top = 1
Width = 800
Height = 215
TabOrder = 0
object TPage
Left = 0
Top = 0
Caption = 'QWERT'
object SF7KeyButton17: TSF7KeyButton
Tag = 1
Left = 40
Top = 8
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Quote
Caption2 = '`'
SendString = '`'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton18: TSF7KeyButton
Tag = 1
Left = 80
Top = 8
Width = 40
Height = 40
Caption = '!'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = One
Caption2 = '1'
SendString = '1'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton19: TSF7KeyButton
Tag = 1
Left = 120
Top = 8
Width = 40
Height = 40
Caption = '"'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Two
Caption2 = '2'
SendString = '2'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton20: TSF7KeyButton
Tag = 1
Left = 160
Top = 8
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Three
Caption2 = '3'
SendString = '3'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton21: TSF7KeyButton
Tag = 1
Left = 200
Top = 8
Width = 40
Height = 40
Caption = '$'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Four
Caption2 = '4'
SendString = '4'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton22: TSF7KeyButton
Tag = 1
Left = 240
Top = 8
Width = 40
Height = 40
Caption = '%'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Five
Caption2 = '5'
SendString = '5'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton23: TSF7KeyButton
Tag = 1
Left = 280
Top = 8
Width = 40
Height = 40
Caption = '^'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Six
Caption2 = '6'
SendString = '6'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton24: TSF7KeyButton
Tag = 1
Left = 320
Top = 8
Width = 40
Height = 40
Caption = '&'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Seven
Caption2 = '7'
SendString = '7'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton25: TSF7KeyButton
Tag = 1
Left = 360
Top = 8
Width = 40
Height = 40
Caption = '*'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Eight
Caption2 = '8'
SendString = '8'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton26: TSF7KeyButton
Tag = 1
Left = 400
Top = 8
Width = 40
Height = 40
Caption = '('
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Nine
Caption2 = '9'
SendString = '9'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton27: TSF7KeyButton
Tag = 1
Left = 440
Top = 8
Width = 40
Height = 40
Caption = ')'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Zero
Caption2 = '0'
SendString = '0'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton28: TSF7KeyButton
Tag = 1
Left = 480
Top = 8
Width = 40
Height = 40
Caption = '_'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Minus
Caption2 = '-'
SendString = '-'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton29: TSF7KeyButton
Tag = 1
Left = 520
Top = 8
Width = 40
Height = 40
Caption = '+'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Equalls
Caption2 = '='
SendString = '='
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton30: TSF7KeyButton
Tag = 1
Left = 560
Top = 8
Width = 88
Height = 40
Caption = 'Backspace'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Backspace
SendString = '{Backspace}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton31: TSF7KeyButton
Tag = 1
Left = 664
Top = 88
Width = 40
Height = 40
Caption = 'Cut'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Cut
SendString = '^x'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton32: TSF7KeyButton
Tag = 1
Left = 704
Top = 48
Width = 40
Height = 40
Caption = 'Home'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Home
SendString = '{Home}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton33: TSF7KeyButton
Tag = 1
Left = 704
Top = 88
Width = 40
Height = 40
Caption = 'Copy'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Copy
SendString = '^c'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton38: TSF7KeyButton
Tag = 1
Left = 16
Top = 48
Width = 80
Height = 40
Caption = 'Tab'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Tab
SendString = '{Tab}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton39: TSF7KeyButton
Tag = 1
Left = 96
Top = 48
Width = 40
Height = 40
Caption = 'Q'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Q
SendString = 'q'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton40: TSF7KeyButton
Tag = 1
Left = 136
Top = 48
Width = 40
Height = 40
Caption = 'W'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = W
SendString = 'w'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton41: TSF7KeyButton
Tag = 1
Left = 176
Top = 48
Width = 40
Height = 40
Caption = 'E'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = E
SendString = 'e'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton42: TSF7KeyButton
Tag = 1
Left = 216
Top = 48
Width = 40
Height = 40
Caption = 'R'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = R
SendString = 'r'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton43: TSF7KeyButton
Tag = 1
Left = 256
Top = 48
Width = 40
Height = 40
Caption = 'T'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = T
SendString = 't'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton44: TSF7KeyButton
Tag = 1
Left = 296
Top = 48
Width = 40
Height = 40
Caption = 'Y'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Y
SendString = 'y'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton45: TSF7KeyButton
Tag = 1
Left = 336
Top = 48
Width = 40
Height = 40
Caption = 'U'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = U
SendString = 'u'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton46: TSF7KeyButton
Tag = 1
Left = 376
Top = 48
Width = 40
Height = 40
Caption = 'I'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = I
SendString = 'i'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton47: TSF7KeyButton
Tag = 1
Left = 416
Top = 48
Width = 40
Height = 40
Caption = 'O'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = O
SendString = 'o'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton48: TSF7KeyButton
Tag = 1
Left = 456
Top = 48
Width = 40
Height = 40
Caption = 'P'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = P
SendString = 'p'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton49: TSF7KeyButton
Tag = 1
Left = 496
Top = 48
Width = 40
Height = 40
Caption = '{'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = SquareOpen
Caption2 = '['
SendString = '['
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton50: TSF7KeyButton
Tag = 1
Left = 536
Top = 48
Width = 48
Height = 40
Caption = '}'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = SquareClose
Caption2 = ']'
SendString = ']'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton51: TSF7KeyButton
Tag = 1
Left = 584
Top = 48
Width = 64
Height = 81
Caption = 'Return'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Return
SendString = '~'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton52: TSF7KeyButton
Tag = 1
Left = 664
Top = 48
Width = 40
Height = 40
Caption = 'Delete'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Delete
SendString = '{Del}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton53: TSF7KeyButton
Tag = 1
Left = 744
Top = 48
Width = 40
Height = 40
Caption = 'End'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = EndKey
SendString = '{End}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton54: TSF7KeyButton
Tag = 1
Left = 744
Top = 88
Width = 40
Height = 40
Caption = 'Paste'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Paste
SendString = '^v'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object KCapsLock: TSF7KeyButton
Tag = 1
Left = 16
Top = 88
Width = 88
Height = 40
Caption = 'Caps'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = CapsLock
Caption2 = 'Lock'
SendString = '{CapsLock}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton60: TSF7KeyButton
Tag = 1
Left = 104
Top = 88
Width = 40
Height = 40
Caption = 'A'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = A
SendString = 'a'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton61: TSF7KeyButton
Tag = 1
Left = 144
Top = 88
Width = 40
Height = 40
Caption = 'S'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = S
SendString = 's'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton62: TSF7KeyButton
Tag = 1
Left = 184
Top = 88
Width = 40
Height = 40
Caption = 'D'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = D
SendString = 'd'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton63: TSF7KeyButton
Tag = 1
Left = 224
Top = 88
Width = 40
Height = 40
Caption = 'F'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = F
SendString = 'f'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton64: TSF7KeyButton
Tag = 1
Left = 264
Top = 88
Width = 40
Height = 40
Caption = 'G'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = G
SendString = 'g'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton65: TSF7KeyButton
Tag = 1
Left = 304
Top = 88
Width = 40
Height = 40
Caption = 'H'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = H
SendString = 'h'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton66: TSF7KeyButton
Tag = 1
Left = 344
Top = 88
Width = 40
Height = 40
Caption = 'J'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = J
SendString = 'j'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton67: TSF7KeyButton
Tag = 1
Left = 384
Top = 88
Width = 40
Height = 40
Caption = 'K'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = K
SendString = 'k'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton68: TSF7KeyButton
Tag = 1
Left = 424
Top = 88
Width = 40
Height = 40
Caption = 'L'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = L
SendString = 'l'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton69: TSF7KeyButton
Tag = 1
Left = 464
Top = 88
Width = 40
Height = 40
Caption = ':'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = SemiColon
Caption2 = ';'
SendString = ';'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton70: TSF7KeyButton
Tag = 1
Left = 504
Top = 88
Width = 40
Height = 40
Caption = '@'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Apostrophe
Caption2 = #39
SendString = #39
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton71: TSF7KeyButton
Tag = 1
Left = 544
Top = 88
Width = 40
Height = 40
Caption = '~'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Hash
Caption2 = '#'
SendString = '#'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object KShiftLeft: TSF7KeyButton
Tag = 1
Left = 16
Top = 128
Width = 72
Height = 40
Caption = 'Shift'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Shift
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton76: TSF7KeyButton
Tag = 1
Left = 88
Top = 128
Width = 40
Height = 40
Caption = '|'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = BackSlash
Caption2 = '\'
SendString = '\'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton77: TSF7KeyButton
Tag = 1
Left = 128
Top = 128
Width = 40
Height = 40
Caption = 'Z'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Z
SendString = 'z'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton78: TSF7KeyButton
Tag = 1
Left = 168
Top = 128
Width = 40
Height = 40
Caption = 'X'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = X
SendString = 'x'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton79: TSF7KeyButton
Tag = 1
Left = 208
Top = 128
Width = 40
Height = 40
Caption = 'C'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = C
SendString = 'c'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton80: TSF7KeyButton
Tag = 1
Left = 248
Top = 128
Width = 40
Height = 40
Caption = 'V'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = V
SendString = 'v'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton81: TSF7KeyButton
Tag = 1
Left = 288
Top = 128
Width = 40
Height = 40
Caption = 'B'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = B
SendString = 'b'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton82: TSF7KeyButton
Tag = 1
Left = 328
Top = 128
Width = 40
Height = 40
Caption = 'N'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = N
SendString = 'n'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton83: TSF7KeyButton
Tag = 1
Left = 368
Top = 128
Width = 40
Height = 40
Caption = 'M'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = M
SendString = 'm'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton84: TSF7KeyButton
Tag = 1
Left = 408
Top = 128
Width = 40
Height = 40
Caption = '<'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Comma
Caption2 = ','
SendString = ','
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton85: TSF7KeyButton
Tag = 1
Left = 448
Top = 128
Width = 40
Height = 40
Caption = '>'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = FullStop
Caption2 = '.'
SendString = '.'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object SF7KeyButton86: TSF7KeyButton
Tag = 1
Left = 488
Top = 128
Width = 40
Height = 40
Caption = '?'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Slash
Caption2 = '/'
SendString = '/'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klDouble
OnClick = KeyClick
end
object KShiftRight: TSF7KeyButton
Tag = 1
Left = 528
Top = 128
Width = 120
Height = 40
Caption = 'Shift'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Shift
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton88: TSF7KeyButton
Tag = 1
Left = 704
Top = 128
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Up
SendString = '{Up}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton95: TSF7KeyButton
Tag = 1
Left = 112
Top = 168
Width = 392
Height = 40
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = SpaceBar
SendString = ' '
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton98: TSF7KeyButton
Tag = 1
Left = 664
Top = 168
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Left
SendString = '{Left}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton99: TSF7KeyButton
Tag = 1
Left = 704
Top = 168
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Down
SendString = '{Down}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton100: TSF7KeyButton
Tag = 1
Left = 744
Top = 168
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
Key = Right
SendString = '{Right}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object KABCDE: TSF7KeyButton
Tag = 1
Left = 664
Top = 8
Width = 120
Height = 40
Caption = 'ABCDE...'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object KAltGrLeft: TSF7KeyButton
Left = 40
Top = 168
Width = 72
Height = 40
Caption = 'Alt Gr'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object KAltGrRight: TSF7KeyButton
Left = 504
Top = 168
Width = 72
Height = 40
Caption = 'Alt Gr'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Active = False
Sound = ksNone
KeyController = KeyController
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'ABCDE'
object SF7KeyButton1: TSF7KeyButton
Tag = 1
Left = 16
Top = 72
Width = 40
Height = 40
Caption = 'A'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = A
SendString = 'a'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton2: TSF7KeyButton
Tag = 1
Left = 56
Top = 72
Width = 40
Height = 40
Caption = 'B'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = B
SendString = 'b'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton3: TSF7KeyButton
Tag = 1
Left = 96
Top = 72
Width = 40
Height = 40
Caption = 'C'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = C
SendString = 'c'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton4: TSF7KeyButton
Tag = 1
Left = 136
Top = 72
Width = 40
Height = 40
Caption = 'D'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = D
SendString = 'd'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton5: TSF7KeyButton
Tag = 1
Left = 176
Top = 72
Width = 40
Height = 40
Caption = 'E'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = E
SendString = 'e'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton6: TSF7KeyButton
Tag = 1
Left = 216
Top = 72
Width = 40
Height = 40
Caption = 'F'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = F
SendString = 'f'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton7: TSF7KeyButton
Tag = 1
Left = 256
Top = 72
Width = 40
Height = 40
Caption = 'G'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = G
SendString = 'g'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton8: TSF7KeyButton
Tag = 1
Left = 296
Top = 72
Width = 40
Height = 40
Caption = 'H'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = H
SendString = 'h'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton9: TSF7KeyButton
Tag = 1
Left = 336
Top = 72
Width = 40
Height = 40
Caption = 'I'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = I
SendString = 'i'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton10: TSF7KeyButton
Tag = 1
Left = 376
Top = 72
Width = 40
Height = 40
Caption = 'J'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = J
SendString = 'j'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton11: TSF7KeyButton
Tag = 1
Left = 416
Top = 72
Width = 40
Height = 40
Caption = 'K'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = K
SendString = 'k'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton12: TSF7KeyButton
Tag = 1
Left = 456
Top = 72
Width = 40
Height = 40
Caption = 'L'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = L
SendString = 'l'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton13: TSF7KeyButton
Tag = 1
Left = 496
Top = 72
Width = 40
Height = 40
Caption = 'M'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = M
SendString = 'm'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton14: TSF7KeyButton
Tag = 1
Left = 552
Top = 8
Width = 96
Height = 40
Caption = 'Backspace'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Backspace
SendString = '{Backspace}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton16: TSF7KeyButton
Tag = 1
Left = 16
Top = 112
Width = 40
Height = 40
Caption = 'N'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = N
SendString = 'n'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton34: TSF7KeyButton
Tag = 1
Left = 56
Top = 112
Width = 40
Height = 40
Caption = 'O'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = O
SendString = 'o'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton35: TSF7KeyButton
Tag = 1
Left = 96
Top = 112
Width = 40
Height = 40
Caption = 'P'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = P
SendString = 'p'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton36: TSF7KeyButton
Tag = 1
Left = 136
Top = 112
Width = 40
Height = 40
Caption = 'Q'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Q
SendString = 'q'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton37: TSF7KeyButton
Tag = 1
Left = 176
Top = 112
Width = 40
Height = 40
Caption = 'R'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = R
SendString = 'r'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton55: TSF7KeyButton
Tag = 1
Left = 216
Top = 112
Width = 40
Height = 40
Caption = 'S'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = S
SendString = 's'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton56: TSF7KeyButton
Tag = 1
Left = 256
Top = 112
Width = 40
Height = 40
Caption = 'T'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = T
SendString = 't'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton57: TSF7KeyButton
Tag = 1
Left = 296
Top = 112
Width = 40
Height = 40
Caption = 'U'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = U
SendString = 'u'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton58: TSF7KeyButton
Tag = 1
Left = 336
Top = 112
Width = 40
Height = 40
Caption = 'V'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = V
SendString = 'v'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton59: TSF7KeyButton
Tag = 1
Left = 376
Top = 112
Width = 40
Height = 40
Caption = 'W'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = W
SendString = 'w'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton72: TSF7KeyButton
Tag = 1
Left = 416
Top = 112
Width = 40
Height = 40
Caption = 'X'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = X
SendString = 'x'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton73: TSF7KeyButton
Tag = 1
Left = 456
Top = 112
Width = 40
Height = 40
Caption = 'Y'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Y
SendString = 'y'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton74: TSF7KeyButton
Tag = 1
Left = 688
Top = 72
Width = 96
Height = 136
Caption = 'Return'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Return
SendString = '~'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton89: TSF7KeyButton
Tag = 1
Left = 496
Top = 112
Width = 40
Height = 40
Caption = 'Z'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Z
SendString = 'z'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton90: TSF7KeyButton
Tag = 1
Left = 16
Top = 8
Width = 40
Height = 40
Caption = '1'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '1'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton91: TSF7KeyButton
Tag = 1
Left = 56
Top = 8
Width = 40
Height = 40
Caption = '2'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '2'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton92: TSF7KeyButton
Tag = 1
Left = 96
Top = 8
Width = 40
Height = 40
Caption = '3'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '3'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton93: TSF7KeyButton
Tag = 1
Left = 136
Top = 8
Width = 40
Height = 40
Caption = '4'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '4'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton94: TSF7KeyButton
Tag = 1
Left = 176
Top = 8
Width = 40
Height = 40
Caption = '5'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '5'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton96: TSF7KeyButton
Tag = 1
Left = 216
Top = 8
Width = 40
Height = 40
Caption = '6'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '6'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton97: TSF7KeyButton
Tag = 1
Left = 256
Top = 8
Width = 40
Height = 40
Caption = '7'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '7'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton101: TSF7KeyButton
Tag = 1
Left = 296
Top = 8
Width = 40
Height = 40
Caption = '8'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '8'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton102: TSF7KeyButton
Tag = 1
Left = 336
Top = 8
Width = 40
Height = 40
Caption = '9'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '9'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton103: TSF7KeyButton
Tag = 1
Left = 376
Top = 8
Width = 40
Height = 40
Caption = '0'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '0'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton104: TSF7KeyButton
Tag = 1
Left = 592
Top = 72
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Up
SendString = '{Up}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton105: TSF7KeyButton
Tag = 1
Left = 472
Top = 168
Width = 128
Height = 40
Caption = 'Space'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = ' '
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton106: TSF7KeyButton
Tag = 1
Left = 552
Top = 112
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Left
SendString = '{Left}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton107: TSF7KeyButton
Tag = 1
Left = 592
Top = 112
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Down
SendString = '{Down}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton108: TSF7KeyButton
Tag = 1
Left = 632
Top = 112
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Key = Right
SendString = '{Right}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object SF7KeyButton111: TSF7KeyButton
Tag = 1
Left = 16
Top = 168
Width = 40
Height = 40
Caption = ','
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = ','
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton112: TSF7KeyButton
Tag = 1
Left = 56
Top = 168
Width = 40
Height = 40
Caption = '.'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '.'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton113: TSF7KeyButton
Tag = 1
Left = 96
Top = 168
Width = 40
Height = 40
Caption = '?'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '?'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton114: TSF7KeyButton
Tag = 1
Left = 136
Top = 168
Width = 40
Height = 40
Caption = '!'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '!'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton115: TSF7KeyButton
Tag = 1
Left = 176
Top = 168
Width = 40
Height = 40
Caption = '"'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '"'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton116: TSF7KeyButton
Tag = 1
Left = 216
Top = 168
Width = 40
Height = 40
Caption = '�'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '�'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton117: TSF7KeyButton
Tag = 1
Left = 256
Top = 168
Width = 40
Height = 40
Caption = '$'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '$'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton118: TSF7KeyButton
Tag = 1
Left = 296
Top = 168
Width = 40
Height = 40
Caption = '@'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '@'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton119: TSF7KeyButton
Tag = 1
Left = 336
Top = 168
Width = 40
Height = 40
Caption = '&'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '&'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton120: TSF7KeyButton
Tag = 1
Left = 376
Top = 168
Width = 40
Height = 40
Caption = '('
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '{(}'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton121: TSF7KeyButton
Tag = 1
Left = 416
Top = 168
Width = 40
Height = 40
Caption = ')'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '{)}'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton122: TSF7KeyButton
Tag = 1
Left = 416
Top = 8
Width = 40
Height = 40
Caption = '-'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '-'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton123: TSF7KeyButton
Tag = 1
Left = 456
Top = 8
Width = 40
Height = 40
Caption = '+'
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '{+}'
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object SF7KeyButton124: TSF7KeyButton
Tag = 1
Left = 496
Top = 8
Width = 40
Height = 40
Caption = '='
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
SendString = '='
KeyType = ktNormal
KeyColour = kcLight
KeyLayout = klLetter
OnClick = KeyClick
end
object KQWERT: TSF7KeyButton
Tag = 1
Left = 664
Top = 8
Width = 120
Height = 40
Caption = 'QWERT...'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
object KShiftLock: TSF7KeyButton
Tag = 1
Left = 616
Top = 168
Width = 56
Height = 40
Caption = 'Shift'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Sound = ksNone
KeyController = KeyController
Caption2 = 'Lock'
SendString = '{CapsLock}'
KeyType = ktNormal
KeyColour = kcDark
KeyLayout = klNormal
OnClick = KeyClick
end
end
end
end
object PageControl1: TPageControl
Left = 8
Top = 248
Width = 417
Height = 273
ActivePage = TabSheet15
TabOrder = 1
object TabSheet11: TTabSheet
Caption = 'Key Values'
object Label78: TLabel
Left = 8
Top = 11
Width = 62
Height = 14
Alignment = taRightJustify
Caption = 'Top Left'
end
object Label79: TLabel
Left = 8
Top = 75
Width = 62
Height = 14
Alignment = taRightJustify
Caption = 'Bottom Left'
end
object Label80: TLabel
Left = 8
Top = 139
Width = 62
Height = 14
Alignment = taRightJustify
Caption = 'Send String'
end
object Label81: TLabel
Left = 24
Top = 171
Width = 46
Height = 14
Alignment = taRightJustify
Caption = 'Layout'
end
object Label82: TLabel
Left = 32
Top = 204
Width = 38
Height = 14
Alignment = taRightJustify
Caption = 'Font'
end
object Label83: TLabel
Left = 272
Top = 204
Width = 22
Height = 14
Alignment = taRightJustify
Caption = 'Size'
end
object Label87: TLabel
Left = 8
Top = 43
Width = 62
Height = 14
Alignment = taRightJustify
Caption = 'Top Right'
Visible = False
end
object Label88: TLabel
Left = 8
Top = 107
Width = 62
Height = 14
Alignment = taRightJustify
Caption = 'Bottom Right'
end
object ECaption: TEdit
Left = 72
Top = 8
Width = 89
Height = 21
Enabled = False
TabOrder = 0
OnChange = ECaptionChange
end
object ECaption2: TEdit
Left = 72
Top = 72
Width = 89
Height = 21
Enabled = False
TabOrder = 3
OnChange = ECaption2Change
end
object ESendString: TEdit
Left = 72
Top = 136
Width = 249
Height = 21
Enabled = False
TabOrder = 5
OnChange = ESendStringChange
end
object CBLayout: TComboBox
Left = 72
Top = 168
Width = 185
Height = 21
Style = csDropDownList
Enabled = False
ItemHeight = 13
Items.Strings = (
'Normal'
'Letter'
'Double'
'Quad'
'Letter Plus')
TabOrder = 6
OnChange = CBLayoutChange
end
object CBFont: TComboBox
Left = 72
Top = 200
Width = 185
Height = 21
Enabled = False
ItemHeight = 0
TabOrder = 7
OnChange = CBFontChange
end
object EFontSize: TEdit
Left = 296
Top = 200
Width = 49
Height = 21
Enabled = False
TabOrder = 8
Text = '1'
OnChange = EFontSizeChange
end
object UpDown3: TUpDown
Left = 345
Top = 200
Width = 15
Height = 21
Associate = EFontSize
Enabled = False
Min = 1
Position = 1
TabOrder = 9
Wrap = False
end
object BitBtn3: TBitBtn
Left = 328
Top = 8
Width = 75
Height = 25
Caption = 'Swap'
TabOrder = 10
OnClick = BitBtn3Click
Kind = bkRetry
end
object ECaption3: TEdit
Left = 72
Top = 40
Width = 89
Height = 21
Enabled = False
TabOrder = 2
Visible = False
OnChange = ECaption3Change
end
object ECaption4: TEdit
Left = 72
Top = 104
Width = 89
Height = 21
Enabled = False
TabOrder = 4
OnChange = ECaption4Change
end
object CBKeyVisible: TCheckBox
Left = 192
Top = 10
Width = 97
Height = 17
Caption = 'Key Visible'
Enabled = False
TabOrder = 1
OnClick = CBKeyVisibleClick
end
end
object TabSheet12: TTabSheet
Caption = 'Load Keyboard'
object Label93: TLabel
Left = 216
Top = 56
Width = 105
Height = 14
Caption = 'System keyboard:'
end
object Label94: TLabel
Left = 216
Top = 72
Width = 38
Height = 13
Caption = 'Label94'
Font.Color = clTeal
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label95: TLabel
Left = 216
Top = 136
Width = 38
Height = 13
Caption = 'Label95'
Font.Color = clTeal
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label96: TLabel
Left = 216
Top = 120
Width = 89
Height = 14
Caption = 'Virtual keyboard:'
end
object CBMenu: TComboBox
Left = 8
Top = 8
Width = 185
Height = 21
Style = csDropDownList
DropDownCount = 16
ItemHeight = 0
Sorted = True
TabOrder = 0
OnChange = CBMenuChange
end
object bnSynch: TBitBtn
Left = 216
Top = 8
Width = 75
Height = 25
Hint = 'Synchronise with system keyboard'
Caption = 'Synch'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = bnSynchClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333033333
333333333373F3333333333330F033333333333337373F33333333330FFF0333
33333333733F73F333333330F80FF033333333373373373F3333330F80F7FF03
33333373373F3F73F33330F70F0F0FF03333373F737373F73F33330F77F7F0FF
03333373F33F373F73F33330F70F0F0FF03333373F737373373F33330F77F7F7
FF03333373F33F3F3F73333330F70F0F07F03333373F737373373333330F77FF
7F0333333373F33F337333333330F707F033333333373F733733333333330F7F
03333333333373F373F33333333330F0303333F3F3F3F73737F3303030303303
3033373737373F7FF733030303030000033373737373777773330000}
NumGlyphs = 2
end
end
object TabSheet15: TTabSheet
Caption = 'Audio'
object GroupBox42: TGroupBox
Left = 24
Top = 144
Width = 361
Height = 65
Caption = 'Custom Sound'
TabOrder = 2
object bnKBCustSound: TSpeedButton
Left = 312
Top = 24
Width = 21
Height = 21
Caption = '...'
OnClick = SoundClick
end
object edtKBCustSound: TEdit
Left = 24
Top = 24
Width = 289
Height = 21
TabOrder = 0
OnChange = ApplySoundsNow
end
end
object GroupBox43: TGroupBox
Left = 24
Top = 32
Width = 361
Height = 65
Caption = 'Source'
TabOrder = 0
object cbxKBCustSound: TComboBox
Left = 24
Top = 24
Width = 313
Height = 21
Style = csDropDownList
DropDownCount = 5
ItemHeight = 13
Items.Strings = (
'NONE'
'Machine'
'Asterisk'
'Exclamation'
'Critical'
'Question'
'Default'
'Custom')
TabOrder = 0
OnChange = ApplySoundsNow
end
end
object cbSetupUseSound: TCheckBox
Left = 24
Top = 112
Width = 249
Height = 17
Caption = 'Apply sounds in Setup Manager also'
State = cbChecked
TabOrder = 1
OnClick = ApplySoundsNow
end
end
end
end
object TabSheet13: TTabSheet
Caption = 'Busy Bar && Clock '
object GroupBox37: TGroupBox
Left = 8
Top = 168
Width = 377
Height = 233
Caption = 'Clock'
TabOrder = 1
object bnBCol: TSpeedButton
Left = 237
Top = 103
Width = 21
Height = 21
Caption = '...'
OnClick = ClockColours
end
object bnFCol: TSpeedButton
Left = 237
Top = 128
Width = 21
Height = 21
Caption = '...'
OnClick = ClockColours
end
object bnOCol: TSpeedButton
Left = 237
Top = 152
Width = 21
Height = 21
Caption = '...'
OnClick = ClockColours
end
object bnSCol: TSpeedButton
Left = 237
Top = 176
Width = 21
Height = 21
Caption = '...'
OnClick = ClockColours
end
object bnTCol: TSpeedButton
Left = 237
Top = 199
Width = 21
Height = 21
Caption = '...'
OnClick = ClockColours
end
object Label97: TLabel
Left = 16
Top = 108
Width = 91
Height = 13
Caption = 'Background Colour'
end
object Label98: TLabel
Left = 50
Top = 132
Width = 57
Height = 13
Caption = 'Face Colour'
end
object Label99: TLabel
Left = 42
Top = 156
Width = 66
Height = 13
Caption = 'Outline Colour'
end
object Label100: TLabel
Left = 10
Top = 180
Width = 99
Height = 13
Caption = 'Second Hand Colour'
end
object Label101: TLabel
Left = 56
Top = 204
Width = 54
Height = 13
Caption = 'Tick Colour'
end
object cbxClockSecs: TCheckBox
Left = 8
Top = 56
Width = 121
Height = 17
Alignment = taLeftJustify
Caption = 'Show Second Hand'
State = cbChecked
TabOrder = 1
OnClick = LiveClockClick
end
object cbxClockShow: TCheckBox
Left = 8
Top = 32
Width = 121
Height = 17
Alignment = taLeftJustify
Caption = 'Show The Clock'
State = cbChecked
TabOrder = 0
OnClick = LiveClockClick
end
object edtBCol: TEdit
Left = 116
Top = 103
Width = 121
Height = 21
ReadOnly = True
TabOrder = 3
Text = '$00000000'
end
object edtFCol: TEdit
Left = 116
Top = 127
Width = 121
Height = 21
ReadOnly = True
TabOrder = 4
Text = '$00000000'
end
object edtOCol: TEdit
Left = 116
Top = 151
Width = 121
Height = 21
ReadOnly = True
TabOrder = 5
Text = '$00000000'
end
object edtSCol: TEdit
Left = 116
Top = 175
Width = 121
Height = 21
ReadOnly = True
TabOrder = 6
Text = '$00000000'
end
object edtTCol: TEdit
Left = 116
Top = 199
Width = 121
Height = 21
ReadOnly = True
TabOrder = 7
Text = '$00000000'
end
object rgClockShape: TRadioGroup
Left = 160
Top = 24
Width = 161
Height = 57
Caption = 'Shape'
ItemIndex = 0
Items.Strings = (
'Circular'
'Square')
TabOrder = 2
OnClick = LiveClockClick
end
object analogClock: TAnalogClock
Left = 288
Top = 136
Width = 60
Height = 60
end
end
object GroupBox41: TGroupBox
Left = 8
Top = 8
Width = 377
Height = 145
Caption = 'Busy Bar'
TabOrder = 0
object bnBBTcol: TSpeedButton
Left = 237
Top = 47
Width = 21
Height = 21
Caption = '...'
OnClick = ClockColours
end
object bnBBBCol: TSpeedButton
Left = 237
Top = 71
Width = 21
Height = 21
Caption = '...'
OnClick = ClockColours
end
object Label102: TLabel
Left = 60
Top = 52
Width = 52
Height = 13
Caption = 'Top Colour'
end
object Label103: TLabel
Left = 45
Top = 76
Width = 66
Height = 13
Caption = 'Bottom Colour'
end
object Label104: TLabel
Left = 54
Top = 108
Width = 56
Height = 13
Caption = 'Graphic File'
end
object bnBBGraphic: TSpeedButton
Left = 348
Top = 103
Width = 21
Height = 21
Caption = '...'
OnClick = GlyphButtonClick
end
object edtBBTCol: TEdit
Left = 116
Top = 47
Width = 121
Height = 21
ReadOnly = True
TabOrder = 1
Text = '$00000000'
end
object edtBBBCol: TEdit
Left = 116
Top = 71
Width = 121
Height = 21
ReadOnly = True
TabOrder = 2
Text = '$00000000'
end
object edtBBGraphic: TEdit
Left = 116
Top = 103
Width = 233
Height = 21
TabOrder = 3
Text = 'edtBBGraphic'
end
object CBShowBusyBar: TCheckBox
Left = 16
Top = 24
Width = 113
Height = 17
Alignment = taLeftJustify
Caption = 'Show The Busy Bar'
TabOrder = 0
end
end
end
object TabSheet14: TTabSheet
Caption = 'Email'
object GroupBox44: TGroupBox
Left = 8
Top = 8
Width = 417
Height = 137
Caption = 'Text Files'
TabOrder = 0
object Label150: TLabel
Left = 8
Top = 75
Width = 112
Height = 13
Caption = 'Reading Email Help File'
end
object bnEText2: TSpeedButton
Left = 376
Top = 91
Width = 21
Height = 21
Caption = '...'
OnClick = EmailFileClick
end
object Label149: TLabel
Left = 8
Top = 20
Width = 109
Height = 13
Caption = 'Email Account Help file'
end
object bnEText1: TSpeedButton
Left = 376
Top = 35
Width = 21
Height = 21
Caption = '...'
OnClick = EmailFileClick
end
object edtEText2: TEdit
Left = 8
Top = 91
Width = 369
Height = 21
TabOrder = 1
Text = 'edtEText2'
end
object edtEText1: TEdit
Left = 8
Top = 35
Width = 369
Height = 21
TabOrder = 0
Text = 'edtEText1'
end
end
object GroupBox45: TGroupBox
Left = 8
Top = 171
Width = 417
Height = 137
Caption = 'Keyboard Behaviour && Mail To Enable'
TabOrder = 1
object cbShowEmailKB: TCheckBox
Left = 48
Top = 25
Width = 148
Height = 17
Caption = 'Show when entering Email'
TabOrder = 0
end
object cbHideEmailKB: TCheckBox
Left = 48
Top = 65
Width = 148
Height = 17
Caption = 'Hide when exiting Email'
TabOrder = 1
end
object cbxMailTo: TCheckBox
Left = 48
Top = 105
Width = 257
Height = 17
Caption = 'Mail To (Enable/Disable emailing via a web page)'
TabOrder = 2
end
end
object GroupBox60: TGroupBox
Left = 8
Top = 336
Width = 417
Height = 177
Caption = 'Buttons'
TabOrder = 2
object cbGetEmailButton: TComboBox
Left = 8
Top = 28
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'Cancel'
'Ok'
'Get'
'New'
'Reply'
'Delete'
'Send')
TabOrder = 0
OnClick = cbGetEmailButtonClick
end
object gbxEmailButtons: TGroupBox
Left = 8
Top = 64
Width = 401
Height = 97
Caption = 'Cancel Button'
TabOrder = 1
object bnCancelGlyph: TSpeedButton
Left = 323
Top = 27
Width = 21
Height = 21
Caption = '...'
OnClick = EmailGlyphClick
end
object bnCancelSnd: TSpeedButton
Left = 323
Top = 68
Width = 21
Height = 21
Caption = '...'
OnClick = SoundClick
end
object Label260: TLabel
Left = 19
Top = 14
Width = 21
Height = 13
Caption = 'Text'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label261: TLabel
Left = 128
Top = 14
Width = 27
Height = 13
Caption = 'Glyph'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label233: TLabel
Left = 350
Top = 14
Width = 25
Height = 13
Caption = 'State'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label234: TLabel
Left = 19
Top = 55
Width = 64
Height = 13
Caption = 'Audio Source'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label235: TLabel
Left = 128
Top = 55
Width = 69
Height = 13
Caption = 'Custom Sound'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object edtCancelTxt: TEdit
Left = 19
Top = 27
Width = 106
Height = 21
TabOrder = 0
Text = 'edtCancelTxt'
OnChange = edtCancelTxtChange
end
object edtCancelGlyph: TEdit
Left = 128
Top = 27
Width = 193
Height = 21
TabOrder = 1
Text = 'edtCancelGlyph'
OnChange = edtCancelTxtChange
end
object edtStateCancel: TEdit
Left = 350
Top = 27
Width = 15
Height = 21
ReadOnly = True
TabOrder = 2
Text = '3'
OnChange = edtCancelTxtChange
end
object udStateCancel: TUpDown
Left = 365
Top = 27
Width = 19
Height = 21
Associate = edtStateCancel
Min = 1
Max = 3
Position = 3
TabOrder = 3
Wrap = False
end
object cbxCancelSnd: TComboBox
Left = 19
Top = 68
Width = 89
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'NONE'
'Machine'
'Asterisk'
'Exclamation'
'Critical'
'Question'
'Default'
'Custom')
TabOrder = 4
OnChange = edtCancelTxtChange
end
object edtCancelSnd: TEdit
Left = 128
Top = 68
Width = 193
Height = 21
TabOrder = 5
Text = 'edtCancelSnd'
OnChange = edtCancelTxtChange
end
end
end
end
object TabSheet18: TTabSheet
Caption = 'Graphics'
object Label209: TLabel
Left = 16
Top = 44
Width = 19
Height = 13
Caption = 'Top'
end
object bnGrafixT: TSpeedButton
Left = 296
Top = 56
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label210: TLabel
Left = 16
Top = 124
Width = 37
Height = 13
Caption = 'Left Full'
end
object bnGrafixL: TSpeedButton
Left = 296
Top = 136
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label211: TLabel
Left = 16
Top = 164
Width = 158
Height = 13
Caption = 'Left panel with keyboard showing'
end
object bnGrafixLH: TSpeedButton
Left = 296
Top = 176
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label212: TLabel
Left = 16
Top = 204
Width = 44
Height = 13
Caption = 'Right Full'
end
object bnGrafixR: TSpeedButton
Left = 296
Top = 216
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label213: TLabel
Left = 16
Top = 244
Width = 165
Height = 13
Caption = 'Right panel with keyboard showing'
end
object bnGrafixRH: TSpeedButton
Left = 296
Top = 256
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label214: TLabel
Left = 16
Top = 84
Width = 33
Height = 13
Caption = 'Bottom'
end
object bnGrafixB: TSpeedButton
Left = 296
Top = 96
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label215: TLabel
Left = 16
Top = 324
Width = 25
Height = 13
Caption = 'Email'
end
object bnGrafixE1: TSpeedButton
Left = 296
Top = 336
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label216: TLabel
Left = 16
Top = 364
Width = 45
Height = 13
Caption = 'Get Email'
end
object bnGrafixE2: TSpeedButton
Left = 296
Top = 376
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label217: TLabel
Left = 16
Top = 404
Width = 53
Height = 13
Caption = 'Send Email'
end
object bnGrafixE3: TSpeedButton
Left = 296
Top = 416
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label9: TLabel
Left = 16
Top = 482
Width = 55
Height = 13
Caption = 'Error Dialog'
end
object bnGrafixError: TSpeedButton
Left = 296
Top = 496
Width = 21
Height = 21
Caption = '...'
OnClick = GrafixClick
end
object Label13: TLabel
Left = 16
Top = 16
Width = 96
Height = 13
Caption = 'Main NetShift Frame'
end
object Label14: TLabel
Left = 16
Top = 296
Width = 86
Height = 13
Caption = 'Email Background'
end
object edtGrafixT: TEdit
Left = 16
Top = 56
Width = 281
Height = 21
TabOrder = 0
end
object edtGrafixL: TEdit
Left = 16
Top = 136
Width = 281
Height = 21
TabOrder = 2
end
object edtGrafixLH: TEdit
Left = 16
Top = 176
Width = 281
Height = 21
TabOrder = 3
end
object edtGrafixR: TEdit
Left = 16
Top = 216
Width = 281
Height = 21
TabOrder = 4
end
object edtGrafixRH: TEdit
Left = 16
Top = 256
Width = 281
Height = 21
TabOrder = 5
end
object edtGrafixB: TEdit
Left = 16
Top = 96
Width = 281
Height = 21
TabOrder = 1
end
object edtGrafixE1: TEdit
Left = 16
Top = 336
Width = 281
Height = 21
TabOrder = 6
end
object edtGrafixE2: TEdit
Left = 16
Top = 376
Width = 281
Height = 21
TabOrder = 7
end
object edtGrafixE3: TEdit
Left = 16
Top = 416
Width = 281
Height = 21
TabOrder = 8
end
object edtGrafixError: TEdit
Left = 16
Top = 496
Width = 281
Height = 21
TabOrder = 9
end
end
object TabSheet2: TTabSheet
Caption = 'Notes'
object Label8: TLabel
Left = 8
Top = 8
Width = 93
Height = 13
Caption = 'Configuration Notes'
end
object memConfig: TMemo
Left = 8
Top = 32
Width = 417
Height = 489
ScrollBars = ssVertical
TabOrder = 0
end
end
end
object OpenDialog: TOpenDialog
DefaultExt = 'exe'
FileEditStyle = fsEdit
Filter = 'Programs|*.exe'
Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofCreatePrompt]
Title = 'Please select Browser Program.'
Left = 16
Top = 120
end
object VisualApp: TVisualApp
HelpFile = 'DELPHI.HLP'
HintColor = clInfoBk
HintPause = 500
Icon.Data = {<image001.ico>}
Title = 'NetShift'
UpdateFormatSettings = True
ShowMainForm = True
HintShortPause = 50
HintHidePause = 2500
Left = 16
Top = 88
end
object KeyController: TSF7KeyController
AutoHandle = False
Left = 56
Top = 120
end
object SaveDialog: TSaveDialog
DefaultExt = 'ini'
FileEditStyle = fsEdit
Filter = 'Keyboard configuration file|*.ini'
Options = [ofOverwritePrompt, ofHideReadOnly]
Title = 'Save customised keyboard layout'
Left = 16
Top = 152
end
object dlgColour: TColorDialog
Ctl3D = True
Left = 56
Top = 88
end
end