home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2003 February
/
PCWorld_2003-02_cd.bin
/
Software
/
Topware
/
devpascal
/
devpas.exe
/
0
/
RCDATA
/
TENVIRFORM
/
TENVIRFORM.txt
Wrap
Text File
|
2002-07-15
|
42KB
|
1,548 lines
object EnvirForm: TEnvirForm
Left = 202
Top = 111
ActiveControl = DevFile
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Environment options'
ClientHeight = 497
ClientWidth = 544
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 120
TextHeight = 16
object OkBtn: TBitBtn
Left = 10
Top = 455
Width = 92
Height = 31
Caption = '&OK'
ModalResult = 1
TabOrder = 0
OnClick = OkBtnClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object CancelBtn: TBitBtn
Left = 108
Top = 455
Width = 93
Height = 31
Cancel = True
Caption = '&Cancel'
ModalResult = 2
TabOrder = 2
OnClick = CancelBtnClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object DefaultBtn: TBitBtn
Left = 441
Top = 455
Width = 92
Height = 31
Caption = '&Default'
TabOrder = 1
OnClick = DefaultBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333FF3333333333333003333333333333F77F33333333333009033
333333333F7737F333333333009990333333333F773337FFFFFF330099999000
00003F773333377777770099999999999990773FF33333FFFFF7330099999000
000033773FF33777777733330099903333333333773FF7F33333333333009033
33333333337737F3333333333333003333333333333377333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object PageControl: TPageControl
Left = 10
Top = 10
Width = 523
Height = 434
ActivePage = TabSheet1
TabOrder = 3
object Preferences: TTabSheet
Caption = 'Preferences'
object GroupBox2: TGroupBox
Left = 6
Top = 94
Width = 497
Height = 70
Caption = 'Auto-Saving:'
TabOrder = 0
object SavePos: TCheckBox
Left = 10
Top = 39
Width = 135
Height = 21
Caption = '&Desktop position'
TabOrder = 0
end
object Backup: TCheckBox
Left = 10
Top = 18
Width = 135
Height = 21
Caption = '&Create backup file'
TabOrder = 1
end
object ToolBarSave: TCheckBox
Left = 154
Top = 20
Width = 179
Height = 21
Caption = 'Save &toolbars availability'
TabOrder = 2
end
object SaveEditor: TCheckBox
Left = 154
Top = 39
Width = 159
Height = 21
Caption = 'Editor s&ize && position'
TabOrder = 3
end
object SaveDesk: TCheckBox
Left = 352
Top = 20
Width = 113
Height = 17
Caption = 'Save desktop'
Checked = True
State = cbChecked
TabOrder = 4
end
end
object DefaultDirectory: TGroupBox
Left = 6
Top = 170
Width = 497
Height = 55
Caption = 'Default directory:'
TabOrder = 1
object Defaultdir: TEdit
Left = 10
Top = 20
Width = 474
Height = 24
TabOrder = 0
end
end
object ExecutionPanel: TGroupBox
Left = 6
Top = 234
Width = 497
Height = 151
Caption = 'Execution:'
TabOrder = 2
object Minimize: TCheckBox
Left = 10
Top = 20
Width = 178
Height = 21
Caption = '&Minimize during execution'
TabOrder = 0
end
object ExecParam: TCheckBox
Left = 10
Top = 79
Width = 405
Height = 21
Caption =
'Give the following parameters when &executing a compiled project' +
':'
TabOrder = 1
end
object Params: TEdit
Left = 30
Top = 108
Width = 385
Height = 24
TabOrder = 2
end
object ExeInDir: TCheckBox
Left = 10
Top = 49
Width = 247
Height = 21
Caption = 'Exec&ute in directory of executable'
TabOrder = 3
end
end
object Windows: TGroupBox
Left = 6
Top = 2
Width = 497
Height = 88
Caption = 'Windows:'
TabOrder = 3
object AutoArrange: TCheckBox
Left = 10
Top = 20
Width = 119
Height = 21
Caption = '&Auto-Arrange'
TabOrder = 0
end
object NoProjExpl: TCheckBox
Left = 10
Top = 39
Width = 198
Height = 21
Caption = 'Do ¬ show Project Explorer'
TabOrder = 1
end
object CompileStayOnTop: TCheckBox
Left = 226
Top = 20
Width = 218
Height = 21
Caption = 'Make c&ompile results stay on top'
TabOrder = 2
end
object MaxWindow: TCheckBox
Left = 226
Top = 39
Width = 228
Height = 21
Caption = 'Ma&ximize editor when opening a file'
TabOrder = 3
end
object NoOpen: TCheckBox
Left = 10
Top = 59
Width = 326
Height = 21
Caption = 'Do not &open source files when opening a project'
TabOrder = 4
end
end
end
object TabSheet2: TTabSheet
Caption = 'Editor'
object GroupBox5: TGroupBox
Left = 6
Top = 187
Width = 248
Height = 129
Caption = 'Tab indent:'
TabOrder = 0
object Label1: TLabel
Left = 10
Top = 77
Width = 77
Height = 48
Caption = 'Number of spaces for a tab:'
WordWrap = True
end
object TabIndent: TSpinEdit
Left = 118
Top = 85
Width = 110
Height = 26
MaxValue = 0
MinValue = 0
TabOrder = 0
Value = 0
end
object AutoIndent: TCheckBox
Left = 10
Top = 25
Width = 119
Height = 21
Caption = '&Auto-Indent'
TabOrder = 1
OnClick = AutoIndentClick
end
object TabToSpace: TCheckBox
Left = 118
Top = 25
Width = 120
Height = 21
Caption = '&Tabs to Spaces'
TabOrder = 2
end
object SmartTabs: TCheckBox
Left = 10
Top = 49
Width = 119
Height = 21
Caption = '&Use smart Tabs'
TabOrder = 3
end
end
object GroupBox1: TGroupBox
Left = 6
Top = 10
Width = 497
Height = 80
Caption = 'Editor font and size:'
TabOrder = 1
object SizeLabel: TLabel
Left = 246
Top = 20
Width = 29
Height = 16
Caption = 'Size:'
end
object FontLabel: TLabel
Left = 10
Top = 20
Width = 29
Height = 16
Caption = 'Font:'
end
object Font: TComboBox
Left = 10
Top = 39
Width = 218
Height = 24
ItemHeight = 16
Items.Strings = (
'Courier New'
'MS LineDraw'
'Terminal'
'Courier'
'------------')
TabOrder = 0
Text = 'Courier New'
OnChange = FontChange
end
object Size: TEdit
Left = 246
Top = 39
Width = 208
Height = 24
TabOrder = 1
Text = '10'
end
end
object GroupBox3: TGroupBox
Left = 6
Top = 108
Width = 246
Height = 61
Caption = 'Select editor background color:'
TabOrder = 2
object EditorColor: TComboBox
Left = 10
Top = 25
Width = 218
Height = 24
Style = csDropDownList
ItemHeight = 16
Items.Strings = (
'White'
'Yellow'
'Blue'
'Aqua'
'Navy')
TabOrder = 0
OnChange = EditorColorChange
end
end
object BackupPanel: TGroupBox
Left = 266
Top = 108
Width = 236
Height = 61
Caption = 'Line numbers:'
TabOrder = 3
object LineNumbers: TCheckBox
Left = 10
Top = 30
Width = 159
Height = 20
Caption = '&Show line numbers'
TabOrder = 0
end
end
object GroupBox7: TGroupBox
Left = 266
Top = 187
Width = 236
Height = 129
Caption = 'Scrolling:'
TabOrder = 4
object ShowScrollHint: TCheckBox
Left = 10
Top = 30
Width = 208
Height = 20
Caption = 'Show &hint when scrolling'
TabOrder = 0
end
object DontShowScroll: TCheckBox
Left = 10
Top = 59
Width = 208
Height = 21
Caption = '&Do not show scrollbars'
TabOrder = 1
end
object ShowGutter: TCheckBox
Left = 10
Top = 89
Width = 208
Height = 21
Caption = 'Show editor'#39's gutter'
TabOrder = 2
end
end
end
object ColorSheet: TTabSheet
Caption = 'Syntax colors'
object ElementList: TListBox
Left = 10
Top = 9
Width = 173
Height = 132
ItemHeight = 16
TabOrder = 0
end
object ColorGrid: TColorGrid
Left = 194
Top = 9
Width = 148
Height = 144
ClickEnablesColor = True
ForegroundIndex = 15
BackgroundEnabled = False
TabOrder = 1
TabStop = True
OnChange = ColorGridChange
end
object PasEdit: TSynEdit
Left = 10
Top = 177
Width = 493
Height = 208
Cursor = crIBeam
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'Courier New'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 2
Highlighter = PasSyn
Keystrokes = <
item
Command = ecUp
ShortCut = 38
ShortCut2 = 0
end
item
Command = ecSelUp
ShortCut = 8230
ShortCut2 = 0
end
item
Command = ecScrollUp
ShortCut = 16422
ShortCut2 = 0
end
item
Command = ecDown
ShortCut = 40
ShortCut2 = 0
end
item
Command = ecSelDown
ShortCut = 8232
ShortCut2 = 0
end
item
Command = ecScrollDown
ShortCut = 16424
ShortCut2 = 0
end
item
Command = ecLeft
ShortCut = 37
ShortCut2 = 0
end
item
Command = ecSelLeft
ShortCut = 8229
ShortCut2 = 0
end
item
Command = ecWordLeft
ShortCut = 16421
ShortCut2 = 0
end
item
Command = ecSelWordLeft
ShortCut = 24613
ShortCut2 = 0
end
item
Command = ecRight
ShortCut = 39
ShortCut2 = 0
end
item
Command = ecSelRight
ShortCut = 8231
ShortCut2 = 0
end
item
Command = ecWordRight
ShortCut = 16423
ShortCut2 = 0
end
item
Command = ecSelWordRight
ShortCut = 24615
ShortCut2 = 0
end
item
Command = ecPageDown
ShortCut = 34
ShortCut2 = 0
end
item
Command = ecSelPageDown
ShortCut = 8226
ShortCut2 = 0
end
item
Command = ecPageBottom
ShortCut = 16418
ShortCut2 = 0
end
item
Command = ecSelPageBottom
ShortCut = 24610
ShortCut2 = 0
end
item
Command = ecPageUp
ShortCut = 33
ShortCut2 = 0
end
item
Command = ecSelPageUp
ShortCut = 8225
ShortCut2 = 0
end
item
Command = ecPageTop
ShortCut = 16417
ShortCut2 = 0
end
item
Command = ecSelPageTop
ShortCut = 24609
ShortCut2 = 0
end
item
Command = ecLineStart
ShortCut = 36
ShortCut2 = 0
end
item
Command = ecSelLineStart
ShortCut = 8228
ShortCut2 = 0
end
item
Command = ecEditorTop
ShortCut = 16420
ShortCut2 = 0
end
item
Command = ecSelEditorTop
ShortCut = 24612
ShortCut2 = 0
end
item
Command = ecLineEnd
ShortCut = 35
ShortCut2 = 0
end
item
Command = ecSelLineEnd
ShortCut = 8227
ShortCut2 = 0
end
item
Command = ecEditorBottom
ShortCut = 16419
ShortCut2 = 0
end
item
Command = ecSelEditorBottom
ShortCut = 24611
ShortCut2 = 0
end
item
Command = ecToggleMode
ShortCut = 45
ShortCut2 = 0
end
item
Command = ecCopy
ShortCut = 16429
ShortCut2 = 0
end
item
Command = ecPaste
ShortCut = 8237
ShortCut2 = 0
end
item
Command = ecDeleteChar
ShortCut = 46
ShortCut2 = 0
end
item
Command = ecCut
ShortCut = 8238
ShortCut2 = 0
end
item
Command = ecDeleteLastChar
ShortCut = 8
ShortCut2 = 0
end
item
Command = ecDeleteLastWord
ShortCut = 16392
ShortCut2 = 0
end
item
Command = ecUndo
ShortCut = 32776
ShortCut2 = 0
end
item
Command = ecRedo
ShortCut = 40968
ShortCut2 = 0
end
item
Command = ecLineBreak
ShortCut = 13
ShortCut2 = 0
end
item
Command = ecSelectAll
ShortCut = 16449
ShortCut2 = 0
end
item
Command = ecCopy
ShortCut = 16451
ShortCut2 = 0
end
item
Command = ecBlockIndent
ShortCut = 24649
ShortCut2 = 0
end
item
Command = ecLineBreak
ShortCut = 16461
ShortCut2 = 0
end
item
Command = ecInsertLine
ShortCut = 16462
ShortCut2 = 0
end
item
Command = ecDeleteWord
ShortCut = 16468
ShortCut2 = 0
end
item
Command = ecBlockUnindent
ShortCut = 24661
ShortCut2 = 0
end
item
Command = ecPaste
ShortCut = 16470
ShortCut2 = 0
end
item
Command = ecCut
ShortCut = 16472
ShortCut2 = 0
end
item
Command = ecDeleteLine
ShortCut = 16473
ShortCut2 = 0
end
item
Command = ecDeleteEOL
ShortCut = 24665
ShortCut2 = 0
end
item
Command = ecUndo
ShortCut = 16474
ShortCut2 = 0
end
item
Command = ecRedo
ShortCut = 24666
ShortCut2 = 0
end
item
Command = ecGotoMarker0
ShortCut = 16432
ShortCut2 = 0
end
item
Command = ecGotoMarker1
ShortCut = 16433
ShortCut2 = 0
end
item
Command = ecGotoMarker2
ShortCut = 16434
ShortCut2 = 0
end
item
Command = ecGotoMarker3
ShortCut = 16435
ShortCut2 = 0
end
item
Command = ecGotoMarker4
ShortCut = 16436
ShortCut2 = 0
end
item
Command = ecGotoMarker5
ShortCut = 16437
ShortCut2 = 0
end
item
Command = ecGotoMarker6
ShortCut = 16438
ShortCut2 = 0
end
item
Command = ecGotoMarker7
ShortCut = 16439
ShortCut2 = 0
end
item
Command = ecGotoMarker8
ShortCut = 16440
ShortCut2 = 0
end
item
Command = ecGotoMarker9
ShortCut = 16441
ShortCut2 = 0
end
item
Command = ecSetMarker0
ShortCut = 24624
ShortCut2 = 0
end
item
Command = ecSetMarker1
ShortCut = 24625
ShortCut2 = 0
end
item
Command = ecSetMarker2
ShortCut = 24626
ShortCut2 = 0
end
item
Command = ecSetMarker3
ShortCut = 24627
ShortCut2 = 0
end
item
Command = ecSetMarker4
ShortCut = 24628
ShortCut2 = 0
end
item
Command = ecSetMarker5
ShortCut = 24629
ShortCut2 = 0
end
item
Command = ecSetMarker6
ShortCut = 24630
ShortCut2 = 0
end
item
Command = ecSetMarker7
ShortCut = 24631
ShortCut2 = 0
end
item
Command = ecSetMarker8
ShortCut = 24632
ShortCut2 = 0
end
item
Command = ecSetMarker9
ShortCut = 24633
ShortCut2 = 0
end
item
Command = ecNormalSelect
ShortCut = 24654
ShortCut2 = 0
end
item
Command = ecColumnSelect
ShortCut = 24643
ShortCut2 = 0
end
item
Command = ecLineSelect
ShortCut = 24652
ShortCut2 = 0
end
item
Command = ecTab
ShortCut = 9
ShortCut2 = 0
end
item
Command = ecShiftTab
ShortCut = 8201
ShortCut2 = 0
end
item
Command = ecMatchBracket
ShortCut = 24642
ShortCut2 = 0
end>
Lines.Strings = (
'{ Hello sample }'
'program Hello;'
'var i : integer;'
'begin'
' i := 3;'
' writeln('#39'Hello !'#39');'
'end.')
MaxLeftChar = 1024
MaxUndo = 1024
ReadOnly = False
WantTabs = True
end
end
object CodeSheet: TTabSheet
Caption = 'Code completion'
ImageIndex = 4
object GroupBox6: TGroupBox
Left = 10
Top = 10
Width = 493
Height = 109
Caption = 'Description :'
TabOrder = 0
object Label2: TLabel
Left = 10
Top = 30
Width = 464
Height = 80
Caption =
'Code completion is for speeding up your coding time. By pressing' +
' Ctrl+Space in the editor, a dialog will open containing a list ' +
'of your usual coding text. Then you will be able to select a cod' +
'e and after pressing Enter it will be automatically inserted in ' +
'the editor. You can edit them by modifying the text field below.'
WordWrap = True
end
end
object GroupBox9: TGroupBox
Left = 10
Top = 138
Width = 493
Height = 247
Caption = 'Modify code completion list :'
TabOrder = 1
object Memo: TMemo
Left = 10
Top = 22
Width = 474
Height = 176
ScrollBars = ssBoth
TabOrder = 0
end
object TestBtn: TBitBtn
Left = 362
Top = 207
Width = 122
Height = 31
Caption = '&Test'
TabOrder = 1
OnClick = TestBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500000000000
055557777777777775F508888888888880557F5FFFFFFFFFF75F080000000000
88057577777777775F755080FFFFFF05088057F7FFFFFF7575F70000000000F0
F08077777777775757F70FFFFFFFFF0F008075F5FF5FF57577F750F00F00FFF0
F08057F775775557F7F750FFFFFFFFF0F08057FF5555555757F7000FFFFFFFFF
0000777FF5FFFFF577770900F00000F000907F775777775777F7090FFFFFFFFF
00907F7F555555557757000FFFFFFFFF0F00777F5FFF5FF57F77550F000F00FF
0F05557F777577557F7F550FFFFFFFFF0005557F555FFFFF7775550FFF000000
05555575FF777777755555500055555555555557775555555555}
NumGlyphs = 2
end
end
end
object TabSheet1: TTabSheet
Caption = 'Misc.'
object Label3: TLabel
Left = 10
Top = 167
Width = 265
Height = 16
Caption = 'Default code when creating new source files :'
end
object DevFile: TCheckBox
Left = 10
Top = 20
Width = 336
Height = 21
Caption = '&Assign .dev files with Dev-Pascal'
Checked = True
State = cbChecked
TabOrder = 0
end
object BitBtn1: TBitBtn
Left = 236
Top = 79
Width = 267
Height = 31
Caption = '&Remove .dev file association'
ModalResult = 7
TabOrder = 1
OnClick = RemoveDevClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
993337777F777F3377F3393999707333993337F77737333337FF993399933333
399377F3777FF333377F993339903333399377F33737FF33377F993333707333
399377F333377FF3377F993333101933399377F333777FFF377F993333000993
399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
99333773FF777F777733339993707339933333773FF7FFF77333333999999999
3333333777333777333333333999993333333333377777333333}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 10
Top = 79
Width = 218
Height = 31
Caption = 'Reset &default directories'
TabOrder = 2
OnClick = ResetDirsClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
333337F373F773333333303330033333333337F3377333333333303333333333
333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
333337777F337F33333330330BB00333333337F373F773333333303330033333
333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
333377777F77377733330BBB0333333333337F337F33333333330BB003333333
333373F773333333333330033333333333333773333333333333}
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 315
Top = 118
Width = 188
Height = 31
Caption = '&Create a new DevPas.ini'
TabOrder = 3
OnClick = CreateIniClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object BitBtn4: TBitBtn
Left = 10
Top = 118
Width = 296
Height = 31
Caption = 'Re&move .pas, .pp file association'
ModalResult = 7
TabOrder = 4
OnClick = RemovePasFile
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333FFFFF333333000033333388888833333333333F888888FFF333
000033338811111188333333338833FFF388FF33000033381119999111833333
38F338888F338FF30000339119933331111833338F388333383338F300003391
13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
000039183811193333918338F8F833F83333838F000039118111933339118338
F3833F83333833830000339111193333391833338F33F8333FF838F300003391
11833338111833338F338FFFF883F83300003339111888811183333338FF3888
83FF83330000333399111111993333333388FFFFFF8833330000333333999999
3333333333338888883333330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object AssignC: TCheckBox
Left = 10
Top = 49
Width = 316
Height = 21
Caption = 'A&ssign .pas, .pp files with Dev-Pascal'
TabOrder = 5
end
object DefaultSourceCode: TSynEdit
Left = 10
Top = 187
Width = 493
Height = 198
Cursor = crIBeam
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'Courier New'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 6
Highlighter = PasSyn
Keystrokes = <
item
Command = ecUp
ShortCut = 38
ShortCut2 = 0
end
item
Command = ecSelUp
ShortCut = 8230
ShortCut2 = 0
end
item
Command = ecScrollUp
ShortCut = 16422
ShortCut2 = 0
end
item
Command = ecDown
ShortCut = 40
ShortCut2 = 0
end
item
Command = ecSelDown
ShortCut = 8232
ShortCut2 = 0
end
item
Command = ecScrollDown
ShortCut = 16424
ShortCut2 = 0
end
item
Command = ecLeft
ShortCut = 37
ShortCut2 = 0
end
item
Command = ecSelLeft
ShortCut = 8229
ShortCut2 = 0
end
item
Command = ecWordLeft
ShortCut = 16421
ShortCut2 = 0
end
item
Command = ecSelWordLeft
ShortCut = 24613
ShortCut2 = 0
end
item
Command = ecRight
ShortCut = 39
ShortCut2 = 0
end
item
Command = ecSelRight
ShortCut = 8231
ShortCut2 = 0
end
item
Command = ecWordRight
ShortCut = 16423
ShortCut2 = 0
end
item
Command = ecSelWordRight
ShortCut = 24615
ShortCut2 = 0
end
item
Command = ecPageDown
ShortCut = 34
ShortCut2 = 0
end
item
Command = ecSelPageDown
ShortCut = 8226
ShortCut2 = 0
end
item
Command = ecPageBottom
ShortCut = 16418
ShortCut2 = 0
end
item
Command = ecSelPageBottom
ShortCut = 24610
ShortCut2 = 0
end
item
Command = ecPageUp
ShortCut = 33
ShortCut2 = 0
end
item
Command = ecSelPageUp
ShortCut = 8225
ShortCut2 = 0
end
item
Command = ecPageTop
ShortCut = 16417
ShortCut2 = 0
end
item
Command = ecSelPageTop
ShortCut = 24609
ShortCut2 = 0
end
item
Command = ecLineStart
ShortCut = 36
ShortCut2 = 0
end
item
Command = ecSelLineStart
ShortCut = 8228
ShortCut2 = 0
end
item
Command = ecEditorTop
ShortCut = 16420
ShortCut2 = 0
end
item
Command = ecSelEditorTop
ShortCut = 24612
ShortCut2 = 0
end
item
Command = ecLineEnd
ShortCut = 35
ShortCut2 = 0
end
item
Command = ecSelLineEnd
ShortCut = 8227
ShortCut2 = 0
end
item
Command = ecEditorBottom
ShortCut = 16419
ShortCut2 = 0
end
item
Command = ecSelEditorBottom
ShortCut = 24611
ShortCut2 = 0
end
item
Command = ecToggleMode
ShortCut = 45
ShortCut2 = 0
end
item
Command = ecCopy
ShortCut = 16429
ShortCut2 = 0
end
item
Command = ecPaste
ShortCut = 8237
ShortCut2 = 0
end
item
Command = ecDeleteChar
ShortCut = 46
ShortCut2 = 0
end
item
Command = ecCut
ShortCut = 8238
ShortCut2 = 0
end
item
Command = ecDeleteLastChar
ShortCut = 8
ShortCut2 = 0
end
item
Command = ecDeleteLastWord
ShortCut = 16392
ShortCut2 = 0
end
item
Command = ecUndo
ShortCut = 32776
ShortCut2 = 0
end
item
Command = ecRedo
ShortCut = 40968
ShortCut2 = 0
end
item
Command = ecLineBreak
ShortCut = 13
ShortCut2 = 0
end
item
Command = ecSelectAll
ShortCut = 16449
ShortCut2 = 0
end
item
Command = ecCopy
ShortCut = 16451
ShortCut2 = 0
end
item
Command = ecBlockIndent
ShortCut = 24649
ShortCut2 = 0
end
item
Command = ecLineBreak
ShortCut = 16461
ShortCut2 = 0
end
item
Command = ecInsertLine
ShortCut = 16462
ShortCut2 = 0
end
item
Command = ecDeleteWord
ShortCut = 16468
ShortCut2 = 0
end
item
Command = ecBlockUnindent
ShortCut = 24661
ShortCut2 = 0
end
item
Command = ecPaste
ShortCut = 16470
ShortCut2 = 0
end
item
Command = ecCut
ShortCut = 16472
ShortCut2 = 0
end
item
Command = ecDeleteLine
ShortCut = 16473
ShortCut2 = 0
end
item
Command = ecDeleteEOL
ShortCut = 24665
ShortCut2 = 0
end
item
Command = ecUndo
ShortCut = 16474
ShortCut2 = 0
end
item
Command = ecRedo
ShortCut = 24666
ShortCut2 = 0
end
item
Command = ecGotoMarker0
ShortCut = 16432
ShortCut2 = 0
end
item
Command = ecGotoMarker1
ShortCut = 16433
ShortCut2 = 0
end
item
Command = ecGotoMarker2
ShortCut = 16434
ShortCut2 = 0
end
item
Command = ecGotoMarker3
ShortCut = 16435
ShortCut2 = 0
end
item
Command = ecGotoMarker4
ShortCut = 16436
ShortCut2 = 0
end
item
Command = ecGotoMarker5
ShortCut = 16437
ShortCut2 = 0
end
item
Command = ecGotoMarker6
ShortCut = 16438
ShortCut2 = 0
end
item
Command = ecGotoMarker7
ShortCut = 16439
ShortCut2 = 0
end
item
Command = ecGotoMarker8
ShortCut = 16440
ShortCut2 = 0
end
item
Command = ecGotoMarker9
ShortCut = 16441
ShortCut2 = 0
end
item
Command = ecSetMarker0
ShortCut = 24624
ShortCut2 = 0
end
item
Command = ecSetMarker1
ShortCut = 24625
ShortCut2 = 0
end
item
Command = ecSetMarker2
ShortCut = 24626
ShortCut2 = 0
end
item
Command = ecSetMarker3
ShortCut = 24627
ShortCut2 = 0
end
item
Command = ecSetMarker4
ShortCut = 24628
ShortCut2 = 0
end
item
Command = ecSetMarker5
ShortCut = 24629
ShortCut2 = 0
end
item
Command = ecSetMarker6
ShortCut = 24630
ShortCut2 = 0
end
item
Command = ecSetMarker7
ShortCut = 24631
ShortCut2 = 0
end
item
Command = ecSetMarker8
ShortCut = 24632
ShortCut2 = 0
end
item
Command = ecSetMarker9
ShortCut = 24633
ShortCut2 = 0
end
item
Command = ecNormalSelect
ShortCut = 24654
ShortCut2 = 0
end
item
Command = ecColumnSelect
ShortCut = 24643
ShortCut2 = 0
end
item
Command = ecLineSelect
ShortCut = 24652
ShortCut2 = 0
end
item
Command = ecTab
ShortCut = 9
ShortCut2 = 0
end
item
Command = ecShiftTab
ShortCut = 8201
ShortCut2 = 0
end
item
Command = ecMatchBracket
ShortCut = 24642
ShortCut2 = 0
end>
MaxLeftChar = 1024
MaxUndo = 1024
ReadOnly = False
WantTabs = True
end
end
end
object HelpBtn: TBitBtn
Left = 207
Top = 455
Width = 92
Height = 31
TabOrder = 4
OnClick = HelpBtnClick
Kind = bkHelp
end
object MarsCaption1: TMarsCaption
ActiveBeginColor = clBlack
ActiveEndColor = clBlue
ActiveFontColor = clWhite
InactiveBeginColor = clBlack
InactiveEndColor = clSilver
InactiveFontColor = clSilver
ApplicationNameFont.Charset = DEFAULT_CHARSET
ApplicationNameFont.Color = clWindowText
ApplicationNameFont.Height = -11
ApplicationNameFont.Name = 'MS Sans Serif'
ApplicationNameFont.Style = [fsBold]
CaptionFont.Charset = DEFAULT_CHARSET
CaptionFont.Color = clWindowText
CaptionFont.Height = -11
CaptionFont.Name = 'MS Sans Serif'
CaptionFont.Style = []
NumColors = 64
AutoSize = False
Left = 288
Top = 352
end
object Complet: TSynCompletionProposal
Position = 0
NbLinesInWindow = 6
ClSelect = cl3DLight
AnsiStrings = False
Width = 262
ShortCut = 16416
Editor = DefaultSourceCode
EndOfTokenChr = '()[].'
Left = 348
Top = 440
end
object PasSyn: TSynPasSyn
DefaultFilter = 'Pascal files (*.pas,*.dpr,*.dpk,*.inc)|*.pas;*.dpr;*.dpk;*.inc'
AsmAttri.Foreground = clBlue
CommentAttri.Foreground = clHighlight
CommentAttri.Style = [fsItalic]
KeyAttri.Style = [fsBold]
NumberAttri.Foreground = clPurple
StringAttri.Foreground = clRed
Left = 316
Top = 448
end
end