さて久々にDelphiです。 class_helper.dpr program class_helper; {$APPTYPE CONSOLE} uses SysUtils; type TFoo = class public constructor Create; end; TBar = class helper for TFoo procedure Say; end; THoge = class public constructor Create; end…