object FindReplaceMainForm: TFindReplaceMainForm Left = 374 Top = 141 Width = 475 Height = 363 VertScrollBar.Range = 81 ActiveControl = Memo1 Caption = 'FindReplace test/demo program' Color = clButton Constraints.MinHeight = 200 Constraints.MinWidth = 450 Font.Color = clText Font.Height = 11 Font.Name = 'MS Sans Serif' Font.Pitch = fpVariable Font.Style = [] Font.Weight = 40 Icon.Data = { 424D760600000000000036040000280000001800000018000000010008000000 000040020000120B0000120B0000000100000001000000000000000080000080 000000808000800000008000800080800000C0C0C000C0DCC000F0CAA6000020 400000206000002080000020A0000020C0000020E00000400000004020000040 400000406000004080000040A0000040C0000040E00000600000006020000060 400000606000006080000060A0000060C0000060E00000800000008020000080 400000806000008080000080A0000080C0000080E00000A0000000A0200000A0 400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0200000C0 400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0200000E0 400000E0600000E0800000E0A00000E0C00000E0E00040000000400020004000 400040006000400080004000A0004000C0004000E00040200000402020004020 400040206000402080004020A0004020C0004020E00040400000404020004040 400040406000404080004040A0004040C0004040E00040600000406020004060 400040606000406080004060A0004060C0004060E00040800000408020004080 400040806000408080004080A0004080C0004080E00040A0000040A0200040A0 400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0200040C0 400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0200040E0 400040E0600040E0800040E0A00040E0C00040E0E00080000000800020008000 400080006000800080008000A0008000C0008000E00080200000802020008020 400080206000802080008020A0008020C0008020E00080400000804020008040 400080406000804080008040A0008040C0008040E00080600000806020008060 400080606000806080008060A0008060C0008060E00080800000808020008080 400080806000808080008080A0008080C0008080E00080A0000080A0200080A0 400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0200080C0 400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0200080E0 400080E0600080E0800080E0A00080E0C00080E0E000C0000000C0002000C000 4000C0006000C0008000C000A000C000C000C000E000C0200000C0202000C020 4000C0206000C0208000C020A000C020C000C020E000C0400000C0402000C040 4000C0406000C0408000C040A000C040C000C040E000C0600000C0602000C060 4000C0606000C0608000C060A000C060C000C060E000C0800000C0802000C080 4000C0806000C0808000C080A000C080C000C080E000C0A00000C0A02000C0A0 4000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C02000C0C0 4000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000FF0000FF 000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00C73E3E3E3E3E3E3E3E3E 3E3E3E3D3D3DFEFCFCFCFCFCFCFC3E3E3E3E3E3E3E3E3E3E3E3E3E3E3D3DFEFC FCFBFBFCFCFC3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3DFEFCFBFCFCFBFCFC3F3E 3E3E3E3E3E3E3E3E3E3E3E3E3E3EFEFCFBFCFCFBFCFC3F3F3E3E3E3E3E3E3E3E 3E3E3E3E3E3EFEFCFCFCFCFBFCFC3F3F3F3E3E3E3E3E3E3E3E3E3E3E3E3EFEFC FCFCFCFBFCFC3F3F3F3F3E3E3E3E3E3E3E3E3E3E3E3EFEFCFCFCFCFBFCFC3F3F 3F3F3F3E3E3E3E3E3E3E3E3E3E3EFEFCFCFCFCFCFCFC3F3F3F3F3F3F3E3E3E3E 3E3E3E3E3E3EFEFEFEFEFEFEFEFE3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E3E3E3E 3E3E3E3D3D3D3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E3E3E3E3E3E3E3D3D3F3F 3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E3E3E3E3E3E3E3D3F3F3F3F3F3F3F3F3F3F 3E3E3E3E3E3E3E3E3E3E3E3E3E3E3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E 3E3E3E3E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E3E3E3E3E3F3F 3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E3E3E3E3F3F3F3F3F3F3F3F3F3F 3F3F3F3F3E3E3E3E3E3E3E3E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E 3E3E3E3E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E3F3F 3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3F3F3F3F3F3F3F3F3F3F 3F3F3F3F3F3F3F3F3E3E3E3E3E3E373F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F 3F3E3E3E3E3E37373F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3737 373F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E} Menu = MainMenu1 ParentFont = False Position = poDesktopCenter Scaled = False OnCreate = FormCreate PixelsPerInch = 96 object Memo1: TMemo Left = 0 Top = 81 Width = 475 Height = 259 Align = alClient Font.CharSet = fcsLatin1 Font.Color = clText Font.Height = 12 Font.Name = 'Courier New' Font.Pitch = fpVariable Font.Style = [] Font.Weight = 40 Lines.Strings = ( '{***************************************************************' + '***' '' ' JEDI-VCL Demo' '' ' Copyright (C) 2002 Project JEDI' '' ' Original author:' '' ' Contributor(s):' '' ' You may retrieve the latest version of this file at the ' 'JEDI-JVCL' ' home page, located at http://jvcl.sourceforge.net' '' ' The contents of this file are used with permission, subject to' ' the Mozilla Public License Version 1.1 (the "License"); you ' 'may' ' not use this file except in compliance with the License. You ' 'may' ' obtain a copy of the License at' ' http://www.mozilla.org/MPL/MPL-1_1Final.html' '' ' Software distributed under the License is distributed on an' ' "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or' ' implied. See the License for the specific language governing' ' rights and limitations under the License.' '' '****************************************************************' + '**}') ParentFont = False ScrollBars = ssVertical TabOrder = 0 end object Panel1: TPanel Left = 0 Top = 0 Width = 475 Height = 81 Align = alTop BevelOuter = bvNone Font.CharSet = fcsLatin1 Font.Color = clText Font.Height = 13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [fsBold] ParentFont = False TabOrder = 1 object Label1: TLabel Left = 24 Top = 8 Width = 392 Height = 64 Caption = 'Test program for the JvQFindReplace unit.'#13#10'Has two different Fin' + 'd systems: one using the built in dialogs;'#13#10'one using InputQuery' + ' to handle user selection.'#13#10'See JvQFindReplace.pas for more deta' + 'ils.' end end object FindReplace1: TJvFindReplace Fast = True Options = [frDown, frShowHelp] EditControl = Memo1 OnFind = FindReplace1Find OnReplace = FindReplace1Replace OnNotFound = FindReplace1NotFound Left = 48 Top = 104 end object MainMenu1: TMainMenu Left = 128 Top = 104 object Search1: TMenuItem Caption = 'Find (&Dialogs)' object Find1: TMenuItem Caption = 'Find...' ShortCut = 16450 OnClick = Find1Click end object Replace1: TMenuItem Caption = 'Replace...' ShortCut = 16466 OnClick = Replace1Click end object FindAgain1: TMenuItem Caption = 'Find Again' ShortCut = 4146 OnClick = FindAgain1Click end end object Serachown1: TMenuItem Caption = 'Find (&Own dialogs)' object Find2: TMenuItem Caption = 'Find...' ShortCut = 16454 OnClick = Find2Click end object Replace2: TMenuItem Caption = 'Replace...' ShortCut = 16464 OnClick = Replace2Click end object FindAgain2: TMenuItem Caption = 'Find Again' ShortCut = 20530 OnClick = FindAgain2Click end end object Options1: TMenuItem Caption = 'O&ptions' object Rememberlastsearch1: TMenuItem Caption = 'Remember last search' Checked = True OnClick = Rememberlastsearch1Click end end end end