home *** CD-ROM | disk | FTP | other *** search
- object EditorDisplay: TEditorDisplay
- Left = 0
- Top = 0
- Width = 419
- Height = 317
- HelpContext = 1900
- Caption = 'Display'
- OnShow = EditorDisplayShow
- OnCreate = EditorDisplayCreate
- OnDestroy = EditorDisplayDestroy
- object Label4: TLabel
- Left = 69
- Top = 149
- Width = 51
- Height = 13
- Caption = 'Editor &font:'
- FocusControl = FontName
- end
- object Label7: TLabel
- Left = 303
- Top = 149
- Width = 23
- Height = 13
- Caption = '&Size:'
- FocusControl = FontSize
- end
- object Label16: TLabel
- Left = 8
- Top = 188
- Width = 38
- Height = 13
- Caption = 'Sample:'
- end
- object GroupBox11: TGroupBox
- Left = 8
- Top = 72
- Width = 403
- Height = 65
- Caption = ' Margin and gutter '
- TabOrder = 1
- object lbRightMargin: TLabel
- Left = 183
- Top = 16
- Width = 62
- Height = 13
- Caption = 'Right &margin:'
- FocusControl = eoRightMargin
- end
- object lbGutterWidth: TLabel
- Left = 295
- Top = 16
- Width = 60
- Height = 13
- Caption = 'Gutter &width:'
- FocusControl = eoGutterWidth
- end
- object eoLineOnMargin: TPropCheckBox
- Left = 8
- Top = 18
- Width = 138
- Height = 20
- Caption = '&Visible right margin'
- PropField = 'Visible Right Margin'
- PropSet = EnvironmentOptions.EditorOptions
- TabOrder = 0
- ValueChecked = 'True;Yes;1'
- ValueUnchecked = 'False;No;0'
- OnClick = eoLineOnMarginClick
- end
- object eoRightMargin: THistoryPropComboBox
- Left = 183
- Top = 32
- Width = 65
- Height = 21
- PropField = 'Right Margin'
- PropSet = EnvironmentOptions.EditorOptions
- ItemHeight = 13
- TabOrder = 2
- HistoryManager = EnvironmentOptions.HistoryLists
- HistoryList = 'hlRightMargin'
- end
- object eoGutterWidth: THistoryPropComboBox
- Left = 295
- Top = 32
- Width = 65
- Height = 21
- PropField = 'Gutter Width'
- PropSet = EnvironmentOptions.EditorOptions
- ItemHeight = 13
- TabOrder = 3
- HistoryManager = EnvironmentOptions.HistoryLists
- HistoryList = 'hlGutterWidth'
- end
- object eoVisibleGutter: TPropCheckBox
- Left = 8
- Top = 38
- Width = 97
- Height = 17
- Caption = 'Visible &gutter'
- PropField = 'Visible Gutter'
- PropSet = EnvironmentOptions.EditorOptions
- TabOrder = 1
- ValueChecked = 'True;Yes;1'
- ValueUnchecked = 'False;No;0'
- OnClick = eoVisibleGutterClick
- end
- end
- object GroupBox10: TGroupBox
- Left = 8
- Top = 8
- Width = 402
- Height = 59
- Caption = ' Display and file options '
- TabOrder = 0
- object eoBriefCursors: TPropCheckBox
- Left = 8
- Top = 18
- Width = 150
- Height = 17
- Caption = 'BRIEF &cursor shapes'
- PropField = 'BRIEF Cursor Shapes'
- PropSet = EnvironmentOptions.EditorOptions
- TabOrder = 0
- ValueChecked = 'True;Yes;1'
- ValueUnchecked = 'False;No;0'
- end
- object eoCreateBackup: TPropCheckBox
- Left = 8
- Top = 36
- Width = 150
- Height = 17
- TabStop = False
- Caption = 'Create &backup file'
- PropField = 'Create Backup File'
- PropSet = EnvironmentOptions.EditorOptions
- TabOrder = 1
- ValueChecked = 'True;Yes;1'
- ValueUnchecked = 'False;No;0'
- end
- object eoPreserveLineEnds: TPropCheckBox
- Left = 200
- Top = 18
- Width = 150
- Height = 17
- TabStop = False
- Caption = '&Preserve line ends'
- PropField = 'Preserve Line Ends'
- PropSet = EnvironmentOptions.EditorOptions
- TabOrder = 2
- ValueChecked = 'True;Yes;1'
- ValueUnchecked = 'False;No;0'
- end
- object eoFullZoom: TPropCheckBox
- Left = 200
- Top = 36
- Width = 150
- Height = 17
- TabStop = False
- Caption = '&Zoom to full screen'
- PropField = 'Zoom To Full Screen'
- PropSet = EnvironmentOptions.EditorOptions
- TabOrder = 3
- ValueChecked = 'True;Yes;1'
- ValueUnchecked = 'False;No;0'
- end
- end
- object FontName: TPropComboBox
- Left = 69
- Top = 166
- Width = 186
- Height = 21
- Style = csDropDownList
- PropField = 'Editor Font'
- PropSet = EnvironmentOptions.EditorOptions
- ItemHeight = 13
- TabOrder = 2
- OnChange = FontNameChange
- end
- object FontSize: TPropComboBox
- Left = 303
- Top = 166
- Width = 63
- Height = 21
- PropField = 'Font Size'
- PropSet = EnvironmentOptions.EditorOptions
- ItemHeight = 13
- TabOrder = 3
- OnClick = FontSizeChange
- OnExit = FontSizeExit
- end
- object FontSample: TPanel
- Left = 8
- Top = 204
- Width = 403
- Height = 101
- BevelOuter = bvLowered
- Caption = 'AaBbYyZz'
- TabOrder = 4
- end
- end
-