diff --git a/rtl/wince/dynlibs.inc b/rtl/wince/dynlibs.inc
index 6d07d4ca12..7ef61882e2 100644
--- a/rtl/wince/dynlibs.inc
+++ b/rtl/wince/dynlibs.inc
@@ -65,13 +65,7 @@ Var
   rc : integer;
 begin  
   rc := GetLastError;
-  try
-    result := Trim(SysErrorMessage(rc));
-    if (result='') then
-      result := 'Operating system error 0x' + IntToHex(rc, 8) + ' (no descriptive text)'
-  except
-    result := 'Operating system error 0x' + IntToHex(rc, 8) + ' (error getting descriptive text)'
-  end;
+  str(rc,result);
 end;
 
 {$endif}