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

win32: don't override all WN_NOTIFY results we set in the win32callback default handler

Browse Source 
git-svn-id: trunk@18249 -
This commit is contained in:
paul 2009-01-11 07:07:46 +00:00
parent cc2e0fdf0e
commit d15d1c0630
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/win32/win32winapi.inc
View File

@ -345,9 +345,7 @@ begin
CN_NOTIFY: CN_NOTIFY:
with TLMessage(Message) do with TLMessage(Message) do
if (Sender is TCustomTrackBar) then if (Sender is TCustomTrackBar) then
Result := SendMessage(Handle, Msg, WParam, LParam) Result := SendMessage(Handle, Msg, WParam, LParam);
else
Result := CallDefaultWindowProc(Handle, Msg, WParam, LParam);
else else
if TLMessage(Message).Msg >= WM_USER then if TLMessage(Message).Msg >= WM_USER then
with TLMessage(Message) do with TLMessage(Message) do