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

LCL/UpDown: Fix crash when mouse enters the space between the up/down buttons of a T(Float)SpinEditEx. Related to issue #38101.

Browse Source 
git-svn-id: trunk@64357 -
This commit is contained in:
wp 2021-01-08 21:25:43 +00:00
parent a0dd8b81d2
commit 4f5bfef839
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/include/customupdown.inc
View File

@ -540,14 +540,10 @@ end;
procedure TCustomUpDown.MouseEnter;
begin // This should never happen because buttons cover the whole component.
Assert(False, 'TCustomUpDown.MouseEnter called!');
CheckMouseEntering;
end;
procedure TCustomUpDown.MouseLeave;
begin // This should never happen because buttons cover the whole component.
Assert(False, 'TCustomUpDown.MouseLeave called!');
CheckMouseLeaving;
end;
procedure TCustomUpDown.DoSetBounds(ALeft, ATop, AWidth, AHeight: integer);