lazarus/examples/synanyhighlighter/unit1.lfm

484 lines
9.0 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

object Form1: TForm1
Left = 294
Height = 293
Top = 356
Width = 556
ActiveControl = SynMemo
Caption = 'Form1'
ClientHeight = 293
ClientWidth = 556
Position = poDesktopCenter
LCLVersion = '0.9.26.1'
object Label1: TLabel
Left = 44
Height = 14
Top = 180
Width = 47
Caption = 'Keywords'
ParentColor = False
end
object Label2: TLabel
Left = 176
Height = 14
Top = 180
Width = 37
Caption = 'Objects'
ParentColor = False
end
object Label3: TLabel
Left = 300
Height = 14
Top = 180
Width = 48
Caption = 'Constants'
ParentColor = False
end
object SynMemo: TSynMemo
Cursor = crIBeam
Left = 16
Height = 156
Top = 12
Width = 524
Font.Height = -16
Font.Name = 'courier'
Font.Pitch = fpFixed
Font.Quality = fqNonAntialiased
ParentColor = False
ParentFont = False
TabOrder = 0
BookMarkOptions.OnChange = nil
Gutter.RightOffset = 0
Gutter.LeftOffset = 0
Gutter.ShowCodeFolding = True
Gutter.CodeFoldingWidth = 10
Gutter.ShowChanges = True
Gutter.ShowLineNumbers = True
Highlighter = SynAnySyn
Keystrokes = <
item
Command = 3
ShortCut = 38
end
item
Command = 103
ShortCut = 8230
end
item
Command = 211
ShortCut = 16422
end
item
Command = 4
ShortCut = 40
end
item
Command = 104
ShortCut = 8232
end
item
Command = 212
ShortCut = 16424
end
item
Command = 1
ShortCut = 37
end
item
Command = 101
ShortCut = 8229
end
item
Command = 5
ShortCut = 16421
end
item
Command = 105
ShortCut = 24613
end
item
Command = 2
ShortCut = 39
end
item
Command = 102
ShortCut = 8231
end
item
Command = 6
ShortCut = 16423
end
item
Command = 106
ShortCut = 24615
end
item
Command = 10
ShortCut = 34
end
item
Command = 110
ShortCut = 8226
end
item
Command = 14
ShortCut = 16418
end
item
Command = 114
ShortCut = 24610
end
item
Command = 9
ShortCut = 33
end
item
Command = 109
ShortCut = 8225
end
item
Command = 13
ShortCut = 16417
end
item
Command = 113
ShortCut = 24609
end
item
Command = 7
ShortCut = 36
end
item
Command = 107
ShortCut = 8228
end
item
Command = 15
ShortCut = 16420
end
item
Command = 115
ShortCut = 24612
end
item
Command = 8
ShortCut = 35
end
item
Command = 108
ShortCut = 8227
end
item
Command = 16
ShortCut = 16419
end
item
Command = 116
ShortCut = 24611
end
item
Command = 223
ShortCut = 45
end
item
Command = 201
ShortCut = 16429
end
item
Command = 604
ShortCut = 8237
end
item
Command = 502
ShortCut = 46
end
item
Command = 603
ShortCut = 8238
end
item
Command = 501
ShortCut = 8
end
item
Command = 501
ShortCut = 8200
end
item
Command = 504
ShortCut = 16392
end
item
Command = 601
ShortCut = 32776
end
item
Command = 602
ShortCut = 40968
end
item
Command = 509
ShortCut = 13
end
item
Command = 199
ShortCut = 16449
end
item
Command = 201
ShortCut = 16451
end
item
Command = 610
ShortCut = 24649
end
item
Command = 509
ShortCut = 16461
end
item
Command = 510
ShortCut = 16462
end
item
Command = 503
ShortCut = 16468
end
item
Command = 611
ShortCut = 24661
end
item
Command = 604
ShortCut = 16470
end
item
Command = 603
ShortCut = 16472
end
item
Command = 507
ShortCut = 16473
end
item
Command = 506
ShortCut = 24665
end
item
Command = 601
ShortCut = 16474
end
item
Command = 602
ShortCut = 24666
end
item
Command = 301
ShortCut = 16432
end
item
Command = 302
ShortCut = 16433
end
item
Command = 303
ShortCut = 16434
end
item
Command = 304
ShortCut = 16435
end
item
Command = 305
ShortCut = 16436
end
item
Command = 306
ShortCut = 16437
end
item
Command = 307
ShortCut = 16438
end
item
Command = 308
ShortCut = 16439
end
item
Command = 309
ShortCut = 16440
end
item
Command = 310
ShortCut = 16441
end
item
Command = 351
ShortCut = 24624
end
item
Command = 352
ShortCut = 24625
end
item
Command = 353
ShortCut = 24626
end
item
Command = 354
ShortCut = 24627
end
item
Command = 355
ShortCut = 24628
end
item
Command = 356
ShortCut = 24629
end
item
Command = 357
ShortCut = 24630
end
item
Command = 358
ShortCut = 24631
end
item
Command = 359
ShortCut = 24632
end
item
Command = 360
ShortCut = 24633
end
item
Command = 231
ShortCut = 24654
end
item
Command = 232
ShortCut = 24643
end
item
Command = 233
ShortCut = 24652
end
item
Command = 612
ShortCut = 9
end
item
Command = 613
ShortCut = 8201
end
item
Command = 250
ShortCut = 24642
end>
Lines.Strings = (
'This example shows, how the the Keywords,'
'Objects and Constants properties of the class'
'TSynAnySyn can be controlled at runtime.'
''
'Objects: this is a simple test line'
'Keys: this is another test line'
''
)
SelectedColor.OnChange = nil
end
object CheckListBoxKeys: TCheckListBox
Left = 16
Height = 80
Top = 200
Width = 100
Items.Strings = (
'KEYWORDS'
'OBJECTS'
'TEST'
'SIMPLE'
)
ItemHeight = 13
OnItemClick = CheckListBoxHandler
TabOrder = 1
Data = {
0400000000000000
}
end
object CheckListBoxObjects: TCheckListBox
Left = 144
Height = 80
Top = 200
Width = 100
Items.Strings = (
'EXAMPLE'
'CONTROLLED'
'TSYNANYSYN'
'ANOTHER'
)
ItemHeight = 13
OnItemClick = CheckListBoxHandler
TabOrder = 2
Data = {
0400000000000000
}
end
object CheckListBoxConstants: TCheckListBox
Left = 268
Height = 80
Top = 200
Width = 100
Items.Strings = (
'CLASS'
'LINE'
'RUNTIME'
'THIS'
)
ItemHeight = 13
OnItemClick = CheckListBoxHandler
TabOrder = 3
Data = {
0400000000000000
}
end
object ButtonCheckAll: TButton
Left = 384
Height = 25
Top = 200
Width = 75
Caption = 'Check All'
OnClick = ButtonCheckAllClick
TabOrder = 4
end
object ButtonUncheckAll: TButton
Left = 384
Height = 25
Top = 232
Width = 75
Caption = 'Uncheck All'
OnClick = ButtonUncheckAllClick
TabOrder = 5
end
object SynAnySyn: TSynAnySyn
Enabled = False
CommentAttri.FrameColor = clNone
IdentifierAttri.FrameColor = clNone
IdentifierChars = '!"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~<><7F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
KeyAttri.FrameColor = clNone
ConstantAttri.FrameColor = clNone
ObjectAttri.FrameColor = clNone
EntityAttri.FrameColor = clNone
VariableAttri.FrameColor = clNone
DotAttri.FrameColor = clNone
Objects.Strings = (
''
)
NumberAttri.FrameColor = clNone
PreprocessorAttri.FrameColor = clNone
SpaceAttri.FrameColor = clNone
StringAttri.FrameColor = clNone
SymbolAttri.FrameColor = clNone
left = 512
top = 180
end
end