object Textmemoform: TTextmemoform Left = 200 Top = 137 Width = 748 Height = 264 Caption = 'Notepad' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 177 Width = 740 Height = 41 Align = alBottom TabOrder = 0 object Image3: TImage Left = 576 Top = 3 Width = 118 Height = 34 Cursor = crHandPoint AutoSize = True Picture.Data = {} OnMouseUp = Image3MouseUp end object SpeedButton1: TSpeedButton Left = 704 Top = 8 Width = 25 Height = 25 Hint = 'Background Color' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333333333333333333333333333333339993AAA3CCC 3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC 3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC 3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC 3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC 3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF339993AAA3CCC 3EEE3888388838883FF339993AAA3CCC3EEE3888388838883FF3333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 432 Top = 8 Width = 25 Height = 25 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555555555555555555555555555555555555555 555555555555555555555555555555555555555FFFFFFFFFF555550000000000 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8 B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555 55555575FFF75555555555700007555555555557777555555555555555555555 5555555555555555555555555555555555555555555555555555} NumGlyphs = 2 OnClick = SpeedButton2Click end object SpeedButton3: TSpeedButton Left = 368 Top = 8 Width = 25 Height = 25 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 7700333333337777777733333333008088003333333377F73377333333330088 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} NumGlyphs = 2 OnClick = SpeedButton3Click end object SpeedButton4: TSpeedButton Left = 400 Top = 8 Width = 25 Height = 25 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF7733333333300000033333333337777773333333} NumGlyphs = 2 OnClick = SpeedButton4Click end object BitBtn1: TBitBtn Left = 112 Top = 8 Width = 75 Height = 25 TabOrder = 0 OnClick = BitBtn1Click Kind = bkOK end object BitBtn2: TBitBtn Left = 192 Top = 8 Width = 75 Height = 25 TabOrder = 1 OnClick = BitBtn2Click Kind = bkCancel end object BitBtn3: TBitBtn Left = 0 Top = 8 Width = 105 Height = 25 Hint = 'Width and Height of Window Affect Bitmap Size' Caption = 'Copy as Bitmap' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = BitBtn3Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333FFF33FFFFF33333300033000 00333337773377777333333330333300033333337FF33777F333333330733300 0333333377FFF777F33333333700000073333333777777773333333333033000 3333333337FF777F333333333307300033333333377F777F3333333333703007 33333333377F7773333333333330000333333333337777F33333333333300003 33333333337777F3333333333337007333333333337777333333333333330033 3333333333377333333333333333033333333333333733333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 end object BitBtn4: TBitBtn Left = 464 Top = 8 Width = 105 Height = 25 Caption = 'Copy as Text' TabOrder = 3 OnClick = BitBtn4Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077 007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000 7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039 99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} NumGlyphs = 2 end object BitBtn5: TBitBtn Left = 272 Top = 8 Width = 97 Height = 25 Hint = 'Bitmap Copy May not be exactly the same as shown above' Caption = 'Select Font' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = BitBtn5Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333FF3FFFFFFF3FFFF003000000030 0000773777777737777703330030033300037FFF77F77FFF7773700007330000 003377777733777777F3303003330030003337F77F3377F77733303073333030 033337F77F3337F77F3337007333300003333777733337777333330033333000 33333377F3333777F33333073333330033333377333333773333333333333333 33333333FF333333FF33333973333337933333377FF333377F33333999333399 93333337773333777F333339933333399333333773FF33377F33333939733793 93333337377FF773733333333399993333333333337777333333} NumGlyphs = 2 end end object StatusBar1: TStatusBar Left = 0 Top = 218 Width = 740 Height = 19 Panels = <> SimplePanel = False end object RichEdit1: TRichEdit Left = 0 Top = 0 Width = 740 Height = 177 Align = alClient Lines.Strings = ( '(remove this text)' 'Type your text, then copy and paste it into Paint Book as a Bitm' + 'ap,' ' or into the Editor as Text.') ScrollBars = ssBoth TabOrder = 2 end object FontDialog1: TFontDialog Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 216 Top = 427 end object ColorDialog1: TColorDialog Ctl3D = True Left = 688 Top = 439 end object OpenDialog1: TOpenDialog Filter = 'Text Files (RTF,TXT,DOC)|*.RTF;*.TXT;*.DOC;|All Files (*.*)|*.*' Left = 232 Top = 209 end object SaveDialog1: TSaveDialog Filter = 'Text Files (RTF,TXT,DOC)|*.TXT;*.RTF;*.DOC;|All Files (*.*)' Left = 8 Top = 209 end object PrintDialog1: TPrintDialog Left = 40 Top = 209 end end