object fWisdomQuotes: TfWisdomQuotes Left = 192 Top = 110 HelpContext = 10 BorderIcons = [biMinimize, biMaximize] AutoScroll = False ClientHeight = 392 ClientWidth = 525 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} KeyPreview = True PopupMenu = PopupMenu1 Position = poScreenCenter ShowHint = True OnCreate = FormCreate OnKeyDown = FormKeyDown OnKeyUp = FormKeyUp OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 2 Top = 0 Width = 468 Height = 369 Style = bsRaised end object BackDropImage: TImage Left = 2 Top = 2 Width = 468 Height = 359 Stretch = True end object lTip: TLabel Left = 6 Top = 70 Width = 458 Height = 285 Cursor = 14000 Hint = 'Double click to goto setup or'#13#10'Right click for a menu' AutoSize = False Caption = 'Quotes are not available till you add in. Press Ctrl+E to edit t' + 'he current quotes file.' Color = 8454143 Font.Color = clBlack Font.Height = -16 Font.Name = 'Comic Sans MS' Font.Style = [fsItalic] ParentColor = False ParentFont = False ShowAccelChar = False Transparent = True WordWrap = True OnDblClick = Setup1Click OnMouseMove = lTipMouseMove end object ImgBulb: TImage Left = 4 Top = 8 Width = 53 Height = 49 Hint = 'Toggle Quote color (white/black)'#13#10'Press Ctrl+1/2/3/4/5/6 for'#13#10'ot' + 'her colors'#13#10'Press Ctrl+0 to restore color' Picture.Data = {} Stretch = True OnClick = ImgBulbClick end object lTitle: TLabelEffect Left = 56 Top = 4 Width = 408 Height = 57 GraduateFrom = clWindowText Caption = 'Quotes file is empty!' Font.Color = clRed Font.Height = -37 Font.Name = 'Impact' Font.Style = [fsBold] ParentFont = False end object bPanel: TPanel Left = 470 Top = 0 Width = 55 Height = 366 Align = alRight BevelInner = bvLowered TabOrder = 2 object lblVolume: TLabel Left = 9 Top = 176 Width = 35 Height = 13 Caption = '&Volume' FocusControl = TrackBar1 end object bClose: TOfficeButton Left = 11 Top = 4 Width = 30 Height = 30 Hint = 'Shut it' NoFocusBitmap.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333C0C33333333333CC0F0C333333333C30F0F0C3333333C00FFF0F0 C3333CC0FFFFFF0F0C33C30F0FFFFFF0F0C300FFF0FFFFFF0F0C0FFFFF0FFFFF F0F030FFFFF0FFFFFF03330FFFFF0FFF00333330FFFFF000333333330FFF0333 3333333330003333333333333333333333333333333333333333} Bitmap.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333C33333333333333C0C333333333333C0F0C3333333333C0FFF0C33 333333CCC0FFF0C333333CCCCC0FFF0C33334CCCCCC0FFF0C333C4CCCCCC0FFF 0C333C4CC0CCC0FFF0C333C4CCC0CC0F0C33333C4C00CCC033333333C4CCCCCC 333333333C4CCCC33333333333C4C33333333333333333333333} Caption = '&Shut it' Layout = blBitmapBottom Options = [boMonoDisplay, boIconOnly, boShowBevel] UnselectedFontColor = clWhite Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] OnClick = bCloseClick ParentFont = False IBitmap = { 424D360300000000000036000000280000001000000010000000010018000000 00000003000000000000000000000000000000000000007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FEFD0D0007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7FEFD0D0000000EFD0D0007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7FEFD0D0000000FFFFFF000000EFD0 D0007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FEF D0D0000000FFFFFFFFFFFFFFFFFF000000EFD0D0007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7FEFD0D0EFD0D0EFD0D0000000FFFFFFFFFFFFFFFF FF000000EFD0D0007F7F007F7F007F7F007F7F007F7F007F7FEFD0D0EFD0D0EF D0D0EFD0D0EFD0D0000000FFFFFFFFFFFFFFFFFF000000EFD0D0007F7F007F7F 007F7F007F7FAF4F50EFD0D0EFD0D0EFD0D0EFD0D0EFD0D0EFD0D0000000FFFF FFFFFFFFFFFFFF000000EFD0D0007F7F007F7F007F7FEFD0D0AF4F50EFD0D0EF D0D0EFD0D0EFD0D0EFD0D0EFD0D0000000FFFFFFFFFFFFFFFFFF000000EFD0D0 007F7F007F7F007F7FEFD0D0AF4F50EFD0D0EFD0D0000000EFD0D0EFD0D0EFD0 D0000000FFFFFFFFFFFFFFFFFF000000EFD0D0007F7F007F7F007F7FEFD0D0AF 4F50EFD0D0EFD0D0EFD0D0000000EFD0D0EFD0D0000000FFFFFF000000EFD0D0 007F7F007F7F007F7F007F7F007F7FEFD0D0AF4F50EFD0D0000000000000EFD0 D0EFD0D0EFD0D0000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7FEFD0D0AF4F50EFD0D0EFD0D0EFD0D0EFD0D0EFD0D0EFD0D0007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7FEFD0D0AF4F50EFD0D0EFD0 D0EFD0D0EFD0D0007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7FEFD0D0AF4F50EFD0D0007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F} end object bOptions: TOfficeButton Left = 11 Top = 46 Width = 30 Height = 30 Hint = 'Click me or Press O'#13#10'to Customize Settings' Bitmap.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555550FF0559 195058000FF05559190380FFFF05555919330F00FF055559193300550F055559 193508550F05559999955580F085501111155500085503330555555555503335 0555550055033355055550505033355505550500033355550555000000355558 0855550000055558085555300008555808555533500000555555} Caption = '&Options' DropDownMenu = PopupMenu1 Layout = blBitmapBottom Options = [boIconOnly, boShowBevel] UnselectedFontColor = clWhite Font.Color = clLime Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False IBitmap = { 424D360300000000000036000000280000001000000010000000010018000000 000000030000000000000000000000000000000000007F007F7F007F7F007F7F 007F7F007F000000FFFFFFFFFFFF0000007F007F7F007FEFD0D0AF4F50EFD0D0 7F007F0000007F007FEFD0D0000000000000000000FFFFFFFFFFFF0000007F00 7F7F007F7F007FEFD0D0AF4F50EFD0D0000000EFD0D0EFD0D0000000FFFFFFFF FFFFFFFFFFFFFFFF0000007F007F7F007F7F007F7F007FEFD0D0AF4F50EFD0D0 EFD0D0EFD0D0000000FFFFFF000000000000FFFFFFFFFFFF0000007F007F7F00 7F7F007F7F007FEFD0D0AF4F50EFD0D0EFD0D0EFD0D00000000000007F007F7F 007F000000FFFFFF0000007F007F7F007F7F007F7F007FEFD0D0AF4F50EFD0D0 EFD0D07F007F000000EFD0D07F007F7F007F000000FFFFFF0000007F007F7F00 7F7F007FEFD0D0EFD0D0EFD0D0EFD0D0EFD0D07F007F7F007F7F007FEFD0D000 0000FFFFFF000000EFD0D07F007F7F007F000000AF4F50AF4F50AF4F50AF4F50 AF4F507F007F7F007F7F007F000000000000000000EFD0D07F007F7F007F0000 00EFD0D0EFD0D0EFD0D00000007F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F000000EFD0D0EFD0D0EFD0D07F007F0000007F007F 7F007F7F007F7F007F7F007F0000000000007F007F7F007F000000EFD0D0EFD0 D0EFD0D07F007F7F007F0000007F007F7F007F7F007F7F007F0000007F007F00 00007F007F000000EFD0D0EFD0D0EFD0D07F007F7F007F7F007F0000007F007F 7F007F7F007F0000007F007F000000000000000000EFD0D0EFD0D0EFD0D07F00 7F7F007F7F007F7F007F0000007F007F7F007F7F007F00000000000000000000 0000000000000000EFD0D07F007F7F007F7F007F7F007FEFD0D0000000EFD0D0 7F007F7F007F7F007F7F007F0000000000000000000000000000007F007F7F00 7F7F007F7F007FEFD0D0000000EFD0D07F007F7F007F7F007F7F007FEFD0D000 0000000000000000000000EFD0D07F007F7F007F7F007FEFD0D0000000EFD0D0 7F007F7F007F7F007F7F007FEFD0D0EFD0D07F007F0000000000000000000000 000000007F007F7F007F7F007F7F007F7F007F7F007F} end object bFind: TOfficeButton Left = 11 Top = 76 Width = 30 Height = 30 Hint = 'Click or Press F'#13#10'to Search Quotes' Bitmap.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333BFBF BFBFBFBF000033333333FFFFFFFFFFFF000033333333BFBFBFBFBFBF00003333 3333FFFFFFFFFFFF000033333333BFBFBFBFBFBF000033333333FFFFFFFFFFFF 000033333330BFBFBFBFBFBF0000333333010FFFFFFFFFFF00003333330180BF BFBFBFBF000033333301180FFFFFFFFF0000333330811190BFBFBFBF00003333 307719990FFFFFFF00003333077FF999903333330000333077FFFF0003333333 000033077FFF00333333333300003077FFF03333333333330000077FFF093333 33333333000007FFF093333333333333000030FF033333333333333300003300 33333333333333330000} Caption = '&Find' Layout = blBitmapBottom Options = [boIconOnly, boShowBevel] UnselectedFontColor = clWhite Font.Color = clLime Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] OnClick = bFindClick ParentFont = False IBitmap = { 424DE60400000000000036000000280000001400000014000000010018000000 0000B004000000000000000000000000000000000000007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7FEFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFF EFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFF007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7FEFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFFEFD0 D0FFFFFFEFD0D0FFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FEFD0 D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FF FFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F 7F007F7F007F7F007F7F007F7F007F7F007F7F000000EFD0D0FFFFFFEFD0D0FF FFFFEFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFF007F7F007F7F 007F7F007F7F007F7F007F7F000000AF4F50000000FFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F00 7F7F007F7F007F7F000000AF4F50EFD0D0000000EFD0D0FFFFFFEFD0D0FFFFFF EFD0D0FFFFFFEFD0D0FFFFFFEFD0D0FFFFFF007F7F007F7F007F7F007F7F007F 7F007F7F000000AF4F50AF4F50EFD0D0000000FFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F000000 EFD0D0AF4F50AF4F50AF4F50EFD0D0000000EFD0D0FFFFFFEFD0D0FFFFFFEFD0 D0FFFFFFEFD0D0FFFFFF007F7F007F7F007F7F007F7F007F7F000000FFFFFFFF FFFFAF4F50EFD0D0EFD0D0EFD0D0000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FFFFFFFFFFFFFFFFFFFFFF FFEFD0D0EFD0D0EFD0D0EFD0D0000000007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 000000000000000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F000000 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F000000FFFFFFFFFFFFFF FFFFFFFFFFFFFFFF000000EFD0D0007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F000000FFFFFFFFFFFFFFFFFFFFFF FF000000EFD0D0007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F000000FFFFFFFFFFFF000000007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F000000000000007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F} end object bCapture: TOfficeButton Left = 11 Top = 106 Width = 30 Height = 30 Hint = 'Click or Press C to'#13#10'Capture Quote to'#13#10'Clipboard' Bitmap.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777780087777777800000000000087708800888800 880770880888888088077088087888808807708808E78880880770FF00888800 FF0770FFF000000FFF0770000000000000077700780FF0870077777777800877 7777777777777777777777777777777777777777777777777777} Caption = '&Capture' Layout = blBitmapBottom Options = [boIconOnly, boShowBevel] UnselectedFontColor = clWhite Font.Color = clLime Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] OnClick = bCaptureClick ParentFont = False IBitmap = { 424D360300000000000036000000280000001000000010000000010018000000 00000003000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFEFD0D0000000000000EFD0D0BFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFEFD0D00000000000000000000000000000000000000000 00000000000000000000000000000000EFD0D0BFBFBFBFBFBF000000EFD0D0EF D0D0000000000000EFD0D0EFD0D0EFD0D0EFD0D0000000000000EFD0D0EFD0D0 000000BFBFBFBFBFBF000000EFD0D0EFD0D0000000EFD0D0EFD0D0EFD0D0EFD0 D0EFD0D0EFD0D0000000EFD0D0EFD0D0000000BFBFBFBFBFBF000000EFD0D0EF D0D0000000EFD0D0BFBFBFEFD0D0EFD0D0EFD0D0EFD0D0000000EFD0D0EFD0D0 000000BFBFBFBFBFBF000000EFD0D0EFD0D0000000EFD0D0EFD0D0BFBFBFEFD0 D0EFD0D0EFD0D0000000EFD0D0EFD0D0000000BFBFBFBFBFBF000000FFFFFFFF FFFF000000000000EFD0D0EFD0D0EFD0D0EFD0D0000000000000FFFFFFFFFFFF 000000BFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFF0000000000000000000000 00000000000000FFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBF00000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000BFBFBFBFBFBFBFBFBF000000000000BFBFBFEFD0D0000000FFFFFFFFFF FF000000EFD0D0BFBFBF000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFEFD0D0000000000000EFD0D0BFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF} end object bPrevious: TOfficeButton Left = 11 Top = 300 Width = 30 Height = 30 Hint = 'Previous Quote (PgUp)' Bitmap.Data = { D6000000424DD60000000000000076000000280000000C0000000C0000000100 0400000000006000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 0000777700000777000077770666077700007777066607770000777706660777 0000700006660000000077066666660700007770666660770000777706660777 0000777770607777000077777707777700007777777777770000} Caption = '&Previous' Layout = blBitmapBottom Options = [boIconOnly, boShowBevel] UnselectedFontColor = clWhite Font.Color = clLime Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] OnClick = bClick ParentFont = False IBitmap = { 424DE60100000000000036000000280000000C0000000C000000010018000000 0000B001000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBF000000000000000000000000000000BFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBF000000EFD0D0EFD0D0EFD0D0000000BFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBF000000EFD0D0EFD0D0EFD0D0000000BFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000EFD0D0EFD0D0EFD0D00000 00BFBFBFBFBFBFBFBFBFBFBFBF000000000000000000000000EFD0D0EFD0D0EF D0D0000000000000000000000000BFBFBFBFBFBF000000EFD0D0EFD0D0EFD0D0 EFD0D0EFD0D0EFD0D0EFD0D0000000BFBFBFBFBFBFBFBFBFBFBFBF000000EFD0 D0EFD0D0EFD0D0EFD0D0EFD0D0000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBF000000EFD0D0EFD0D0EFD0D0000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBF000000EFD0D0000000BFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBF} end object bNext: TOfficeButton Left = 11 Top = 330 Width = 30 Height = 30 Hint = 'Next Quote (PgDn)' Caption = '&Next' Layout = blBitmapBottom Options = [boIconOnly, boShowBevel] UnselectedFontColor = clWhite Font.Color = clLime Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] OnClick = bClick ParentFont = False IBitmap = { 424DE60100000000000036000000280000000C0000000C000000010018000000 0000B001000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBF000000EFD0D0000000BFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBF000000EFD0D0EFD0D0EFD0D0000000BFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000EFD0D0EFD0D0EFD0D0EFD0D0EFD0 D0000000BFBFBFBFBFBFBFBFBFBFBFBF000000EFD0D0EFD0D0EFD0D0EFD0D0EF D0D0EFD0D0EFD0D0000000BFBFBFBFBFBF000000000000000000000000EFD0D0 EFD0D0EFD0D0000000000000000000000000BFBFBFBFBFBFBFBFBFBFBFBF0000 00EFD0D0EFD0D0EFD0D0000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBF000000EFD0D0EFD0D0EFD0D0000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBF000000EFD0D0EFD0D0EFD0D0000000BFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBF000000000000000000000000000000BFBFBFBFBFBFBF BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF BFBFBFBFBFBF} end object bZoom: TOfficeButton Left = 11 Top = 136 Width = 30 Height = 30 Hint = 'Click me or '#13#10'Press Z to Zoom In, '#13#10'Shift+Click or Press Shift+Z' + #13#10' to Zoom Out'#13#10'Press Backspace to restore font size' Bitmap.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3303333333333333300033333333333300033333333333300033333333333300 0333333800083B8033333308888800B33333308F7F7F8033333388F7F9F7F883 3333087F797F7803333308F99999F8033333087F797F7803333388F7F9F7F883 3333308F7F7F8033333333088888033333333338000833333333} Caption = '&Zoom' Layout = blBitmapBottom Options = [boIconOnly, boShowBevel] UnselectedFontColor = clWhite Font.Color = clLime Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] OnClick = bZoomClick ParentFont = False IBitmap = { 424D360300000000000036000000280000001000000010000000010018000000 00000003000000000000000000000000000000000000007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F000000000000000000007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F000000000000 000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F000000000000000000007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F000000000000000000007F7F 007F7F007F7F007F7F007F7F007F7FEFD0D0000000000000000000EFD0D0007F 7FEFD0D0EFD0D0000000007F7F007F7F007F7F007F7F007F7F007F7F000000EF D0D0EFD0D0EFD0D0EFD0D0EFD0D0000000000000EFD0D0007F7F007F7F007F7F 007F7F007F7F007F7F000000EFD0D0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFD0 D0000000007F7F007F7F007F7F007F7F007F7F007F7FEFD0D0EFD0D0FFFFFFFF FFFFFFFFFFEFD0D0FFFFFFFFFFFFFFFFFFEFD0D0EFD0D0007F7F007F7F007F7F 007F7F007F7F000000EFD0D0FFFFFFFFFFFFFFFFFFEFD0D0FFFFFFFFFFFFFFFF FFEFD0D0000000007F7F007F7F007F7F007F7F007F7F000000EFD0D0FFFFFFEF D0D0EFD0D0EFD0D0EFD0D0EFD0D0FFFFFFEFD0D0000000007F7F007F7F007F7F 007F7F007F7F000000EFD0D0FFFFFFFFFFFFFFFFFFEFD0D0FFFFFFFFFFFFFFFF FFEFD0D0000000007F7F007F7F007F7F007F7F007F7FEFD0D0EFD0D0FFFFFFFF FFFFFFFFFFEFD0D0FFFFFFFFFFFFFFFFFFEFD0D0EFD0D0007F7F007F7F007F7F 007F7F007F7F007F7F000000EFD0D0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFD0 D0000000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F000000EF D0D0EFD0D0EFD0D0EFD0D0EFD0D0000000007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7FEFD0D0000000000000000000EFD0D0007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F} end object TrackBar1: TTrackBar Left = 8 Top = 189 Width = 39 Height = 103 Hint = 'Slide up for higher volume' LineSize = 5 Max = 255 Orientation = trVertical PageSize = 0 Frequency = 5 Position = 185 SelEnd = 0 SelStart = 0 TabOrder = 7 TabStop = False TickMarks = tmTopLeft TickStyle = tsAuto end end object MediaPlayer1: TMediaPlayer Left = 140 Top = 188 Width = 253 Height = 30 Visible = False TabOrder = 0 OnNotify = MediaPlayer1Notify end object StatusBar: TFriendlyStatusBar Left = 0 Top = 366 Width = 525 Height = 26 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Panels = < item Alignment = taCenter Bevel = pbRaised Width = 60 end item Alignment = taCenter Bevel = pbRaised Width = 70 end item Alignment = taCenter Bevel = pbRaised Width = 50 end item Alignment = taCenter Bevel = pbRaised Width = 50 end item Alignment = taCenter Bevel = pbRaised Width = 50 end item Alignment = taCenter Bevel = pbRaised Width = 50 end item Alignment = taCenter Bevel = pbRaised Width = 110 end item Bevel = pbRaised Width = 110 end> ParentFont = False SimplePanel = False object shGoto: TShape Left = 9 Top = 2 Width = 41 Height = 25 Hint = 'Click me or press Ctrl+G to'#13#10'position to a specific quote no.' Brush.Style = bsClear Pen.Style = psClear OnMouseDown = shGotoMouseDown end object shQuotes: TShape Left = 70 Top = 2 Width = 52 Height = 25 Hint = 'Click me or Press Ctrl+O to'#13#10'open a different quotes file.' Brush.Style = bsClear Pen.Style = psClear OnMouseDown = shQuotesMouseDown end object shMusic: TShape Left = 140 Top = 2 Width = 32 Height = 25 Hint = 'Click me or Press Ctrl+M to'#13#10'toggle music on or off.' Brush.Style = bsClear Pen.Style = psClear OnMouseDown = shMusicMouseDown end object shSound: TShape Left = 186 Top = 2 Width = 39 Height = 25 Hint = 'Click me or Press Ctrl+S to'#13#10'turn sound effect on or off.' Brush.Style = bsClear Pen.Style = psClear OnMouseDown = shSoundMouseDown end object shBDrop: TShape Left = 339 Top = 2 Width = 92 Height = 25 Hint = 'Right+Click me or press Alt+4 to'#13#10'hide/show the Back drop image.' + #13#10'Click or press Ctrl+B to change '#13#10'the backdrop.' Brush.Style = bsClear Pen.Style = psClear OnMouseDown = shBDropMouseDown end object shAutoNext: TShape Left = 239 Top = 2 Width = 34 Height = 25 Hint = 'Click me or press Ctrl+A to'#13#10'toggle Auto/Manual Show Next Quotes' + '.' Brush.Style = bsClear Pen.Style = psClear OnMouseDown = shAutoNextMouseDown end object shPopup: TShape Left = 290 Top = 2 Width = 33 Height = 25 Hint = 'Right click me or press Ctrl+U to'#13#10'toggle Popup or Idle mode.'#13#10'I' + 'dle mode is temporary if left clicked.' Brush.Style = bsClear Pen.Style = psClear OnMouseDown = shPopupMouseDown end object shMusicTitle: TShape Left = 448 Top = 2 Width = 92 Height = 25 Hint = 'Click me or Press Ctrl+T to'#13#10'play the next Music Title' Brush.Style = bsClear Pen.Style = psClear OnMouseDown = shMusicTitleMouseDown end end object PopupMenu1: TPopupMenu HelpContext = 10 OnPopup = PopupMenu1Popup Left = 70 Top = 146 object About1: TMenuItem Caption = '&About...' ShortCut = 0 OnClick = About1Click end object N2: TMenuItem Caption = '-' ShortCut = 0 end object ActivateScreenSaver1: TMenuItem Caption = 'Activate Screen Sa&ver' ShortCut = 0 OnClick = ActivateScreenSaver1Click end object ShowNextQuotes1: TMenuItem Caption = 'Show Next &Quotes' ShortCut = 0 OnClick = AutoNextTimerTimer end object N6: TMenuItem Caption = '-' ShortCut = 0 end object Show2: TMenuItem Caption = 'Sho&w' ShortCut = 0 object ShowHint1: TMenuItem Caption = '&Hint' ShortCut = 32816 OnClick = ShowHint1Click end object N4: TMenuItem Caption = '-' ShortCut = 0 end object ShowToolBar: TMenuItem Caption = '&Tool Bar' ShortCut = 32817 OnClick = ShowToolbarClick end object ShowStatusBar: TMenuItem Caption = '&Status Bar' ShortCut = 32818 OnClick = ShowStatusbarClick end object ShowBulb: TMenuItem Caption = '&Bulb' ShortCut = 32819 OnClick = ShowBulbClick end object ShowBDrop: TMenuItem Caption = 'Back &Drop' ShortCut = 32820 OnClick = ShowBDropClick end object ShowCaption: TMenuItem Caption = '&Caption' ShortCut = 32821 OnClick = ShowCaptionClick end object ShowQuoteTitle: TMenuItem Caption = 'Quotes Tit&le' ShortCut = 32822 OnClick = ShowQuoteTitleClick end end object Setup1: TMenuItem Caption = 'Se&tup...' ShortCut = 0 OnClick = Setup1Click end object N10: TMenuItem Caption = '-' ShortCut = 0 end object EditQuotes1: TMenuItem Caption = '&Edit Quotes...' ShortCut = 16453 OnClick = EditQuotes1Click end object Open1: TMenuItem Caption = '&Open...' ShortCut = 16463 OnClick = Open1Click end object Print1: TMenuItem Caption = '&Print...' ShortCut = 16464 OnClick = Print1Click end object N8: TMenuItem Caption = '-' ShortCut = 0 end object Change2: TMenuItem Caption = '&Change' ShortCut = 0 object ChangeBackDrop: TMenuItem Caption = 'Back &Drop' ShortCut = 16450 OnClick = ChangeBackdropClick end object ChangeMusicTitle: TMenuItem Caption = 'Music &Title' ShortCut = 16468 OnClick = ChangeMusicTitleClick end object GotoQuotes: TMenuItem Caption = 'Quotes &No.' ShortCut = 16455 OnClick = GotoQuotesClick end end object PlayMusic: TMenuItem Caption = 'Play &Music' Hint = 'Check this off if you do not want quotes to accompany with Music' ShortCut = 16461 OnClick = PlayMusicClick end object WithSound: TMenuItem Caption = '&Sound' Hint = 'Check this off if you do not want next/previous button to accomp' + 'any with Sound' ShortCut = 16467 OnClick = WithSoundClick end object AutoShowNext: TMenuItem Caption = 'Auto Show &Next' ShortCut = 16449 OnClick = AutoShowNextClick end object IdlePopup: TMenuItem Caption = 'Pop &up' ShortCut = 16469 OnClick = IdlePopupClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Help2: TMenuItem Caption = '&Help' ShortCut = 112 OnClick = Help1Click end object Exit1: TMenuItem Caption = 'E&xit Wisdom Quotes' ShortCut = 0 OnClick = Exit1Click end end object FindDialog: TFindDialog Options = [frDown, frHideUpDown, frWholeWord] OnFind = FindDialogFind Left = 98 Top = 146 end object OpenDialog1: TOpenDialog DefaultExt = '*.QUO' FileEditStyle = fsEdit Filter = 'Quotes (*.QUO)|*.QUO' Options = [ofNoChangeDir, ofFileMustExist] Title = 'Open a different Quote file' Left = 128 Top = 144 end object PrintDialog1: TPrintDialog Options = [poPrintToFile] Left = 36 Top = 172 end object VolumeControl1: TVolumeControl MidiTrackBar = TrackBar1 Left = 64 Top = 176 end object RxTimerList1: TRxTimerList Active = True Left = 40 Top = 144 object AutoNextTimer: TRxTimerEvent Interval = 30000 OnTimer = AutoNextTimerTimer end object HourlyTimer: TRxTimerEvent Interval = 900 OnTimer = HourlyTimerTimer end object IdleTimer: TRxTimerEvent Interval = 60000 OnTimer = IdleTimerTimer end end end