LCL: Optimize ImageList drawing by removing RefreshControl in TToolButton.SetImageIndex, issue #21766, patch from David Jenkins

git-svn-id: trunk@36785 -
This commit is contained in:
juha 2012-04-15 07:46:22 +00:00
parent f7fbc97d3f
commit 5323209a79

View File

@ -580,10 +580,7 @@ begin
if FImageIndex = Value then exit;
FImageIndex := Value;
if IsControlVisible and Assigned(FToolBar) then
begin
RefreshControl;
Invalidate;
end;
end;
procedure TToolButton.SetMarked(Value: Boolean);