home *** CD-ROM | disk | FTP | other *** search
- inherited EditWindow: TEditWindow
- Left = 195
- Top = 228
- Width = 435
- Height = 301
- HorzScrollBar.Increment = 38
- VertScrollBar.Increment = 25
- Caption = 'EditWindow'
- Icon.Data = {<image000.ico>}
- Scaled = False
- OnActivate = FormActivate
- OnClose = WindowClose
- OnCloseQuery = WindowCloseQuery
- OnResize = WindowResize
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object DockLeftSplitter: TSplitter
- Left = 17
- Top = 0
- Width = 3
- Height = 238
- Cursor = crHSplit
- AutoSnap = False
- MinSize = 15
- ResizeStyle = rsUpdate
- end
- object DockRightSplitter: TSplitter
- Left = 407
- Top = 0
- Width = 3
- Height = 238
- Cursor = crHSplit
- Align = alRight
- AutoSnap = False
- MinSize = 15
- ResizeStyle = rsUpdate
- end
- object DockBottomSplitter: TSplitter
- Left = 0
- Top = 238
- Width = 427
- Height = 3
- Cursor = crVSplit
- Align = alBottom
- AutoSnap = False
- MinSize = 15
- ResizeStyle = rsUpdate
- end
- object DockBottomPanel: TEditorDockPanel
- Left = 0
- Top = 241
- Width = 427
- Height = 17
- Align = alBottom
- BevelOuter = bvNone
- DockSite = True
- FullRepaint = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnDockDrop = DockLeftPanelDockDrop
- OnDockOver = DockRightPanelDockOver
- OnGetSiteInfo = DockLeftPanelGetSiteInfo
- OnUnDock = DockLeftPanelUnDock
- NextControl = StatusBar
- Splitter = DockBottomSplitter
- end
- object DockRightPanel: TEditorDockPanel
- Left = 410
- Top = 0
- Width = 17
- Height = 238
- Align = alRight
- BevelOuter = bvNone
- DockSite = True
- FullRepaint = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnDockDrop = DockLeftPanelDockDrop
- OnDockOver = DockRightPanelDockOver
- OnGetSiteInfo = DockLeftPanelGetSiteInfo
- OnUnDock = DockLeftPanelUnDock
- Splitter = DockRightSplitter
- end
- object DockLeftPanel: TEditorDockPanel
- Left = 0
- Top = 0
- Width = 17
- Height = 238
- Align = alLeft
- BevelOuter = bvNone
- DockSite = True
- FullRepaint = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnDockDrop = DockLeftPanelDockDrop
- OnDockOver = DockRightPanelDockOver
- OnGetSiteInfo = DockLeftPanelGetSiteInfo
- OnUnDock = DockLeftPanelUnDock
- Splitter = DockLeftSplitter
- end
- object Panel1: TPanel
- Left = 20
- Top = 0
- Width = 387
- Height = 238
- Align = alClient
- BevelOuter = bvNone
- FullRepaint = False
- PopupMenu = EditorLocalMenu
- TabOrder = 3
- object TabControlPanel: TPanel
- Left = 0
- Top = 0
- Width = 387
- Height = 25
- Align = alTop
- BevelOuter = bvNone
- FullRepaint = False
- TabOrder = 0
- object PaintBox1: TPaintBox
- Left = 307
- Top = 0
- Width = 4
- Height = 25
- Align = alRight
- OnPaint = PaintBox1Paint
- end
- object Panel4: TPanel
- Left = 0
- Top = 0
- Width = 307
- Height = 25
- Align = alClient
- BevelOuter = bvNone
- FullRepaint = False
- TabOrder = 0
- object TabControl: TXTabControl
- Left = 0
- Top = 1
- Width = 307
- Height = 24
- Align = alBottom
- HotTrack = True
- PopupMenu = EditorLocalMenu
- TabOrder = 0
- TabStop = False
- OnChange = TabsChanged
- OnDragOver = TabControlDragOver
- OnMouseDown = TabControlMouseDown
- OnStartDrag = TabControlStartDrag
- BorderStyle = bsNone
- end
- end
- object ToolBar1: TToolBar
- Left = 311
- Top = 0
- Width = 76
- Height = 25
- Align = alRight
- BorderWidth = 1
- ButtonHeight = 20
- EdgeOuter = esNone
- Flat = True
- Images = EnvironmentOptions.BrowseImages
- TabOrder = 1
- object BackToolButton: TToolButton
- Left = 0
- Top = 0
- Action = Back
- DropdownMenu = BackMenu
- Style = tbsDropDown
- end
- object ForwardToolButton: TToolButton
- Left = 36
- Top = 0
- Action = Forward
- DropdownMenu = ForwardMenu
- Style = tbsDropDown
- end
- end
- end
- object EditorPanel: TPanel
- Left = 0
- Top = 25
- Width = 387
- Height = 213
- Align = alClient
- BevelOuter = bvLowered
- BorderWidth = 1
- FullRepaint = False
- PopupMenu = EditorLocalMenu
- TabOrder = 1
- end
- end
- object StatusBar: TStatusBar
- Left = 0
- Top = 258
- Width = 427
- Height = 19
- Panels = <
- item
- Alignment = taCenter
- Width = 65
- end
- item
- Width = 75
- end
- item
- Width = 50
- end>
- PopupMenu = EditorLocalMenu
- SimplePanel = False
- end
- object EditorLocalMenu: TPopupMenu
- HelpContext = 4715
- OnPopup = EditorLocalMenuPopup
- Left = 136
- Top = 152
- end
- object OpenFileDlg: TOpenDialog
- HelpContext = 1436
- DefaultExt = 'PAS'
- Filter =
- 'C++ files (*.CPP;*.C;*.HPP;*.H)|*.cpp;*.c;*.hpp;*.h|Pascal files' +
- ' (*.PAS)|*.pas|Project file (*.MAK)|*.mak|Any file (*.*)|*.*'
- Options = [ofHideReadOnly, ofShowHelp, ofEnableSizing]
- Title = 'Read File as Block'
- Left = 40
- Top = 200
- end
- object SaveFileDlg: TSaveDialog
- DefaultExt = 'PAS'
- Filter =
- 'C++ files (*.CPP;*.C;*.HPP;*.H)|*.cpp;*.c;*.hpp;*.h|Pascal files' +
- ' (*.PAS)|*.pas|Project files (*.MAK)|*.mak|Any file (*.*)|*.*'
- Options = [ofOverwritePrompt, ofHideReadOnly, ofShowHelp, ofEnableSizing]
- Title = 'Write Block to File'
- Left = 136
- Top = 200
- end
- object ForwardMenu: TPopupMenu
- OnPopup = ForwardMenuPopup
- Left = 376
- Top = 37
- object File11: TMenuItem
- Caption = '&File1'
- end
- object File21: TMenuItem
- Caption = '&File2'
- end
- object File31: TMenuItem
- Caption = '&File3'
- end
- end
- object BackMenu: TPopupMenu
- OnPopup = BackMenuPopup
- Left = 328
- Top = 34
- end
- object ActionList1: TActionList
- Left = 285
- Top = 34
- object Back: TAction
- Caption = 'Back'
- ImageIndex = 0
- OnExecute = BackExecute
- OnUpdate = BackUpdate
- end
- object Forward: TAction
- Caption = 'Forward'
- ImageIndex = 1
- OnExecute = ForwardExecute
- OnUpdate = ForwardUpdate
- end
- end
- end
-