diff --git a/src/ce_common.pas b/src/ce_common.pas
index b8ef4c47..e362ddc7 100644
--- a/src/ce_common.pas
+++ b/src/ce_common.pas
@@ -6,7 +6,7 @@ interface
 
 uses
 
-  Classes, SysUtils, StrUtils,
+  Classes, SysUtils,
   {$IFDEF WINDOWS}
   Windows, JwaTlHelp32,
   {$ENDIF}
@@ -939,7 +939,7 @@ begin
     lst := TStringList.Create;
     try
       lst.LoadFromStream(proc.Output);
-      Result := StrToInt(Trim(lst.Text));
+      Result := StrToIntDef(Trim(lst.Text), 0);
     finally
       lst.Free;
     end;