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

win32 interface: fixed range check error

Browse Source 
git-svn-id: trunk@15999 -
This commit is contained in:
vincents 2008-08-08 14:05:39 +00:00
parent b7bba11457
commit cedc3fdcad
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/win32/win32wsspin.pp
View File

@ -101,7 +101,7 @@ begin
Windows.SetFocus(BuddyWindow);
// don't select text in edit, if user clicked on the up down and the edit
// was already focused
if WPARAM<>BuddyWindow then ;
if HWND(WPARAM)<>BuddyWindow then ;
// for LCL controls this is done in win32callback.inc
Windows.SendMessage(BuddyWindow, EM_SETSEL, 0, -1);
end;