diff --git a/uutlGenerics.pas b/uutlGenerics.pas
index a7e2fac..b7ac0d9 100644
--- a/uutlGenerics.pas
+++ b/uutlGenerics.pas
@@ -572,6 +572,9 @@ type
 
   function utlFreeOrFinalize(var obj; const aTypeInfo: PTypeInfo; const aFreeObj: Boolean = true): Boolean;
 
+operator < (const i1, i2: TObject): Boolean; inline;
+operator > (const i1, i2: TObject): Boolean; inline;
+
 implementation
 
 uses
@@ -580,15 +583,15 @@ uses
 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
 //Helper////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-operator < (const i1, i2: TObject): Boolean; inline;
+operator < (const i1, i2: TObject): Boolean;
 begin
-  result := PtrUInt(i1) < PtrUInt(i2);
+  result := Pointer(i1) < Pointer(i2);
 end;
 
 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-operator > (const i1, i2: TObject): Boolean; inline;
+operator > (const i1, i2: TObject): Boolean;
 begin
-  result := PtrUInt(i1) > PtrUInt(i2);
+  result := Pointer(i1) > Pointer(i2);
 end;
 
 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////