unit ULGObju;
{ Generated by MakeComp 1.02 from ULGTYPE.PAS. Don't modify manually !!! }
interface
uses Classes, UlanType, ULRecTyp, ULObju, 
  ULGType;

type
  TULGObj = class(TULObj)
  protected
    function GetMinRecLen: TULRecLen; override;
  public
    constructor Create(AOwner:TULObj);
  published
  end;

implementation

{TULGObj}
function TULGObj.GetMinRecLen: TULRecLen;
begin
  GetMinRecLen := sizeof(TULGRec);
end;

constructor TULGObj.Create(AOwner: TULObj);
begin
  inherited Create(TComponent(AOwner), ULGID);
end;

{/TULGObj}

end.
