paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-20 12:19:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

Remove useless initial values from ListFilterEdit. Fixes issue #19694

Browse Source 
git-svn-id: trunk@31645 -
This commit is contained in:
juha 2011-07-10 08:39:58 +00:00
parent 08d260a1e0
commit 8475fdc422
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazcontrols/listfilteredit.pas
View File

@ -507,8 +507,6 @@ begin
fFilenameMap:=TStringToStringTree.Create(True);
fImageIndexDirectory := -1;
Button.Enabled:=False;
Font.Color:=clBtnShadow;
Text:=lisCEFilter;
OnChange:=@FilterEditChange;
OnEnter:=@FilterEditEnter;
OnExit:=@FilterEditExit;

10
ide/viewunit_dlg.lfm
View File

@ -26,13 +26,15 @@ object ViewUnitDialog: TViewUnitDialog
OnDblClick = OKButtonClick
OnKeyDown = ListboxKeyDown
PopupMenu = popListBox
ScrollWidth = 362
Style = lbOwnerDrawFixed
TabOrder = 0
TopIndex = -1
end
object ButtonPanel: TButtonPanel
Left = 6
Height = 40
Top = 340
Height = 34
Top = 346
Width = 366
OKButton.Name = 'OKButton'
OKButton.Caption = '&ОК'
@ -77,8 +79,8 @@ object ViewUnitDialog: TViewUnitDialog
AnchorSideLeft.Control = SortAlphabeticallySpeedButton
AnchorSideLeft.Side = asrBottom
Left = 26
Height = 20
Top = 3
Height = 23
Top = 2
Width = 332
FilteredListbox = Listbox
ButtonWidth = 23