|
|
1.1 root 1: object TextFileEditForm: TTextFileEditForm 1.1.1.2 ! root 2: Left = 317 ! 3: Top = 253 1.1 root 4: Width = 783 5: Height = 540 6: Caption = 'TextFileEditForm' 7: Color = clBtnFace 8: Font.Charset = DEFAULT_CHARSET 9: Font.Color = clWindowText 1.1.1.2 ! root 10: Font.Height = -13 1.1 root 11: Font.Name = 'MS Sans Serif' 12: Font.Style = [] 13: Icon.Data = { 14: 0000010001002020100000000000E80200001600000028000000200000004000 15: 0000010004000000000080020000000000000000000000000000000000000000 16: 000000008000008000000080800080000000800080008080000080808000C0C0 17: C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000 18: 0000000000000000000000000000000000000000007777770000000000000000 19: 0000000000000007000000000000000000000000000000070000000000000000 20: 0000000000777007000000000000000000077070007770070000700000000000 21: 0077000700787000000007000000000007708000077877000070007000000000 22: 07088807777777770777000700000000008F88877FFFFF077887700700000000 23: 00088888F88888FF08870070000000000000880888877778F070007000000007 24: 77088888880007778F770077777000700008F088007777077F07000000700700 25: 008F08880800077778F7700000700708888F0880F08F807078F7777700700708 26: F88F0780F070F07078F7887700700708888F0780F077807088F7777700700700 27: 008F0788FF00080888F77000007000000008F0780FFFF0088F77007000000000 28: 0008F07788000888887700700000000000008F07788888880870007000000000 29: 00088FF0077788088887000700000000008F888FF00000F87887700700000000 30: 0708F8088FFFFF88078700700000000007708000088888000070070000000000 31: 0077007000888007000070000000000000077700008F80070007000000000000 32: 0000000000888007000000000000000000000000000000070000000000000000 33: 000000000777777700000000000000000000000000000000000000000000FFFF 34: FFFFFFFC0FFFFFFC0FFFFFF80FFFFFF80FFFFE180E7FFC00043FF800001FF800 35: 000FF800000FFC00001FFE00001FE0000001C000000180000001800000018000 36: 00018000000180000001FC00001FFC00001FFE00001FFC00000FF800000FF800 37: 001FF800003FFC180C7FFE380EFFFFF80FFFFFF80FFFFFF80FFFFFFFFFFF} 38: Menu = Menu 39: OldCreateOrder = False 40: Position = poDefaultPosOnly 41: OnShow = FormShow 1.1.1.2 ! root 42: PixelsPerInch = 120 ! 43: TextHeight = 16 1.1 root 44: object Panel: TPanel 45: Left = 0 46: Top = 0 47: Width = 775 1.1.1.2 ! root 48: Height = 33 1.1 root 49: Align = alTop 50: BevelOuter = bvNone 51: TabOrder = 0 52: object OkButton: TBitBtn 1.1.1.2 ! root 53: Left = 10 ! 54: Top = 4 ! 55: Width = 90 ! 56: Height = 26 1.1 root 57: Action = Save 58: Caption = 'OK' 59: ModalResult = 1 60: TabOrder = 0 61: Glyph.Data = { 62: 76010000424D7601000000000000760000002800000020000000100000000100 63: 04000000000000010000120B0000120B00001000000000000000000000000000 64: 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 65: FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 66: 555555555555555555555555555555555555555555FF55555555555559055555 67: 55555555577FF5555555555599905555555555557777F5555555555599905555 68: 555555557777FF5555555559999905555555555777777F555555559999990555 69: 5555557777777FF5555557990599905555555777757777F55555790555599055 70: 55557775555777FF5555555555599905555555555557777F5555555555559905 71: 555555555555777FF5555555555559905555555555555777FF55555555555579 72: 05555555555555777FF5555555555557905555555555555777FF555555555555 73: 5990555555555555577755555555555555555555555555555555} 74: NumGlyphs = 2 75: end 76: object CancelButton: TBitBtn 1.1.1.2 ! root 77: Left = 105 ! 78: Top = 4 ! 79: Width = 89 ! 80: Height = 26 1.1 root 81: Caption = 'Discard' 82: ModalResult = 2 83: TabOrder = 1 84: Glyph.Data = { 85: 76010000424D7601000000000000760000002800000020000000100000000100 86: 04000000000000010000120B0000120B00001000000000000000000000000000 87: 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 88: FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000 89: 3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070 90: 33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070 91: 33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070 92: 333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070 93: 03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070 94: 33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777 95: 0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033 96: 3333333337FFF7F3333333333000003333333333377777333333} 97: NumGlyphs = 2 98: end 99: end 100: object Memo: TRichEdit 101: Left = 0 1.1.1.2 ! root 102: Top = 33 1.1 root 103: Width = 775 1.1.1.2 ! root 104: Height = 451 1.1 root 105: Align = alClient 106: Font.Charset = DEFAULT_CHARSET 107: Font.Color = clWindowText 1.1.1.2 ! root 108: Font.Height = -15 1.1 root 109: Font.Name = 'Courier' 110: Font.Style = [] 111: HideSelection = False 112: ParentFont = False 113: PlainText = True 114: PopupMenu = PopupMenu 115: ScrollBars = ssBoth 116: TabOrder = 1 117: WantTabs = True 118: WordWrap = False 119: end 120: object FindDialog: TFindDialog 121: Options = [frDown, frHideUpDown] 122: OnFind = FindDialogFind 123: Left = 264 124: Top = 80 125: end 126: object ReplaceDialog: TReplaceDialog 127: OnFind = FindDialogFind 128: OnReplace = ReplaceDialogReplace 129: Left = 264 130: Top = 112 131: end 132: object Menu: TMainMenu 133: Left = 184 134: Top = 80 135: object FileMenuItem: TMenuItem 136: Caption = '&File' 137: object FileSaveMenuItem: TMenuItem 138: Action = Save 139: end 140: object FileExitMenuItem: TMenuItem 141: Caption = 'E&xit' 142: OnClick = FileExitMenuItemClick 143: end 144: end 145: object EditMenuItem: TMenuItem 146: Caption = '&Edit' 147: object EditUndoMenuItem: TMenuItem 148: Action = Undo 149: end 150: object N5: TMenuItem 151: Caption = '-' 152: end 153: object EditCutMenuItem: TMenuItem 154: Action = Cut 155: end 156: object EditCopyMenuItem: TMenuItem 157: Action = Copy 158: end 159: object EditPasteMenuItem: TMenuItem 160: Action = Paste 161: end 162: object EditSelectAllMenuItem: TMenuItem 163: Action = SelectAll 164: end 165: object N4: TMenuItem 166: Caption = '-' 167: end 168: object EditFindMenuItem: TMenuItem 169: Action = Find 170: end 171: object EditReplaceMenuItem: TMenuItem 172: Action = Replace 173: end 174: object N3: TMenuItem 175: Caption = '-' 176: end 177: object EditInsertCtrlA: TMenuItem 178: Action = InsertCtrlA 179: end 180: end 1.1.1.2 ! root 181: object FontMenuItem: TMenuItem ! 182: Action = ChangeFont ! 183: end 1.1 root 184: end 185: object PopupMenu: TPopupMenu 186: Left = 184 187: Top = 112 188: object CutPopupMenuItem: TMenuItem 189: Action = Cut 190: end 191: object CopyPopupMenuItem: TMenuItem 192: Action = Copy 193: end 194: object PastePopupMenuItem: TMenuItem 195: Action = Paste 196: end 197: object SelectAllPopupMenuItem: TMenuItem 198: Action = SelectAll 199: end 200: object N1: TMenuItem 201: Caption = '-' 202: end 203: object FindPopupMenuItem: TMenuItem 204: Action = Find 205: end 206: object ReplacePopupMenuItem: TMenuItem 207: Action = Replace 208: end 209: object N2: TMenuItem 210: Caption = '-' 211: end 212: object CtrlAPopupMenuItem: TMenuItem 213: Action = InsertCtrlA 214: end 215: end 216: object ActionList: TActionList 217: Left = 224 218: Top = 80 219: object InsertCtrlA: TAction 220: Caption = '&Insert Ctrl-A' 221: ShortCut = 16449 222: OnExecute = InsertCtrlAExecute 223: end 224: object Find: TAction 225: Caption = '&Find...' 226: ShortCut = 16454 227: OnExecute = FindExecute 228: end 229: object Replace: TAction 230: Caption = '&Replace...' 231: ShortCut = 16456 232: OnExecute = ReplaceExecute 233: end 234: object SelectAll: TAction 235: Caption = 'Select &All' 236: OnExecute = SelectAllExecute 237: end 238: object Save: TAction 239: Caption = '&Save' 240: ShortCut = 16467 241: OnExecute = SaveExecute 242: end 243: object Cut: TAction 244: Caption = 'Cu&t' 245: ShortCut = 16472 246: OnExecute = CutExecute 247: end 248: object Copy: TAction 249: Caption = '&Copy' 250: ShortCut = 16451 251: OnExecute = CopyExecute 252: end 253: object Paste: TAction 254: Caption = '&Paste' 255: ShortCut = 16470 256: OnExecute = PasteExecute 257: end 258: object Undo: TAction 259: Caption = '&Undo' 260: ShortCut = 16474 261: OnExecute = UndoExecute 262: end 1.1.1.2 ! root 263: object ChangeFont: TAction ! 264: Caption = 'Font' ! 265: OnExecute = ChangeFontExecute ! 266: end ! 267: end ! 268: object FontDialog: TFontDialog ! 269: Font.Charset = DEFAULT_CHARSET ! 270: Font.Color = clWindowText ! 271: Font.Height = -13 ! 272: Font.Name = 'MS Sans Serif' ! 273: Font.Style = [] ! 274: MinFontSize = 0 ! 275: MaxFontSize = 0 ! 276: Options = [fdApplyButton] ! 277: OnApply = FontDialogApply ! 278: Left = 144 ! 279: Top = 80 1.1 root 280: end 281: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.