mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-28 17:03:07 +02:00
sparta: invalidate fake menu only if visible
git-svn-id: trunk@51296 -
This commit is contained in:
parent
476ee9dad4
commit
30204b58e5
@ -843,6 +843,7 @@ begin
|
||||
OnNodePositioning(Self, [pkBottom], pcPositioningEnd);
|
||||
Application.NotifyUserInputHandler(Self, 0); // force repaint invisible components
|
||||
end else
|
||||
if pFakeMenu.Visible then
|
||||
pFakeMenu.Invalidate; // always repaint menu on modification
|
||||
|
||||
FDesignerModified := False;
|
||||
|
Loading…
Reference in New Issue
Block a user