|
|
1.1 root 1: object TextFileEditForm: TTextFileEditForm
2: Left = 329
3: Top = 236
4: Width = 783
5: Height = 540
6: Caption = 'TextFileEditForm'
7: Color = clBtnFace
8: Font.Charset = DEFAULT_CHARSET
9: Font.Color = clWindowText
10: Font.Height = -10
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
42: PixelsPerInch = 96
43: TextHeight = 13
44: object Panel: TPanel
45: Left = 0
46: Top = 0
47: Width = 775
48: Height = 27
49: Align = alTop
50: BevelOuter = bvNone
51: TabOrder = 0
52: object OkButton: TBitBtn
53: Left = 8
54: Top = 3
55: Width = 73
56: Height = 21
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
77: Left = 85
78: Top = 3
79: Width = 73
80: Height = 21
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
102: Top = 27
103: Width = 775
104: Height = 467
105: Align = alClient
106: Font.Charset = DEFAULT_CHARSET
107: Font.Color = clWindowText
108: Font.Height = -11
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
181: end
182: object PopupMenu: TPopupMenu
183: Left = 184
184: Top = 112
185: object CutPopupMenuItem: TMenuItem
186: Action = Cut
187: end
188: object CopyPopupMenuItem: TMenuItem
189: Action = Copy
190: end
191: object PastePopupMenuItem: TMenuItem
192: Action = Paste
193: end
194: object SelectAllPopupMenuItem: TMenuItem
195: Action = SelectAll
196: end
197: object N1: TMenuItem
198: Caption = '-'
199: end
200: object FindPopupMenuItem: TMenuItem
201: Action = Find
202: end
203: object ReplacePopupMenuItem: TMenuItem
204: Action = Replace
205: end
206: object N2: TMenuItem
207: Caption = '-'
208: end
209: object CtrlAPopupMenuItem: TMenuItem
210: Action = InsertCtrlA
211: end
212: end
213: object ActionList: TActionList
214: Left = 224
215: Top = 80
216: object InsertCtrlA: TAction
217: Caption = '&Insert Ctrl-A'
218: ShortCut = 16449
219: OnExecute = InsertCtrlAExecute
220: end
221: object Find: TAction
222: Caption = '&Find...'
223: ShortCut = 16454
224: OnExecute = FindExecute
225: end
226: object Replace: TAction
227: Caption = '&Replace...'
228: ShortCut = 16456
229: OnExecute = ReplaceExecute
230: end
231: object SelectAll: TAction
232: Caption = 'Select &All'
233: OnExecute = SelectAllExecute
234: end
235: object Save: TAction
236: Caption = '&Save'
237: ShortCut = 16467
238: OnExecute = SaveExecute
239: end
240: object Cut: TAction
241: Caption = 'Cu&t'
242: ShortCut = 16472
243: OnExecute = CutExecute
244: end
245: object Copy: TAction
246: Caption = '&Copy'
247: ShortCut = 16451
248: OnExecute = CopyExecute
249: end
250: object Paste: TAction
251: Caption = '&Paste'
252: ShortCut = 16470
253: OnExecute = PasteExecute
254: end
255: object Undo: TAction
256: Caption = '&Undo'
257: ShortCut = 16474
258: OnExecute = UndoExecute
259: end
260: end
261: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.