mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-12 07:55:58 +02:00
lcl: Call inherited method in TWinControl.CMEnabledChanged so control is invalidated
git-svn-id: trunk@31802 -
This commit is contained in:
parent
4b2eccb8c0
commit
abae480a70
@ -6464,6 +6464,7 @@ begin
|
|||||||
//if (not Enabled) then debugln('TWinControl.CMEnabledChanged disable ',Name,':',CLassName);
|
//if (not Enabled) then debugln('TWinControl.CMEnabledChanged disable ',Name,':',CLassName);
|
||||||
EnableWindow(Handle, Enabled);
|
EnableWindow(Handle, Enabled);
|
||||||
end;
|
end;
|
||||||
|
inherited;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{------------------------------------------------------------------------------
|
{------------------------------------------------------------------------------
|
||||||
|
Loading…
Reference in New Issue
Block a user