mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 21:19:14 +02:00
MG: TMenuItems can now be enabled and disabled
git-svn-id: trunk@986 -
This commit is contained in:
parent
0097aa6989
commit
2e32af558b
@ -247,7 +247,7 @@ end;
|
|||||||
{------------------------------------------------------------------------------}
|
{------------------------------------------------------------------------------}
|
||||||
Procedure TControl.LMCaptureChanged(Var Message: TLMessage);
|
Procedure TControl.LMCaptureChanged(Var Message: TLMessage);
|
||||||
Begin
|
Begin
|
||||||
//Writeln('[LMCaptureChanged for '+classname+']');
|
//Writeln('[LMCaptureChanged for '+Name+':'+Classname+']');
|
||||||
End;
|
End;
|
||||||
|
|
||||||
{------------------------------------------------------------------------------}
|
{------------------------------------------------------------------------------}
|
||||||
@ -255,7 +255,7 @@ End;
|
|||||||
{------------------------------------------------------------------------------}
|
{------------------------------------------------------------------------------}
|
||||||
procedure TControl.CMEnabledChanged(var Message: TLMEssage);
|
procedure TControl.CMEnabledChanged(var Message: TLMEssage);
|
||||||
begin
|
begin
|
||||||
invalidate;
|
Invalidate;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{------------------------------------------------------------------------------}
|
{------------------------------------------------------------------------------}
|
||||||
@ -1769,6 +1769,9 @@ end;
|
|||||||
|
|
||||||
{ =============================================================================
|
{ =============================================================================
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.59 2002/08/05 08:56:56 lazarus
|
||||||
|
MG: TMenuItems can now be enabled and disabled
|
||||||
|
|
||||||
Revision 1.58 2002/07/23 07:40:51 lazarus
|
Revision 1.58 2002/07/23 07:40:51 lazarus
|
||||||
MG: fixed get widget position for inherited gdkwindows
|
MG: fixed get widget position for inherited gdkwindows
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user