TFDTable.Create -> FreeAndNil vyvoláva memory leak

[Stanislav Hruška]

Kód: Delphi [Vybrat]

1. procedure TfrmProgramSettings.FormClose(Sender: TObject; var Action: TCloseAction);
2. begin
3.   Action := caFree;
4.  
5. function TDBControl.CreateSinglTable(AOwner: TComponent; AName: string): TFDTable;
6. begin
7.   Result := TFDTable.Create(AOwner);
8.  
9. procedure TfrmProgramSettings.CreateFDObjects;
10. begin
11.   tblCFOs := oDBControl.CreateSinglTable(Self, 'FOCS');
12.  

Či už to mám tak, alebo dám Owner = nill a vo FormDestroy FreeAndNil je to jedno. Vždy mi FastMM4 hlási memory leak
917 - 1012 bytů: TFDTable x 1
Už som z toho na odstrel. V čom to môže byť. Tabuľky, ktoré vytváram v objektoch,alebo priamo vo formálri,  tento problém nemajú

[Stanislav Hruška]

Do čerta, ono to hlási chybu aj keď tam žiadnu tabuľku ani objekt nevytváram. Pre tabuľku ani nemám definovanú premennú.

[Stanislav Hruška]

Tak to je pošahaným formulárom. Nič v ňom ani na ňom nie je. A chybu hlási. Takže tie dva formuláre musím znova urobiť. Nepomohlo ani vymazanie dcu súborov.

[Stanislav Hruška]

A som v koncoch. Obnovil som OS. Opojil všetky periférie. Je to NB. Ale vytvorím nový formulár. Obslúžim len udalosť Close a mám memory leak. Ale memory leak nemám ak:
  Spustím len program a zavriem ho.
  Spustím prázdny formulár ako hlavný formulár.

Už sa niekto s niečím takým stretol? Už som naozaj dosť zúfalý. Veď sa s tým naťahujem skoro 5 hodín.

[Stanislav Hruška]

Mea culpa, mea culpa, mea maxima culpa. Chyba vo funkcii