"Unterklassen"?

[Chewie]

Ganz einfach: Du brauchst eine Instanz einer Klasse, die eine Methode Play hat, mit dem Namen Song.

Also etwa so:

Delphi-Quellcode:

type
  TSomeClassWithPlayMethod = class
  public
    procedure Play;
  end;

  TTheOtherClass = class
  private
    FSong: TSomeClassWithPlaymethod;
  public
    property Song: TSomeClassWithPlayMethod read FSong;
  end;

Aufruf nun mit TheOtherClass.Song.Play.