TCanvas leak

[goobit]

I have 13.10.1 version. This canvas TRVFontInfoCacheFast.FInvalidItem.Canvas is not destroyed when TRVFontInfoCacheFast destroys. I fix it such way:

Code: Select all

procedure TRVFontInfoCacheFast.Clear;
var
  CacheItem: TRVFontInfoCacheItem;
  i: Integer;
begin
  { -- Begin Added Lines -- }
  if Assigned(FInvalidItem) and Assigned(FInvalidItem.Canvas) then
    FRVStyle.GraphicInterface.DestroyCompatibleCanvas(FInvalidItem.Canvas);
  { -- End Added Lines -- }
  for i := 0 to Count-1 do
    if Get(i) <> nil then begin
      CacheItem := Get(i);
      FRVStyle.GraphicInterface.DestroyCompatibleCanvas(CacheItem.Canvas);
    end;
  inherited Clear;
end;

Is this leak fixed in the latest version?

[Sergey Tkachenko]

No, this leak was not fixed. Thank you for reporting.

[Sergey Tkachenko]

Fixed in v14.4 (available for registered users)