unterschiedliche Klassen variabel instanzieren

[_Sebastian_]

Zitat von Memnarch:

öhm, wasn das für ne MemoryLeakMaschine?

Ups..
Denke dem geneigten Entwickler wäre es aufgefallen bzw. nutzt den code eh etwas umfangreicher. ..

Code:

procedure TForm1.Button2Click(Sender: TObject);
var a:TAction;
begin
  a := TAction.Create(TSpecial2);
  a.free;
end;