paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-19 21:26:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

Cody/Dictionary: Remember window layout

Browse Source
This commit is contained in:
n7800 2025-06-20 11:03:25 +05:00 committed by Maxim Ganetsky
parent 3d540e424d
commit 30c41494e8
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/codetools/ide/codyidentifiersdlg.pas
View File

@ -41,8 +41,8 @@ uses
// LCL
Forms, Controls, Dialogs, ButtonPanel, StdCtrls, ExtCtrls, LCLType, Buttons, Menus,
// IdeIntf
PackageIntf, LazIDEIntf, SrcEditorIntf, ProjectIntf,
CompOptsIntf, IDEDialogs, IDEMsgIntf, IDEExternToolIntf, ProjPackIntf,
PackageIntf, LazIDEIntf, SrcEditorIntf, ProjectIntf, CompOptsIntf, IDEDialogs,
IDEMsgIntf, IDEWindowIntf, IDEExternToolIntf, ProjPackIntf,
// Codetools
CodeCache, BasicCodeTools, CustomCodeTool, CodeToolManager, UnitDictionary,
CodeTree, LinkScanner, DefineTemplates, FindDeclarationTool,
@ -969,6 +969,7 @@ begin
CodyOptions.PreferImplementationUsesSection:=
AddToImplementationUsesCheckBox.Checked;
FreeAndNil(FItems);
IDEDialogLayoutList.SaveLayout(self);
end;
procedure TCodyIdentifiersDlg.FormCreate(Sender: TObject);
@ -998,6 +999,7 @@ begin
ContainsRadioButton.Checked:=false;
ContainsRadioButton.Caption:=crsContains;
ContainsRadioButton.Hint:=crsShowOnlyIdentifiersContainingFilterText;
IDEDialogLayoutList.ApplyLayout(self, 550, 550);
end;
procedure TCodyIdentifiersDlg.HideOtherProjectsCheckBoxChange(Sender: TObject);