Ersatz für Buggy/Deprecated pngdelphi?

[omata]

Ja habe ich, mein Testfall ist folgender...

Delphi-Quellcode:

procedure TForm.FormCreate(Sender: TObject);
type
  TMyType = record
    a:integer;
  end;
  TMyPType = ^TMyType;

var MyP:TMyPType;
begin
  new(MyP);
end;

Den zeigt mir FastMM auch als einziges an...

Code:

--------------------------------2008/5/17 22:22:17--------------------------------
A memory block has been leaked. The size is: 4

Stack trace of when this block was allocated (return addresses):
402963 [System][@GetMem]
4725AA [Unit1.pas][Unit][TForm.FormCreate]
452CCB [Forms][TCustomForm.DoCreate]
4529AB [Forms][TCustomForm.AfterConstruction]
4037D2 [System][@AfterConstruction]
452981 [Forms][TCustomForm.Create]
7C91FB6C [RtlNtStatusToDosError]
7C91FB71 [RtlNtStatusToDosError]
7C809382 [GetTickCount]
7C84051D [ValidateLocale]

The block is currently used for an object of class: Unknown

The allocation number is: 744

Current memory dump of 256 bytes starting at pointer address 1022320:
[...unwichtig, deshalb gelöscht...]

--------------------------------2008/5/17 22:22:17--------------------------------
This application has leaked memory. The small block leaks are (excluding expected leaks registered by pointer):

1 - 4 bytes: Unknown x 1

Note: Memory leak detail is logged to a text file in the same folder as this application. To disable this memory leak check, undefine "EnableMemoryLeakReporting".

Gruss
Thorsten