mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-20 12:19:20 +02:00
lcl: forward CM_TEXTCHANGED notifications to the DockManager
git-svn-id: trunk@20061 -
This commit is contained in:
parent
9b7b96648b
commit
a91f4faee0
@ -4801,6 +4801,12 @@ begin
|
|||||||
if FDockSite and FUseDockManager and Assigned(DockManager) then
|
if FDockSite and FUseDockManager and Assigned(DockManager) then
|
||||||
DockManager.MessageHandler(Self, Message);
|
DockManager.MessageHandler(Self, Message);
|
||||||
end;
|
end;
|
||||||
|
CM_TEXTCHANGED:
|
||||||
|
begin
|
||||||
|
if (HostDockSite <> nil) and (HostDockSite.UseDockManager) and
|
||||||
|
Assigned(HostDockSite.DockManager) then
|
||||||
|
HostDockSite.DockManager.MessageHandler(Self, Message);
|
||||||
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
inherited WndProc(Message);
|
inherited WndProc(Message);
|
||||||
|
Loading…
Reference in New Issue
Block a user