Browse Source

fix code typo

Johann ELSASS 5 years ago
parent
commit
f6b62bbc91
1 changed files with 2 additions and 2 deletions
  1. 2 2
      bcbutton.pas

+ 2 - 2
bcbutton.pas

@@ -838,8 +838,8 @@ end;
 
 
 procedure TCustomBCButton.LimitMemoryUsage;
 procedure TCustomBCButton.LimitMemoryUsage;
 begin
 begin
-  {$IFNDEF FPC}//# //@  IN DELPHI NEEDRENDER NEDD TO BE TRUE. IF FALSE COMPONENT IN BGRANORMAL BE BLACK AFTER INVALIDATE.
-  if Assigned(FBGRAHover) then FBGRANormal.NeedRender := True;
+  {$IFNDEF FPC}//# //@  IN DELPHI NEEDRENDER NEED TO BE TRUE. IF FALSE COMPONENT IN BGRANORMAL BE BLACK AFTER INVALIDATE.
+  if Assigned(FBGRANormal) then FBGRANormal.NeedRender := True;
   if Assigned(FBGRAHover) then FBGRAHover.NeedRender := True;
   if Assigned(FBGRAHover) then FBGRAHover.NeedRender := True;
   if Assigned(FBGRAClick) then FBGRAClick.NeedRender := True;
   if Assigned(FBGRAClick) then FBGRAClick.NeedRender := True;
   {$ENDIF}
   {$ENDIF}