Einzelnen Beitrag anzeigen

RaSoWa1

Registriert seit: 1. Jun 2006
Ort: Halle/Saale
140 Beiträge
 
Delphi 2010 Professional
 
#6

Re: Speicherlecks Bug in D6 oder FastMM4?

  Alt 6. Sep 2009, 15:57
Hallo,

Dank der Hilfe von Bernhard Geyer, Google und vielen Tests habe ich das Problem gelöst.
Letztendlich haben nur 2 kleine Änderungen zum Erfolg geführt. FastMM4 meldet nun keine Lecks mehr.

Für alle die es interessiert:
1. unit HelpIntfs
Delphi-Quellcode:
function GetHelpSystem(out System : IHelpSystem) : Integer;
begin
  if not Assigned(HelpManager) then
  begin
    HelpManager := THelpManager.Create;
// HelpManager._AddRef; // diese Zeile entfernen
  end;

  System := HelpManager as IHelpSystem;
  Result := 0;
end;
2. unit WinHelpViewer
Delphi-Quellcode:
finalization
  if Assigned(HelpViewer.FHelpManager) then
  begin
    HelpViewer.InternalShutDown;
  end;
  if Assigned(WinHelpTester) then
  begin
    WinHelpTester := nil;
  end;
  HelpViewer.FreeInstance; // diese zeile einfügen
  HelpViewer := nil; // diese zeile einfügen
end.
Gruß
Klaus
Klaus
  Mit Zitat antworten Zitat