diff --git a/Source/Base/Utiles/uReferenciasUtils.pas b/Source/Base/Utiles/uReferenciasUtils.pas
index 19a04ff5..b5d41354 100644
--- a/Source/Base/Utiles/uReferenciasUtils.pas
+++ b/Source/Base/Utiles/uReferenciasUtils.pas
@@ -19,9 +19,11 @@ var
   Aux1, Aux2 : String;
   Rpl : Char;
 begin
-  Rpl := '0';
+  Rpl := ' ';
   Aux1 := StrReplaceButChars(ARef1, AnsiDecDigits, Rpl);
+  Aux1 := StrRemoveChars(Aux1, AnsiWhiteSpace);
   Aux2 := StrReplaceButChars(ARef2, AnsiDecDigits, Rpl);
+  Aux2 := StrRemoveChars(Aux2, AnsiWhiteSpace);  
 
   if StrIsDigit(Aux1) and StrIsDigit(Aux2) then
     Result := VarCompare(StrToIntSafe(Aux1), StrToIntSafe(Aux2))