Fix: Bug [ 1658670 ]

This commit is contained in:
Alexander Koblov 2007-02-25 11:46:17 +00:00
commit b8ec90d23e
3 changed files with 33 additions and 32 deletions

View file

@ -15,9 +15,9 @@ object frmFindDlg: TfrmFindDlg
HorzScrollBar.Page = 494
VertScrollBar.Page = 460
VertScrollBar.Range = 316
Left = 276
Left = 304
Height = 461
Top = 17
Top = 318
Width = 495
object Splitter1: TSplitter
Align = alTop
@ -72,7 +72,7 @@ object frmFindDlg: TfrmFindDlg
end
object edtFindPathStart: TEdit
Anchors = [akTop, akLeft, akRight]
TabOrder = 1
TabOrder = 0
Left = 8
Height = 24
Top = 81
@ -95,7 +95,7 @@ object frmFindDlg: TfrmFindDlg
ItemHeight = 18
MaxLength = 0
ParentCtl3D = False
TabOrder = 0
TabOrder = 1
Text = '*'
Left = 8
Height = 21
@ -324,7 +324,7 @@ object frmFindDlg: TfrmFindDlg
BorderSpacing.InnerBorder = 2
Caption = '&Close'
OnClick = btnCloseClick
TabOrder = 1
TabOrder = 3
Left = 408
Height = 25
Top = 71
@ -337,7 +337,7 @@ object frmFindDlg: TfrmFindDlg
Caption = 'Cancel'
Enabled = False
OnClick = btnStopClick
TabOrder = 2
TabOrder = 1
Left = 408
Height = 25
Top = 103
@ -349,7 +349,7 @@ object frmFindDlg: TfrmFindDlg
Caption = '&Start'
Default = True
OnClick = btnStartClick
TabOrder = 3
TabOrder = 2
Left = 408
Height = 25
Top = 39

View file

@ -7,29 +7,29 @@ LazarusResources.Add('TfrmFindDlg','FORMDATA',[
+'mCloseQuery'#8'OnCreate'#7#10'FormCreate'#10'OnKeyPress'#7#12'FormKeyPress'
+#6'OnShow'#7#14'frmFindDlgShow'#13'PixelsPerInch'#2'`'#8'Position'#7#14'poSc'
+'reenCenter'#10'TextHeight'#2#16#18'HorzScrollBar.Page'#3#238#1#18'VertScrol'
+'lBar.Page'#3#204#1#19'VertScrollBar.Range'#3'<'#1#4'Left'#3#20#1#6'Height'#3
+#205#1#3'Top'#2#17#5'Width'#3#239#1#0#9'TSplitter'#9'Splitter1'#5'Align'#7#5
+'alTop'#6'Cursor'#7#8'crVSplit'#6'Height'#2#1#5'Width'#3#239#1#12'ResizeAnch'
+'or'#7#5'akTop'#6'Cursor'#7#8'crVSplit'#6'Height'#2#1#5'Width'#3#239#1#0#0#6
+'TPanel'#6'Panel2'#5'Align'#7#5'alTop'#10'BevelOuter'#7#6'bvNone'#12'ClientH'
+'eight'#3#25#1#11'ClientWidth'#3#239#1#11'FullRepaint'#8#8'TabOrder'#2#0#6'H'
+'eight'#3#25#1#3'Top'#2#1#5'Width'#3#239#1#0#12'TPageControl'#9'pgcSearch'#10
+'ActivePage'#7#10'tsStandard'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8
+'TabIndex'#2#0#8'TabOrder'#2#0#6'Height'#3#17#1#5'Width'#3#144#1#0#9'TTabShe'
+'et'#10'tsStandard'#7'Caption'#6#8'Standard'#12'ClientHeight'#3#247#0#11'Cli'
+'entWidth'#3#136#1#6'Height'#3#247#0#5'Width'#3#136#1#0#6'TLabel'#16'lblFind'
+'PathStart'#7'Caption'#6#7'FileDir'#5'Color'#7#6'clNone'#11'ParentColor'#8#4
+'Left'#2#8#6'Height'#2#14#3'Top'#2'9'#5'Width'#2#30#0#0#6'TLabel'#15'lblFind'
+'FileMask'#7'Caption'#6#8'FileMask'#5'Color'#7#6'clNone'#11'ParentColor'#8#4
+'Left'#2#8#6'Height'#2#14#3'Top'#2#1#5'Width'#2')'#0#0#5'TEdit'#16'edtFindPa'
+'thStart'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#1#4'Le'
+'ft'#2#8#6'Height'#2#24#3'Top'#2'Q'#5'Width'#3'<'#1#0#0#7'TButton'#9'btnSelD'
+'ir'#7'Anchors'#11#5'akTop'#7'akRight'#0#25'BorderSpacing.InnerBorder'#2#2#7
+'Caption'#6#3'...'#7'OnClick'#7#14'btnSelDirClick'#8'TabOrder'#2#2#4'Left'#3
+'L'#1#6'Height'#2#25#3'Top'#2'P'#5'Width'#2#25#0#0#9'TComboBox'#15'cmbFindFi'
+'leMask'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'
+'lBar.Page'#3#204#1#19'VertScrollBar.Range'#3'<'#1#4'Left'#3'0'#1#6'Height'#3
+#205#1#3'Top'#3'>'#1#5'Width'#3#239#1#0#9'TSplitter'#9'Splitter1'#5'Align'#7
+#5'alTop'#6'Cursor'#7#8'crVSplit'#6'Height'#2#1#5'Width'#3#239#1#12'ResizeAn'
+'chor'#7#5'akTop'#6'Cursor'#7#8'crVSplit'#6'Height'#2#1#5'Width'#3#239#1#0#0
+#6'TPanel'#6'Panel2'#5'Align'#7#5'alTop'#10'BevelOuter'#7#6'bvNone'#12'Clien'
+'tHeight'#3#25#1#11'ClientWidth'#3#239#1#11'FullRepaint'#8#8'TabOrder'#2#0#6
+'Height'#3#25#1#3'Top'#2#1#5'Width'#3#239#1#0#12'TPageControl'#9'pgcSearch'
+#10'ActivePage'#7#10'tsStandard'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+#0#8'TabIndex'#2#0#8'TabOrder'#2#0#6'Height'#3#17#1#5'Width'#3#144#1#0#9'TTa'
+'bSheet'#10'tsStandard'#7'Caption'#6#8'Standard'#12'ClientHeight'#3#247#0#11
+'ClientWidth'#3#136#1#6'Height'#3#247#0#5'Width'#3#136#1#0#6'TLabel'#16'lblF'
+'indPathStart'#7'Caption'#6#7'FileDir'#5'Color'#7#6'clNone'#11'ParentColor'#8
+#4'Left'#2#8#6'Height'#2#14#3'Top'#2'9'#5'Width'#2#30#0#0#6'TLabel'#15'lblFi'
+'ndFileMask'#7'Caption'#6#8'FileMask'#5'Color'#7#6'clNone'#11'ParentColor'#8
+#4'Left'#2#8#6'Height'#2#14#3'Top'#2#1#5'Width'#2')'#0#0#5'TEdit'#16'edtFind'
+'PathStart'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#0#4
+'Left'#2#8#6'Height'#2#24#3'Top'#2'Q'#5'Width'#3'<'#1#0#0#7'TButton'#9'btnSe'
+'lDir'#7'Anchors'#11#5'akTop'#7'akRight'#0#25'BorderSpacing.InnerBorder'#2#2
+#7'Caption'#6#3'...'#7'OnClick'#7#14'btnSelDirClick'#8'TabOrder'#2#2#4'Left'
+#3'L'#1#6'Height'#2#25#3'Top'#2'P'#5'Width'#2#25#0#0#9'TComboBox'#15'cmbFind'
+'FileMask'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'
+#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#10'ItemHeight'#2#18
+#9'MaxLength'#2#0#11'ParentCtl3D'#8#8'TabOrder'#2#0#4'Text'#6#1'*'#4'Left'#2
+#9'MaxLength'#2#0#11'ParentCtl3D'#8#8'TabOrder'#2#1#4'Text'#6#1'*'#4'Left'#2
+#8#6'Height'#2#21#3'Top'#2#25#5'Width'#3'<'#1#0#0#9'TGroupBox'#10'gbFindData'
+#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#9'Find Data'#12
+'ClientHeight'#2'>'#11'ClientWidth'#3'p'#1#7'Enabled'#8#11'ParentCtl3D'#8#8
@ -96,13 +96,13 @@ LazarusResources.Add('TfrmFindDlg','FORMDATA',[
+'abled'#8#8'TabOrder'#2#10#4'Left'#3#164#0#6'Height'#2#20#3'Top'#2'i'#5'Widt'
+'h'#2'n'#0#0#0#0#7'TButton'#8'btnClose'#7'Anchors'#11#5'akTop'#7'akRight'#0
+#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#6'&Close'#7'OnClick'#7#13'bt'
+'nCloseClick'#8'TabOrder'#2#1#4'Left'#3#152#1#6'Height'#2#25#3'Top'#2'G'#5'W'
+'nCloseClick'#8'TabOrder'#2#3#4'Left'#3#152#1#6'Height'#2#25#3'Top'#2'G'#5'W'
+'idth'#2'K'#0#0#7'TButton'#7'btnStop'#7'Anchors'#11#5'akTop'#7'akRight'#0#25
+'BorderSpacing.InnerBorder'#2#2#6'Cancel'#9#7'Caption'#6#6'Cancel'#7'Enabled'
+#8#7'OnClick'#7#12'btnStopClick'#8'TabOrder'#2#2#4'Left'#3#152#1#6'Height'#2
+#8#7'OnClick'#7#12'btnStopClick'#8'TabOrder'#2#1#4'Left'#3#152#1#6'Height'#2
+#25#3'Top'#2'g'#5'Width'#2'K'#0#0#7'TButton'#8'btnStart'#7'Anchors'#11#5'akT'
+'op'#7'akRight'#0#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#6'&Start'#7
+'Default'#9#7'OnClick'#7#13'btnStartClick'#8'TabOrder'#2#3#4'Left'#3#152#1#6
+'Default'#9#7'OnClick'#7#13'btnStartClick'#8'TabOrder'#2#2#4'Left'#3#152#1#6
+'Height'#2#25#3'Top'#2''''#5'Width'#2'K'#0#0#0#6'TPanel'#6'Panel1'#5'Align'#7
+#8'alClient'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#3#179#0#11'ClientWi'
+'dth'#3#239#1#11'FullRepaint'#8#8'TabOrder'#2#1#6'Height'#3#179#0#3'Top'#3#26

View file

@ -104,6 +104,7 @@ begin
frmFindDlg:=TfrmFindDlg.Create(nil);
frmFindDlg.Show;
frmFindDlg.BringToFront;
frmFindDlg.cmbFindFileMask.SetFocus;
end;
procedure TfrmFindDlg.LoadLng;