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

DockedFormEditor: Refresh all PageControls after options are changed, so tab position is correctly changed.

Browse Source 
git-svn-id: trunk@64987 -
This commit is contained in:
michl 2021-04-13 18:31:49 +00:00
parent aa96e17781
commit 703b0f188a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/dockedformeditor/source/dockedmainide.pas
View File

@ -234,7 +234,7 @@ begin
LPageIndex := LPageCtrl.PageIndex; LPageIndex := LPageCtrl.PageIndex;
DesignForms.RemoveAllAnchorDesigner; DesignForms.RemoveAllAnchorDesigner;
SourceWindows.ShowCodeTabSkipCurrent(nil, nil); SourceWindows.ShowCodeTabSkipCurrent(nil, nil);
SourceWindows.RefreshActivePageControls; SourceWindows.RefreshAllPageControls;
TDockedMainIDE.EditorActivated(SourceWindows.LastActiveSourceEditor); TDockedMainIDE.EditorActivated(SourceWindows.LastActiveSourceEditor);
if LPageIndex = 0 then Exit; if LPageIndex = 0 then Exit;
LPageCtrl.TabIndex := LPageIndex; LPageCtrl.TabIndex := LPageIndex;