object EditPadForm: TEditPadForm Left = 231 Top = 102 Width = 411 Height = 345 Hint = 'EditPad --- Copyright (C) 1996, by Jan Goyvaerts' Caption = 'EditPad' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu OnActivate = FormActivate OnCloseQuery = FormCloseQuery OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Tabs: TTabControl Left = 0 Top = 32 Width = 399 Height = 244 Align = alClient PopupMenu = PopupMenu TabOrder = 0 TabStop = False OnChange = TabsChange OnChanging = TabsChanging object RichEdit: TRicherEdit Left = 4 Top = 6 Width = 391 Height = 234 Align = alClient Font.Color = clBlack Font.Height = -13 Font.Name = 'Courier' Font.Style = [] HideSelection = False HideScrollBars = False ParentFont = False PlainText = True ScrollBars = ssBoth TabOrder = 0 WantTabs = True OnChange = RichEditChange OnKeyUp = RichEditKeyUp OnSelectionChange = RichEditSelectionChange end end object StatusBar: TStatusBar Left = 0 Top = 276 Width = 399 Height = 19 Panels = < item Alignment = taCenter Text = 'RichEditPos' Width = 64 end item Alignment = taCenter Text = 'Modified' Width = 64 end item Alignment = taCenter Text = 'Insert' Width = 64 end item Text = 'Hints' Width = 64 end> SimplePanel = False end object PanelToolBar: TPanel Left = 0 Top = 0 Width = 399 Height = 32 Hint = '|' Align = alTop ParentShowHint = False ShowHint = True TabOrder = 2 object BtnNew: TSpeedButton Left = 7 Top = 3 Width = 25 Height = 25 Hint = 'New|Start with a fresh text' Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777770777 7777770000007077777707777777070000007707777777777770770000007777 777777777777770000007777000000000077770000007770BFBFBFBFBF077700 00007770FBFBFBFBFB07770000007770BFBFBFBFBF07770000007770FBFBFBFB FB07000000000070BFBFBFBFBF07770000007770FBFBFBFBFB07770000007770 0000BFBFBF07770000007770FBFB000000777700000077770000777777777700 0000777777777777777777000000770777777777777077000000707777777077 777707000000777777777077777777000000} OnClick = ItemNewClick end object BtnOpen: TSpeedButton Left = 64 Top = 3 Width = 25 Height = 25 Hint = 'Open|Open a text' Glyph.Data = { 06010000424D06010000000000007600000028000000110000000C0000000100 0400000000009000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00700000000000 007770000000007B7B7B7B7B7B07700000000F07B7B7B7B7B707700000000B0B 7B7B7B7B7B70700000000FB0B7B7B7B7B7B0700000000BF07B7B7B7B7B7B0000 00000FBF000007B7B7B7000000000BFBFBFBF0000000700000000FBFBFBFBFBF B077700000000BFBFBFBFBFBF077700000000FBFBF0000000777700000007000 00777777777770000000} OnClick = ItemOpenClick end object BtnSave: TSpeedButton Left = 89 Top = 3 Width = 25 Height = 25 Hint = 'Save|Save current text' Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777770008888880000777 777700000000000007777770CC47CC7774CC0777777088087788808807777770 CC47CC7774CC0777777088087788808807777770CC47777774CC077777708808 8888808807777770CC64444446CC0777777088800000088807777770CCCCCCCC CCCC0777777088888888888807777770C6000000006C07777770880000000088 07777770C0FFFFFFFF0C0777777080777777770807777770C0FFFFFFFF0C0777 777080777777770807777770C0FFFFFFFF0C0777777080777777770807777770 C0FFFFFFFF0C077777708077777777080777777000FFFFFFFF00077777700077 7777770007777770C0FFFFFFFF0C077777708077777777080777777000000000 0000077777700000000000000777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777777777777 77777777777777777777} NumGlyphs = 2 OnClick = ItemSaveClick end object BtnFind: TSpeedButton Left = 253 Top = 3 Width = 25 Height = 25 Hint = 'Find|Find a word' Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077777777BFBF BFBFBFBF000077777777FFFFFFFFFFFF000077777777BFBFBFBFBFBF00007777 7777FFFFFFFFFFFF000077777777BFBFBFBFBFBF000077777777FFFFFFFFFFFF 000077777770BFBFBFBFBFBF0000777777010FFFFFFFFFFF00007777770180BF BFBFBFBF000077777701180FFFFFFFFF0000777770811190BFBFBFBF00007777 707719990FFFFFFF00007777077FF999907777770000777077FFFF0007777777 000077077FFF00777777777700007077FFF07777777777770000077FFF097777 77777777000007FFF097777777777777000070FF077777777777777700007700 77777777777777770000} OnClick = ItemFindClick end object BtnReplace: TSpeedButton Left = 278 Top = 3 Width = 25 Height = 25 Hint = 'Replace|Replace a word with another' Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF007777777FFFFF FFFFFFFF00007007007BFB0BFB0000FB00007007007FFF00FF00F00F00007007 007B00000B00F00B00007000007F00000F0000FF00007007007BFB00FB00F00B 00007700077FFF0FFF0000FF00007777770BFBFBFBFBFBFB000077777010FFFF FFFFFFFF0000777770180BFBFBFBFBFB00007777701180FFFFFFFFFF00007777 0811190BFBFBFBFB0000777707719990FFFFFFFF0000777077FF999907777777 000077077FFFF0007777777700007077FFF00777777777770000077FFF077777 77777777000007FFF097777777777777000070FF097777777777777700007700 77777777777777770000} OnClick = ItemReplaceClick end object BtnCut: TSpeedButton Left = 171 Top = 3 Width = 25 Height = 25 Hint = 'Cut|Cut selected text to clipboard' Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777FF77777777FF777777844877777784487777777887F77777788 7F77778477487777847748777778F787F77778778F7777847774777747774877 7778F778F7778F778F77778477747777477748777778F778F7778F7787777778 477487784774877777778FF8F7778FF877777777844448844448777777777888 8FF8888777777777774444444477777777777788888888777777777777746FF6 4777777777777778F7FF8F77777777777770F00F0777777777777778788787F7 77777777770FFFF0F07777777777778777F8787F7777777770FFF00FFF077777 777778777887F787F77777770FFF0770FFF077777777877787787F787F777770 FFF077770FFF077777787778777787F787F7770FFF07777770FFF077778F7787 7777787F78F7770FF0777777770FF077778F787777777787F8F7770F07777777 7770F077778F87777777777878F7770077777777777700777788777777777777 8877777777777777777777777777777777777777777777777777777777777777 77777777777777777777} NumGlyphs = 2 OnClick = ItemCutClick end object BtnCopy: TSpeedButton Left = 196 Top = 3 Width = 25 Height = 25 Hint = 'Copy|Copy selected text to clipboard' Glyph.Data = { 80010000424D8001000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 77777777000077777770000000000777000077777770FFFFFFFF077700007777 7770BFBFBFBF0777000077777770F888888F0777000077777770BFBFBFBF0777 000077000000F888888F07770000770FFFF0BFBFBFBF07770000770FFFF0F888 888F07770000770F7770BFBFBFBF07770000770FFFF0FFFFFF0007770000770F 7770BFBFBF0077770000770FFFF00000000777770000770F777777F077777777 0000770FFFFFFFF0777777770000770FFFFFF000777777770000770FFFFFF007 7777777700007700000000777777777700007777777777777777777700007777 7777777777777777000000000000000000000000000000000000000000000000 00000000} OnClick = ItemCopyClick end object BtnPaste: TSpeedButton Left = 221 Top = 3 Width = 25 Height = 25 Hint = 'Paste|Paste text from clipboard' Glyph.Data = { 80010000424D8001000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 77777777000077777777770000000007000077777777770BFBFBFB0700007700 0000000F88888F070000707F7F7F7F0BFBFBFB07000070F7F7F7F70F77888F07 0000707F7F7F74444BFBFB07000070F7F7F7F7C447888F070000707F7F7F744C 4BFBFB07000070F7F7F7444F4FFF88070000707F7F74440BFBFB8077000070F7 F7444700000007770000707F7F747F7F07777777000070F7F7F7F7F707777777 0000707F7F7F7F7F07777777000070F7444444F70777777700007700ECCCC400 7777777700007777ECCCC47777777777000077777EEEE7777777777700007777 7777777777777777000000000000000000000000000000000000000000000000 00000000} OnClick = ItemPasteClick end object BtnSaveAll: TSpeedButton Left = 114 Top = 3 Width = 25 Height = 25 Hint = 'Save all|Save all modified texts' Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777700088 8888000077777770000000000000777777022472277742207777770880877888 0880777777022472277742207777770880877888088077770002247777774220 7777000880888888088077702202264444446220777088088800000088807770 2202222222222220777088088888888888807000220260000000062070008808 800000000880022022020FFFFFFFF02008808808077777777080022022020FFF FFFFF02008808808077777777080022026020FFFFFFFF0200880880807777777 7080022020020FFFFFFFF02008808008077777777080022020000FFFFFFFF000 08808000077777777000026020020FFFFFFFF020088080080777777770800200 200000000000000008008000000000000000020000FFFFFFFF00077708000077 777777000777020020FFFFFFFF02077708008077777777080777020000000000 0000077708000000000000000777000FFFFFFFF0007777770007777777700077 7777020FFFFFFFF0207777770807777777708077777700000000000000777777 00000000000000777777} NumGlyphs = 2 OnClick = ItemSaveAllClick end object BtnDateTime: TSpeedButton Left = 310 Top = 3 Width = 25 Height = 25 Hint = 'Date/time|Insert the current date and/or time into the text' Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF007777777770FF FFFFFFFF00007777777770FCCFFCFCFC00007777777770FCFCCCFCCC00007777 777770FFFFFFFFFF00007777777770FFFF99999F000077777DDDD0FFFFFF9FFF 0000777DD55550FCFFFF9FFF000077D5555550FFCFFF9FFF00007D55555550FC FFFF9FFF00007D55F55550FFFF9F9FFF0000D5555F5550FFCFF99FFF0000D555 55F550FCCFFF9FFF0000D555555F50FFFFFFFFFF0000D555555F500000000000 0000D555555F555555D7777700007D55555F55555D77777700007D55555F5555 5D777777000077D5555F5555D77777770000777DD55555DD7777777700007777 7DDDDD77777777770000} OnClick = BtnDateTimeClick end object BtnWordWrap: TSpeedButton Left = 342 Top = 3 Width = 25 Height = 25 Hint = 'Word wrap|Lines that are too long automatically break into multi' + 'ple lines' AllowAllUp = True GroupIndex = 1 Caption = 'wrap' Font.Color = clWindowText Font.Height = -9 Font.Name = 'small fonts' Font.Style = [] ParentFont = False OnClick = ItemWordWrapClick end object BtnUndo: TSpeedButton Left = 146 Top = 3 Width = 25 Height = 25 Hint = 'Undo|Undo the last change to the text' Glyph.Data = { 80010000424D8001000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 777777770000777777777777777777770000777777777777777777770000F777 F7777777777777770000F77FFF77F777777777770000FFFFFFFFFF7777777777 0000FFFFFFFF8111777777770000FFFFFFF89DD5177777770000FFFFFFF9D9DD 517777770000FFFFFF7D9F9DD50777770000FF7FFF79DFD9D06077770000F777 F7779DFD024607770000F777777779D0A2246077000077777777770ABA220807 0000777777777770ABA0488000007777777777770A07B4880000777777777777 707FBB480000777777777777770FFBB400007777777777777770FFBB00007777 7777777777770FFB000000000000000000000000000000000000000000000000 00000000} OnClick = ItemUndoClick end object BtnClose: TSpeedButton Left = 32 Top = 3 Width = 25 Height = 25 Hint = 'Close|Close current text' Glyph.Data = { 5A010000424D5A01000000000000760000002800000013000000130000000100 040000000000E400000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7D7777700000777707777D777E777D7000007777007777E77E77E77000007800 0007777E7F7E77700000800000077777EFE77770000000870077DEEFFFFFEED0 0000007707777777EFE77770000000777777777E7F7E777000000077777777E7 7E77E7700000777777777D777E777D7000007000000000777D77777000000FBF BFBFBF077777777000000BFBFBFBFB077777777000000FBFBFBFBF0777777770 00000BFBFBFBFB077777777000000FBFBFBFBF0777777770000000000BFBFB07 7777777000000FBFB0000077777777700000700007777777777777700000} OnClick = ItemCloseClick end end object MainMenu: TMainMenu Left = 28 Top = 56 object MenuFile: TMenuItem Caption = '&File' ShortCut = 0 object ItemNew: TMenuItem Caption = '&New' Hint = 'Start with a fresh text' ShortCut = 16462 OnClick = ItemNewClick end object ItemOpen: TMenuItem Caption = '&Open' Hint = 'Open a text' ShortCut = 16463 OnClick = ItemOpenClick end object ReopenMenu: TMenuItem Caption = '&Reopen' Hint = 'Reopen a previously opened text' ShortCut = 0 end object InsertItem: TMenuItem Caption = '&Insert File...' Hint = 'Insert file into text' ShortCut = 16457 OnClick = ItemInsertClick end object ItemSave: TMenuItem Caption = '&Save' Hint = 'Save current text' ShortCut = 16467 OnClick = ItemSaveClick end object ItemSaveAs: TMenuItem Caption = 'Save &As...' Hint = 'Save current text under another name' ShortCut = 0 OnClick = ItemSaveAsClick end object ItemSaveAll: TMenuItem Caption = 'Sa&ve All' Hint = 'Save all modified texts' ShortCut = 0 OnClick = ItemSaveAllClick end object N11: TMenuItem Caption = '-' ShortCut = 0 end object ItemMail: TMenuItem Caption = '&Mail...' Hint = 'Email the text to someone' ShortCut = 0 OnClick = ItemMailClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object ItemClose: TMenuItem Caption = '&Close' Hint = 'Close current text' ShortCut = 16499 OnClick = ItemCloseClick end object ItemCloseAll: TMenuItem Caption = 'Close All' Hint = 'Close all texts' ShortCut = 0 OnClick = ItemCloseAllClick end object ItemExit: TMenuItem Caption = 'E&xit' Hint = 'Bye!' ShortCut = 0 OnClick = ItemExitClick end end object MenuEdit: TMenuItem Caption = '&Edit' ShortCut = 0 object ItemUndo: TMenuItem Caption = '&Undo' Hint = 'Undo the last change to the text' ShortCut = 16474 OnClick = ItemUndoClick end object N9: TMenuItem Caption = '-' ShortCut = 0 end object ItemCut: TMenuItem Caption = 'Cu&t' Hint = 'Cut selected text to clipboard' ShortCut = 16472 OnClick = ItemCutClick end object ItemCopy: TMenuItem Caption = '&Copy' Hint = 'Copy selected text to clipboard' ShortCut = 16451 OnClick = ItemCopyClick end object ItemPaste: TMenuItem Caption = '&Paste' Hint = 'Paste text from clipboard' ShortCut = 16470 OnClick = ItemPasteClick end object ItemSelectAll: TMenuItem Caption = 'Select &All' Hint = 'Select the whole text' ShortCut = 16449 OnClick = ItemSelectAllClick end object N5: TMenuItem Caption = '-' ShortCut = 0 end object ItemFind: TMenuItem Caption = '&Find...' Hint = 'Find a word' ShortCut = 16454 OnClick = ItemFindClick end object ItemReplace: TMenuItem Caption = '&Replace...' Hint = 'Replace a word with another' ShortCut = 16466 OnClick = ItemReplaceClick end object N8: TMenuItem Caption = '-' ShortCut = 0 end object MenuDateTime: TMenuItem Caption = '&Insert Date and Time' Hint = 'Insert the current date and/or time into the text' ShortCut = 0 object ItemDateTime: TMenuItem Caption = '&Short Date and Time' Hint = 'Insert the current date and time into the text' ShortCut = 116 OnClick = ItemDateTimeClick end object ItemShortDate: TMenuItem Caption = 'Short &Date' ShortCut = 8308 OnClick = ItemShortDateClick end object ItemLongDate: TMenuItem Caption = 'Long D&ate' ShortCut = 24692 OnClick = ItemLongDateClick end object ItemShortTime: TMenuItem Caption = 'Short &Time' ShortCut = 16500 OnClick = ItemShortTimeClick end object ItemLongTime: TMenuItem Caption = 'Long T&ime' ShortCut = 0 OnClick = ItemLongTimeClick end end end object MenuPrint: TMenuItem Caption = '&Print' ShortCut = 0 object ItemPrint: TMenuItem Caption = '&Print' Hint = 'Print current text' ShortCut = 16464 OnClick = ItemPrintClick end object Printselectedtext1: TMenuItem Caption = 'P&rint Selected Text' ShortCut = 0 OnClick = Printselectedtext1Click end object N12: TMenuItem Caption = '-' ShortCut = 0 end object ItemPrintSetup: TMenuItem Caption = 'Printer &Setup...' Hint = 'Select and setup printer' ShortCut = 0 OnClick = ItemPrintSetupClick end object ItemPageSetup: TMenuItem Caption = 'P&age Setup...' Hint = 'Set paper size, orientation and margins' ShortCut = 0 OnClick = ItemPageSetupClick end object ItemPrintFont: TMenuItem Caption = '&Font...' Hint = 'Font that the printer should use' ShortCut = 0 OnClick = ItemPrintFontClick end object ItemHeaders: TMenuItem Caption = '&Headers/Footers...' Hint = 'Specify what to put in the headers and footers on each printed p' + 'age' ShortCut = 0 OnClick = ItemHeadersClick end object MenuLineSpacing: TMenuItem Caption = '&Line Spacing' Hint = 'Set line spacing' ShortCut = 0 Visible = False object ItemLineHalf: TMenuItem Caption = '&Half' GroupIndex = 1 Hint = 'Set line height to the half of regular line height' RadioItem = True ShortCut = 0 OnClick = ItemLineClick end object ItemLineSingle: TMenuItem Caption = '&Single' Checked = True GroupIndex = 1 Hint = 'Regular line height' RadioItem = True ShortCut = 0 OnClick = ItemLineClick end object ItemLineOneAndAHalf: TMenuItem Caption = '&One and a Half' GroupIndex = 1 Hint = 'Skip half a line after each line' RadioItem = True ShortCut = 0 OnClick = ItemLineClick end object ItemLineDouble: TMenuItem Caption = '&Double' GroupIndex = 1 Hint = 'Double line height: print an empty line after each line' RadioItem = True ShortCut = 0 OnClick = ItemLineClick end end end object MenuBlock: TMenuItem Caption = '&Block' ShortCut = 0 object ItemWrite: TMenuItem Caption = '&Write...' Hint = 'Write selected text to a file' ShortCut = 16471 OnClick = ItemWriteClick end object ItemAppend: TMenuItem Caption = '&Append...' Hint = 'Append selected text to a file' ShortCut = 0 OnClick = ItemAppendClick end end object MenuOptions: TMenuItem Caption = '&Options' ShortCut = 0 object ItemFont: TMenuItem Caption = 'Screen &Font...' Hint = 'Pick a font' ShortCut = 0 OnClick = ItemFontClick end object MenuColors: TMenuItem Caption = '&Colors' Hint = 'Change EditPad'#39's colors' ShortCut = 0 object ItemColorBackground: TMenuItem Caption = '&Background' Hint = 'Change the background color of the EditPad window' ShortCut = 0 OnClick = ItemColorClick end object ItemColorText: TMenuItem Caption = '&Text' Hint = 'Color of the screen font' ShortCut = 0 OnClick = ItemColorClick end end object ItemStayOnTop: TMenuItem Caption = 'Stay on &Top' Hint = 'Make the EditPad window stay on top of all other windows' ShortCut = 0 OnClick = ItemStayOnTopClick end object ItemWordWrap: TMenuItem Caption = '&Word Wrap' Checked = True Hint = 'Lines that are too long automatically break into multiple lines' ShortCut = 0 OnClick = ItemWordWrapClick end object N13: TMenuItem Caption = '-' ShortCut = 0 end object MenuCloseUnsaved: TMenuItem Caption = 'Closing &Unsaved Files' Hint = 'Specify what EditPad should do when you close a file that has no' + 't been saved' ShortCut = 0 object ItemUnsavedWarn: TMenuItem Caption = '&Display a Warning' Checked = True GroupIndex = 1 Hint = 'EditPad will display a warning when you close an unsaved file' RadioItem = True ShortCut = 0 OnClick = ItemUnsavedClick end object ItemUnsavedSave: TMenuItem Caption = '&Save the File' GroupIndex = 1 Hint = 'EditPad will automatically save any unsaved file (I advise you t' + 'o activate the Save Backup Files option too)' RadioItem = True ShortCut = 0 OnClick = ItemUnsavedClick end object ItemUnsavedNothing: TMenuItem Caption = 'Do &Nothing' GroupIndex = 1 Hint = 'EditPad will simply close the file without any other action' RadioItem = True ShortCut = 0 OnClick = ItemUnsavedClick end end object ItemSaveBackup: TMenuItem Caption = '&Save Backup Files' Hint = 'When saving a file, store the original file with the .bak extens' + 'ion' ShortCut = 0 OnClick = ItemSaveBackupClick end object N3: TMenuItem Caption = '-' ShortCut = 0 end object ItemConfig: TMenuItem Caption = '&Configure...' Hint = 'Change EditPad registry settings, create shortcuts to EditPad, e' + 'tc.' ShortCut = 0 OnClick = ItemConfigClick end object ItemFilters: TMenuItem Caption = '&Filters...' Hint = 'Edit the filters for the open and save dialog boxes' ShortCut = 0 OnClick = ItemFiltersClick end end object MenuView: TMenuItem Caption = '&View' ShortCut = 0 object ItemNext: TMenuItem Caption = '&Next File' Hint = 'Activate the next file currently open' ShortCut = 117 OnClick = ItemNextClick end object ItemPrev: TMenuItem Caption = '&Previous File' Hint = 'Activate the previous file currently open' ShortCut = 8309 OnClick = ItemPrevClick end object N7: TMenuItem Caption = '-' ShortCut = 0 end object ItemNewInstance: TMenuItem Caption = '&New Editor' Hint = 'Lauch a second copy of EditPad' ShortCut = 0 OnClick = ItemNewInstanceClick end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object ItemReadMe: TMenuItem Caption = '&Read Me' Hint = 'Please read the information presented here before using EditPad' ShortCut = 0 OnClick = ItemReadMeClick end object N2: TMenuItem Caption = '-' ShortCut = 0 end object ItemAbout: TMenuItem Caption = '&About...' Hint = 'About EditPad' ShortCut = 0 OnClick = ItemAboutClick end end end object OpenDialog: TOpenDialog DefaultExt = 'txt' FileEditStyle = fsComboBox Filter = 'Text files (*.txt)|*.txt|HTML files (*.htm, *.html)|*.htm*|INI f' + 'iles (*.ini)|*.ini|Batch files (*.bat)|*.bat|Delphi source (*.pa' + 's, *.dpr)|*.pas;*.dpr|All files|*.*' Options = [ofHideReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist] Title = 'Open a text file' Left = 63 Top = 56 end object SaveDialog: TSaveDialog FileEditStyle = fsEdit Filter = 'Text files (*.txt)|*.txt|HTML files (*.htm, *.html)|*.htm*|INI f' + 'iles (*.ini)|*.ini|Batch files (*.bat)|*.bat|Delphi source (*.pa' + 's, *.dpr)|*.pas;*.dpr|All files|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist] Title = 'Save text to a file' Left = 63 Top = 84 end object PrinterSetupDialog: TPrinterSetupDialog Left = 133 Top = 56 end object FindDialog: TFindDialog Options = [frDown, frHideUpDown] OnFind = FindDialogFind Left = 98 Top = 56 end object ReplaceDialog: TReplaceDialog Options = [frDown, frHideUpDown] OnFind = ReplaceDialogFind OnReplace = ReplaceDialogReplace Left = 98 Top = 84 end object OpenBlockDialog: TOpenDialog DefaultExt = 'txt' FileEditStyle = fsComboBox Filter = 'Text files (*.txt)|*.txt|HTML files (*.htm, *.html)|*.htm*|INI f' + 'iles (*.ini)|*.ini|Batch files (*.bat)|*.bat|Delphi source (*.pa' + 's, *.dpr)|*.pas;*.dpr|All files|*.*' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Insert file into text' Left = 168 Top = 56 end object SaveBlockDialog: TSaveDialog FileEditStyle = fsComboBox Filter = 'Text files (*.txt)|*.txt|HTML files (*.htm, *.html)|*.htm*|INI f' + 'iles (*.ini)|*.ini|Batch files (*.bat)|*.bat|Delphi source (*.pa' + 's, *.dpr)|*.pas;*.dpr|All files|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist] Title = 'Save selected text' Left = 168 Top = 84 end object FontDialog: TFontDialog Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Options = [fdAnsiOnly, fdForceFontExist, fdApplyButton] OnApply = FontDialogApply Left = 203 Top = 56 end object PopupMenu: TPopupMenu Left = 28 Top = 84 object Undo1: TMenuItem Caption = '&Undo' Hint = 'Undo the last change to the text' ShortCut = 16474 OnClick = ItemUndoClick end object N10: TMenuItem Caption = '-' ShortCut = 0 end object Cut1: TMenuItem Caption = 'Cu&t' Hint = 'Cut selected text to clipboard' ShortCut = 16472 OnClick = ItemCutClick end object Copy1: TMenuItem Caption = '&Copy' Hint = 'Copy selected text to clipboard' ShortCut = 16451 OnClick = ItemCopyClick end object Paste1: TMenuItem Caption = '&Paste' Hint = 'Paste text from clipboard' ShortCut = 16470 OnClick = ItemPasteClick end object Selectall1: TMenuItem Caption = 'Select &all' Hint = 'Select the whole text' ShortCut = 16449 OnClick = ItemSelectAllClick end object N6: TMenuItem Caption = '-' ShortCut = 0 end object Read1: TMenuItem Caption = '&Insert file...' Hint = 'Insert file into text' ShortCut = 16457 OnClick = ItemInsertClick end object Write1: TMenuItem Caption = '&Write block...' Hint = 'Write selected text to a file' ShortCut = 16471 OnClick = ItemWriteClick end object Append1: TMenuItem Caption = '&Append block...' Hint = 'Append selected text to a file' ShortCut = 0 OnClick = ItemAppendClick end object N4: TMenuItem Caption = '-' ShortCut = 0 end object Save1: TMenuItem Caption = '&Save' Hint = 'Save current text' ShortCut = 16467 OnClick = ItemSaveClick end object Close1: TMenuItem Caption = '&Close' Hint = 'Close current text' ShortCut = 16499 OnClick = ItemCloseClick end end object AppendBlockDialog: TSaveDialog FileEditStyle = fsComboBox Filter = 'Text files (*.txt)|*.txt|HTML files (*.htm, *.html)|*.htm*|INI f' + 'iles (*.ini)|*.ini|Batch files (*.bat)|*.bat|Delphi source (*.pa' + 's, *.dpr)|*.pas;*.dpr|All files|*.*' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Append selected text to a file' Left = 168 Top = 112 end object PageSetupDialog: TPageSetupDialog Options = [] Left = 133 Top = 84 end object LinePrinter: TLinePrinter MarginTop = 1.000000000000000000 MarginBottom = 1.000000000000000000 MarginLeft = 1.000000000000000000 MarginRight = 1.000000000000000000 HeaderFormat = '^' Footer = 'Page {$PAGE}' FooterFormat = '^' ShowProgress = True Font.Color = clWindowText Font.Height = -25 Font.Name = 'Courier New' Font.Style = [] Left = 133 Top = 112 end object MsgError: TMessenger Alignment = taCenter BitmapType = btCustom Bitmap.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777771177777777777777777777777777117711777711777 7777777777777777711777117711111777111777777111777117771111177117 7111111777111111117777711177711111177111111777111777777777777711 1177771111777777777777777777777777777777777777777777777777777777 7771111777777777777777777777777771111111117777777777777777777777 1119999111177777777777777777777111999999911177777777777777777771 1999999999117777777777777777771199999999991177777777777777777711 9999999991117777777777777777771199999999911777777777777777777711 9999999911177777777777777777777119999999117777777777777777777771 1999999117777777777777777777777711999911177777777777777777777777 1199991177777777777777774444444771199117744444777777777444444444 7119911744444444777777444FFCCC444777777444CCC44447777744FFFCCCC4 477777744CCCCFFF44777744FFFCCCC4477777744CCCCFFF44777744FFFFCCC4 477777744CCCFFFF447777444FFFF444777777744FFFFFF44777777444444447 7777777744444444777777774444477777777777744444477777777777777777 7777777777777777777777777777777777777777777777777777} BitmapTransparent = True Button1.Kind = bkCancel Button1.Cancel = True Button1.Caption = 'Bummer' Button1.Glyph.Data = { BE060000424DBE06000000000000360400002800000024000000120000000100 0800000000008802000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C0007F7F7F00F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000E0E0E000A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 0303030303030303030303030303030303030303030303030303030303030303 0303F8F80303030303030303030303030303030303FF03030303030303030303 0303030303F90101F80303030303F9F80303030303030303F8F8FF0303030303 03FF03030303030303F9010101F8030303F90101F8030303030303F8FF03F8FF 030303FFF8F8FF030303030303F901010101F803F901010101F80303030303F8 FF0303F8FF03FFF80303F8FF030303030303F901010101F80101010101F80303 030303F8FF030303F8FFF803030303F8FF030303030303F90101010101010101 F803030303030303F8FF030303F803030303FFF80303030303030303F9010101 010101F8030303030303030303F8FF030303030303FFF8030303030303030303 030101010101F80303030303030303030303F8FF0303030303F8030303030303 0303030303F901010101F8030303030303030303030303F8FF030303F8030303 0303030303030303F90101010101F8030303030303030303030303F803030303 F8FF030303030303030303F9010101F8010101F803030303030303030303F803 03030303F8FF0303030303030303F9010101F803F9010101F803030303030303 03F8030303F8FF0303F8FF03030303030303F90101F8030303F9010101F80303 03030303F8FF0303F803F8FF0303F8FF03030303030303F9010303030303F901 0101030303030303F8FFFFF8030303F8FF0303F8FF0303030303030303030303 030303F901F903030303030303F8F80303030303F8FFFFFFF803030303030303 03030303030303030303030303030303030303030303030303F8F8F803030303 0303030303030303030303030303030303030303030303030303030303030303 0303} Button1.ModalResult = 2 Button1.NumGlyphs = 2 Button1.Visible = True Button2.Visible = False Button3.Visible = False Button4.Visible = False Button5.Visible = False ButtonLayout.Height = 28 ButtonLayout.Width = 98 Caption = 'EditPad thinks something is wrong...' DialogStyle = bsAutoDetect Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Gauge.Visible = False HelpContext = 0 Spacing = 16 Left = 238 Top = 56 end object MsgSave: TMessenger BitmapType = btCustom Bitmap.Data = { F6020000424DF602000000000000760000002800000028000000200000000100 0400000000008002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777999999999 7777777777777777777777779999999999999999999997777777777777777777 9999999777777777999997777777777777777777777777777777777777777777 7777777777777777777777777222277777777777777777777777777777777722 22222222777777777773337777777777777772222AAAA2222777777777BBB377 777777777777722AAAAAAAA22777777777BBB37777777777777722AAAAAAAAAA 2277777777BBB77777777777777722AAAAAAAAAA227777777777737777777777 777722AAAAAAAAA2277777777777B37777777777777722AAAAAAAAA227777777 7777B737777777777777722AAAAAAA227777777777777B33377777777777722A AAAAAA277777777777777BBB3377777777777722AAAAA22777777777777777BB B337777777777722AAAA2277777777777777777BBB337744444447722AA22774 444477777777333BBBB37444444444722AA2274444444477777BBB37BBB3444F FFFF444777777444FFFF4447777BBB37BBB344FFCCCFF4477777744FFCCFFF44 777BBB77BBB744FCCCCFF4477777744FCCCCFF44777BB733BB7744FFCCFFF447 7777744FFCCCFF4477777BBBB777444FFFF444777777744FFFFFF44777777777 7777744444444777777777444444447777777777777777444447777777777774 4444477777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777} BitmapTransparent = True Button1.Kind = bkYes Button1.Caption = '&Yes! Save it!' Button1.Default = True Button1.Glyph.Data = { BE060000424DBE06000000000000360400002800000024000000120000000100 0800000000008802000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C0007F7F7F00F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000E0E0E000A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 0303030303030303030303030303030303030303030303030303030303030303 03030303030303030303030303030303030303030303FF030303030303030303 03030303030303040403030303030303030303030303030303F8F8FF03030303 03030303030303030303040202040303030303030303030303030303F80303F8 FF030303030303030303030303040202020204030303030303030303030303F8 03030303F8FF0303030303030303030304020202020202040303030303030303 0303F8030303030303F8FF030303030303030304020202FA0202020204030303 0303030303F8FF0303F8FF030303F8FF03030303030303020202FA03FA020202 040303030303030303F8FF03F803F8FF0303F8FF03030303030303FA02FA0303 03FA0202020403030303030303F8FFF8030303F8FF0303F8FF03030303030303 FA0303030303FA0202020403030303030303F80303030303F8FF0303F8FF0303 0303030303030303030303FA0202020403030303030303030303030303F8FF03 03F8FF03030303030303030303030303FA020202040303030303030303030303 0303F8FF0303F8FF03030303030303030303030303FA02020204030303030303 03030303030303F8FF0303F8FF03030303030303030303030303FA0202020403 030303030303030303030303F8FF0303F8FF03030303030303030303030303FA 0202040303030303030303030303030303F8FF03F8FF03030303030303030303 03030303FA0202030303030303030303030303030303F8FFF803030303030303 030303030303030303FA0303030303030303030303030303030303F803030303 0303030303030303030303030303030303030303030303030303030303030303 0303} Button1.ModalResult = 6 Button1.NumGlyphs = 2 Button1.Visible = True Button2.Kind = bkNo Button2.Cancel = True Button2.Caption = '&No! Don'#39't save' Button2.Glyph.Data = { BE060000424DBE06000000000000360400002800000024000000120000000100 0800000000008802000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C0007F7F7F00F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000E0E0E000A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 03030303030303030303030303030303030303FFFFFFFFFF0303030303030303 03030303F8F8F8F8F8F80303030303030303030303FFF8F8F8F8F8F8FFFFFF03 030303030303F8F8010101010101F8F80303030303030303F8F80303FFFFFF03 F8F8FFFF0303030303F8010101F9F9F9F9010101F8030303030303F8FF0303F8 F8F8F8FF0303F8FFFF030303F90101F9F90303030301010101F803030303F8FF 03F8F803030303F8030303F8FF030303F901010303030303F801010101F80303 0303F8FFF8FF03030303F80303FF03F8FF0303F90101F803030303F8010101F9 0101F80303F8FF03F8FF030303F80303FFF8FF03F8FF03F901F803030303F801 0101F903F901F80303F8FFF8FF030303F80303FFF803F8FFF8FF03F901F80303 03F8010101F90303F901F80303F8FFF8FF0303F80303FFF80303F8FFF8FF03F9 01F80303F8010101F9030303F901F80303F8FFF8FF03F80303FFF8030303F8FF F8FF03F901F803F8010101F903030303F901F80303F8FFF8FFF80303FFF80303 0303F803F8FF03F90101F8010101F903030303F90101F80303F8FF03F80303FF F803030303F80303F8030303F901010101F90303030303F901F803030303F8FF 0303FFF8030303FFFFF803F8FF030303F9010101F803030303F8010101F80303 0303F8FF0303F8FFFFFFFFF8F803FFF80303030303F9010101F8F8F8F8010101 F8030303030303F8FFFF03F8F8F8F803FFFFF803030303030303F9F901010101 0101F9F90303030303030303F8F8FFFFFFFFFFFFF8F803030303030303030303 F9F9F9F9F9F9030303030303030303030303F8F8F8F8F8F80303030303030303 0303030303030303030303030303030303030303030303030303030303030303 0303} Button2.ModalResult = 7 Button2.NumGlyphs = 2 Button2.Visible = True Button3.Kind = bkCancel Button3.Cancel = True Button3.Caption = '&Don'#39't close' Button3.Glyph.Data = { BE060000424DBE06000000000000360400002800000024000000120000000100 0800000000008802000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C0007F7F7F00F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000E0E0E000A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 0303030303030303030303030303030303030303030303030303030303030303 0303F8F80303030303030303030303030303030303FF03030303030303030303 0303030303F90101F80303030303F9F80303030303030303F8F8FF0303030303 03FF03030303030303F9010101F8030303F90101F8030303030303F8FF03F8FF 030303FFF8F8FF030303030303F901010101F803F901010101F80303030303F8 FF0303F8FF03FFF80303F8FF030303030303F901010101F80101010101F80303 030303F8FF030303F8FFF803030303F8FF030303030303F90101010101010101 F803030303030303F8FF030303F803030303FFF80303030303030303F9010101 010101F8030303030303030303F8FF030303030303FFF8030303030303030303 030101010101F80303030303030303030303F8FF0303030303F8030303030303 0303030303F901010101F8030303030303030303030303F8FF030303F8030303 0303030303030303F90101010101F8030303030303030303030303F803030303 F8FF030303030303030303F9010101F8010101F803030303030303030303F803 03030303F8FF0303030303030303F9010101F803F9010101F803030303030303 03F8030303F8FF0303F8FF03030303030303F90101F8030303F9010101F80303 03030303F8FF0303F803F8FF0303F8FF03030303030303F9010303030303F901 0101030303030303F8FFFFF8030303F8FF0303F8FF0303030303030303030303 030303F901F903030303030303F8F80303030303F8FFFFFFF803030303030303 03030303030303030303030303030303030303030303030303F8F8F803030303 0303030303030303030303030303030303030303030303030303030303030303 0303} Button3.ModalResult = 2 Button3.NumGlyphs = 2 Button3.Visible = True Button4.Visible = False Button5.Visible = False ButtonLayout.Height = 28 ButtonLayout.Width = 140 Caption = 'If you don'#39't save your texts, your changes will be gone forever!' DialogStyle = bsAutoDetect Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Gauge.Visible = False HelpContext = 0 Spacing = 16 Left = 238 Top = 84 end object PrintFontDialog: TFontDialog Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Device = fdBoth MinFontSize = 0 MaxFontSize = 0 Options = [fdAnsiOnly, fdForceFontExist] Left = 133 Top = 140 end object PopupDate: TPopupMenu Left = 28 Top = 119 object Shortdateandtime1: TMenuItem Caption = '&Short date and time' Hint = 'Insert the current date and time into the text' ShortCut = 116 OnClick = ItemDateTimeClick end object Shortdate1: TMenuItem Caption = 'Short &date' ShortCut = 8308 OnClick = ItemShortDateClick end object Longdate1: TMenuItem Caption = 'Long d&ate' ShortCut = 24692 OnClick = ItemLongDateClick end object Shorttime1: TMenuItem Caption = 'Short &time' ShortCut = 16500 OnClick = ItemShortTimeClick end object Longtime1: TMenuItem Caption = 'Long t&ime' ShortCut = 0 OnClick = ItemLongTimeClick end end object ColorDialog: TColorDialog Ctl3D = True Left = 203 Top = 84 end end