Unit
    Global;


Interface

Type
    TGlobalObject = Object
        Constructor Init;
        Procedure   Method1; Virtual;
        Procedure   Method2; Virtual;
        Procedure   Method3; Virtual;

    End;

Implementation

Constructor TGlobalObject.Init;
    Begin
    End;

Procedure TGlobalObject.Method1;
    Begin
    End;

Procedure TGlobalObject.Method2;
    Begin
    End;

Procedure TGlobalObject.Method3;
    Begin
    End;

End.
