unit SystemUnit; interface type SystemClass = class public function Create(x: integer); end; implementation function SystemClass.Create(x: integer); begin end; end.