mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-01 23:00:27 +02:00
Designer: Avoid artifacts when moving non-visual components by keyboard. Patch by n7800, issue #40643.
This commit is contained in:
parent
b194126eca
commit
e4acac0e1a
@ -865,6 +865,7 @@ begin
|
|||||||
or Selection.LookupRootSelected then exit;
|
or Selection.LookupRootSelected then exit;
|
||||||
Selection.MoveSelection(DiffX, DiffY, False);
|
Selection.MoveSelection(DiffX, DiffY, False);
|
||||||
Modified;
|
Modified;
|
||||||
|
Form.Invalidate;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TDesigner.NudgeSize(DiffX, DiffY: Integer);
|
procedure TDesigner.NudgeSize(DiffX, DiffY: Integer);
|
||||||
|
Loading…
Reference in New Issue
Block a user