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

SpartaDockedFormEditor: Make form resizable again on Windows after r61997 #a5cca7c662. Issue #36127

Browse Source 
git-svn-id: trunk@63218 -
This commit is contained in:
michl 2020-05-25 13:12:58 +00:00
parent aefa3215f8
commit 2bdfd2f614
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/sparta/mdi/source/sparta_basicresizeframe.pas
View File

@ -848,10 +848,12 @@ begin
FLastDesignedHeightToScroll:=DesignedHeightToScroll;
pBG.OnPaint := nil;
pBG.SendToBack;
FDesignedForm.BeginUpdate;
end;
procedure TBasicResizeFrame.EndFormSizeUpdate(Sender: TObject);
begin
FDesignedForm.EndUpdate;
pBG.OnPaint := pBGPaint;
end;