#5 Unnecessary calls of FRepaintOptimizer.Reset

[Anonymous]

GR32_Image.pas

Old version:

procedure TCustomImage32.InvalidateCache;
begin
if FRepaintOptimizer.Enabled then FRepaintOptimizer.Reset;
CacheValid := False;
end;

New version:
Simple but much more faster in many cases.

procedure TCustomImage32.InvalidateCache;
begin
if FRepaintOptimizer.Enabled and CacheValid then FRepaintOptimizer.Reset;
CacheValid := False;
end;

[Christian-W. Budde]

Applied, but needs further testing to see whether it works flawlessly.