Klasse kreieren und einem Pointer zuweisen

[DeddyH]

Delphi-Quellcode:

procedure TmyClass.CreateNewClassA;
begin
  //für _c wurde kein Speicher reserviert
  _c^ := TmyStuff.Create('a', 'b', 'c'); // *1 KNALL!
end;

procedure TmyClass.CreateNewClassB;
begin
  New(_c);
  //_c.Create('a', 'b', 'c');
  //so könnte das was werden
  _c^ := TmyStuff.Create('a', 'b', 'c');
end;

Und am Ende das Dispose nicht vergessen.