123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540 |
- object SourceFileForm: TSourceFileForm
- Left = 56
- Top = 42
- ActiveControl = EditorToolBar
- AutoScroll = False
- Caption = 'TIGCC IDE Editor'
- ClientHeight = 311
- ClientWidth = 482
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Menu = MainMenu
- OldCreateOrder = False
- Position = poDefault
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object ToolBarBevel: TBevel
- Left = 0
- Top = 28
- Width = 482
- Height = 1
- Align = alTop
- Shape = bsSpacer
- end
- object StatusBar: TStatusBar
- Left = 0
- Top = 292
- Width = 482
- Height = 19
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Constraints.MaxHeight = 19
- Constraints.MinHeight = 19
- Panels = <
- item
- Alignment = taRightJustify
- Text = '1'
- Width = 30
- end
- item
- Alignment = taRightJustify
- Text = '1'
- Width = 30
- end
- item
- Bevel = pbNone
- Width = 1
- end
- item
- Text = '0 Characters'
- Width = 93
- end
- item
- Bevel = pbNone
- Width = 1
- end
- item
- Width = 200
- end>
- UseSystemFont = False
- end
- object EditorToolBar: TToolBar
- Left = 0
- Top = 0
- Width = 482
- Height = 28
- AutoSize = True
- ButtonHeight = 26
- ButtonWidth = 27
- Caption = 'Editor Toolbar'
- DisabledImages = MainForm.ToolBarImagesDisabled
- DragKind = dkDock
- EdgeBorders = [ebLeft, ebTop]
- Flat = True
- Images = MainForm.ToolBarImages
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- Wrapable = False
- object ToolButton3: TToolButton
- Left = 0
- Top = 0
- Action = ActionFileSave
- end
- object ToolButton2: TToolButton
- Left = 27
- Top = 0
- Action = ActionFileAddToProject
- end
- object ToolButton4: TToolButton
- Left = 54
- Top = 0
- Width = 8
- Caption = 'ToolButton4'
- ImageIndex = 3
- Style = tbsSeparator
- end
- object ToolButton23: TToolButton
- Left = 62
- Top = 0
- Action = ActionFilePrintQuickly
- end
- object ToolButton24: TToolButton
- Left = 89
- Top = 0
- Width = 8
- Caption = 'ToolButton24'
- ImageIndex = 15
- Style = tbsSeparator
- end
- object ToolButton6: TToolButton
- Left = 97
- Top = 0
- Action = ActionEditDelete
- end
- object ToolButton7: TToolButton
- Left = 124
- Top = 0
- Action = ActionEditCut
- end
- object ToolButton8: TToolButton
- Left = 151
- Top = 0
- Action = ActionEditCopy
- end
- object ToolButton9: TToolButton
- Left = 178
- Top = 0
- Action = ActionEditPaste
- end
- object ToolButton10: TToolButton
- Left = 205
- Top = 0
- Width = 8
- Caption = 'ToolButton10'
- ImageIndex = 4
- Style = tbsSeparator
- end
- object ToolButton5: TToolButton
- Left = 213
- Top = 0
- Action = ActionEditUndo
- end
- object ToolButton19: TToolButton
- Left = 240
- Top = 0
- Action = ActionEditRedo
- end
- object ToolButton11: TToolButton
- Left = 267
- Top = 0
- Width = 8
- Caption = 'ToolButton11'
- ImageIndex = 4
- Style = tbsSeparator
- end
- object ToolButton20: TToolButton
- Left = 275
- Top = 0
- Action = ActionFindFind
- end
- object ToolButton21: TToolButton
- Left = 302
- Top = 0
- Action = ActionFindReplace
- end
- object ToolButton25: TToolButton
- Left = 329
- Top = 0
- Action = ActionFindFunctions
- DropdownMenu = FunctionPopup
- Style = tbsDropDown
- end
- object ToolButton22: TToolButton
- Left = 369
- Top = 0
- Width = 8
- Caption = 'ToolButton22'
- ImageIndex = 16
- Style = tbsSeparator
- end
- object ToolButton13: TToolButton
- Left = 377
- Top = 0
- Action = ActionFileCompile
- end
- object ToolButton1: TToolButton
- Left = 404
- Top = 0
- Width = 4
- Caption = 'ToolButton1'
- ImageIndex = 10
- Style = tbsDivider
- end
- end
- object Actions: TActionList
- Images = MainForm.ToolBarImages
- Left = 32
- Top = 32
- object ActionFindFind: TAction
- Category = 'Find'
- Caption = '&Find...'
- Hint = 'Find Text|Find the specified text in the current source file'
- ImageIndex = 13
- ShortCut = 16454
- OnExecute = FindFind
- end
- object ActionFindReplace: TAction
- Category = 'Find'
- Caption = '&Replace...'
- Hint =
- 'Replace Text|Find the specified text in the current source file ' +
- 'and replace it with something else'
- ImageIndex = 14
- ShortCut = 16466
- OnExecute = FindReplace
- end
- object ActionFindFunctions: TAction
- Category = 'Find'
- Caption = 'F&unctions...'
- Hint = 'Functions|Display a list of all functions in the current file'
- ImageIndex = 18
- OnExecute = FindFunctions
- end
- object ActionFileSave: TAction
- Category = 'File'
- Caption = '&Save'
- Hint = 'Save|Save the file'
- ImageIndex = 2
- OnExecute = FileSave
- end
- object ActionFileSaveAs: TAction
- Category = 'File'
- Caption = 'Save &As...'
- Hint = 'Save As|Save the file with another name, or in another folder'
- OnExecute = FileSaveAs
- end
- object ActionFindOpenFile: TAction
- Category = 'Find'
- Caption = '&Open File at Cursor'
- Hint = 'Open File at Cursor|Open the file the cursor is on'
- ShortCut = 16397
- OnExecute = FindOpenFile
- end
- object ActionFileCompile: TAction
- Category = 'File'
- Caption = 'C&ompile'
- Hint = 'Compile|Compile the file'
- ImageIndex = 9
- OnExecute = FileCompile
- end
- object ActionFileAddToProject: TAction
- Category = 'File'
- Caption = 'A&dd to Project'
- Hint = 'Add to Project|Add this file to the current project'
- ImageIndex = 8
- OnExecute = FileAddToProject
- end
- object ActionFilePrint: TAction
- Category = 'File'
- Caption = '&Print...'
- Hint = 'Print File|Print this file'
- ImageIndex = 3
- ShortCut = 16464
- OnExecute = FilePrint
- end
- object ActionFilePrintQuickly: TAction
- Category = 'File'
- Caption = '&Print'
- Hint = 'Print File|Print this file'
- ImageIndex = 3
- ShortCut = 16464
- OnExecute = FilePrintQuickly
- end
- object ActionFileClose: TAction
- Category = 'File'
- Caption = '&Close'
- Hint = 'Close|Close this window'
- ShortCut = 32856
- OnExecute = ActionFileCloseExecute
- end
- object ActionEditUndo: TAction
- Category = 'Edit'
- Caption = '&Undo'
- Enabled = False
- Hint = 'Undo|Undo the last operation in the editor'
- ImageIndex = 16
- ShortCut = 32776
- OnExecute = EditUndo
- end
- object ActionEditRedo: TAction
- Category = 'Edit'
- Caption = '&Redo'
- Enabled = False
- Hint = 'Redo|Redo the last undone operation in the editor'
- ImageIndex = 17
- ShortCut = 40968
- OnExecute = EditRedo
- end
- object ActionEditDelete: TAction
- Category = 'Edit'
- Caption = '&Clear'
- Enabled = False
- Hint = 'Clear|Delete the selected text in the editor'
- ImageIndex = 4
- OnExecute = EditDelete
- end
- object ActionEditCut: TAction
- Category = 'Edit'
- Caption = 'Cu&t'
- Enabled = False
- Hint = 'Cut|Copy the selected text into the clipboard and delete it'
- ImageIndex = 5
- OnExecute = EditCut
- end
- object ActionEditCopy: TAction
- Category = 'Edit'
- Caption = 'C&opy'
- Enabled = False
- Hint =
- 'Copy|Copy the selected text into the clipboard without deleting ' +
- 'it'
- ImageIndex = 6
- OnExecute = EditCopy
- end
- object ActionEditPaste: TAction
- Category = 'Edit'
- Caption = '&Paste'
- Hint = 'Paste|Paste text from the clipboard'
- ImageIndex = 7
- OnExecute = EditPaste
- end
- object ActionEditSelectAll: TAction
- Category = 'Edit'
- Caption = '&Select All'
- Hint = 'Select All|Select the whole text in the editor'
- ShortCut = 16449
- OnExecute = EditSelectAll
- end
- object ActionEditIncreaseIndent: TAction
- Category = 'Edit'
- Caption = '&Increase Indent'
- Hint =
- 'Increase Indent|Insert tabs so that the text is moved to the rig' +
- 'ht'
- ImageIndex = 19
- ShortCut = 16457
- OnExecute = EditIncreaseIndent
- end
- object ActionEditDecreaseIndent: TAction
- Category = 'Edit'
- Caption = '&Decrease Indent'
- Hint =
- 'Decrease Indent|Remove tabs and spaces so that the text is moved' +
- ' to the left'
- ImageIndex = 20
- ShortCut = 16452
- OnExecute = EditDecreaseIndent
- end
- end
- object MainMenu: TMainMenu
- Images = MainForm.ToolBarImages
- Top = 32
- object File1: TMenuItem
- Caption = '&File'
- Hint =
- 'File|Contains operations for creating, opening, and saving files' +
- '.'
- object Save1: TMenuItem
- Action = ActionFileSave
- end
- object SaveAs1: TMenuItem
- Action = ActionFileSaveAs
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object AddtoProject1: TMenuItem
- Action = ActionFileAddToProject
- end
- object N6: TMenuItem
- Caption = '-'
- end
- object Compile1: TMenuItem
- Action = ActionFileCompile
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object Print1: TMenuItem
- Action = ActionFilePrint
- end
- object N4: TMenuItem
- Caption = '-'
- end
- object Close1: TMenuItem
- Action = ActionFileClose
- ShortCut = 16499
- end
- end
- object Edit1: TMenuItem
- Caption = '&Edit'
- Hint = 'Edit|Contains operations to edit the current file.'
- object Undo1: TMenuItem
- Action = ActionEditUndo
- end
- object Redo1: TMenuItem
- Action = ActionEditRedo
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object Delete1: TMenuItem
- Action = ActionEditDelete
- end
- object Cut1: TMenuItem
- Action = ActionEditCut
- end
- object Copy1: TMenuItem
- Action = ActionEditCopy
- end
- object Paste1: TMenuItem
- Action = ActionEditPaste
- end
- object N9: TMenuItem
- Caption = '-'
- end
- object SelectAll1: TMenuItem
- Action = ActionEditSelectAll
- end
- object N18: TMenuItem
- Caption = '-'
- end
- object IncreaseIndent1: TMenuItem
- Action = ActionEditIncreaseIndent
- end
- object DecreaseIndent1: TMenuItem
- Action = ActionEditDecreaseIndent
- end
- end
- object Find1: TMenuItem
- Caption = 'F&ind'
- Hint = '&Find|Contains operations to find code you are looking for.'
- object Find2: TMenuItem
- Action = ActionFindFind
- end
- object Replace1: TMenuItem
- Action = ActionFindReplace
- end
- object N13: TMenuItem
- Caption = '-'
- end
- object Functions1: TMenuItem
- Action = ActionFindFunctions
- end
- object N15: TMenuItem
- Caption = '-'
- end
- object OpenFileAtCursor1: TMenuItem
- Action = ActionFindOpenFile
- end
- end
- end
- object EditorPopup: TPopupMenu
- Top = 64
- object OpenFileatCursor2: TMenuItem
- Action = ActionFindOpenFile
- end
- object N5: TMenuItem
- Caption = '-'
- end
- object Undo2: TMenuItem
- Action = ActionEditUndo
- end
- object Redo2: TMenuItem
- Action = ActionEditRedo
- end
- object N16: TMenuItem
- Caption = '-'
- end
- object Clear1: TMenuItem
- Action = ActionEditDelete
- end
- object Cut2: TMenuItem
- Action = ActionEditCut
- end
- object Copy2: TMenuItem
- Action = ActionEditCopy
- end
- object Paste2: TMenuItem
- Action = ActionEditPaste
- end
- object N17: TMenuItem
- Caption = '-'
- end
- object SelectAll2: TMenuItem
- Action = ActionEditSelectAll
- end
- object N20: TMenuItem
- Caption = '-'
- end
- object IncreaseIndent2: TMenuItem
- Action = ActionEditIncreaseIndent
- end
- object DecreaseIndent2: TMenuItem
- Action = ActionEditDecreaseIndent
- end
- end
- object FindDlg: TFindDialog
- OnClose = FindDlgClose
- OnFind = FindDlgFind
- Left = 64
- Top = 32
- end
- object ReplaceDlg: TReplaceDialog
- OnClose = FindDlgClose
- OnFind = FindDlgFind
- OnReplace = ReplaceDlgReplace
- Left = 64
- Top = 64
- end
- object FunctionPopup: TPopupMenu
- OnPopup = FunctionPopupPopup
- Top = 96
- object NoFunctionsItem: TMenuItem
- Caption = '(No Functions)'
- Enabled = False
- end
- end
- end
|