* superfluos empty lines removed

git-svn-id: trunk@14596 -

rtl/objpas/sysutils/sysutilh.inc

@@ -184,8 +184,6 @@ Var
    procedure Beep;
    function SysErrorMessage(ErrorCode: Integer): String;
 
-
-
 Type
    TCreateGUIDFunc = Function(Out GUID : TGUID) : Integer;