* Fix compilation of processunicode

packages/fcl-process/src/processbody.inc

@@ -270,6 +270,7 @@ implementation
 
 {$i process.inc}
 
+{$IFNDEF SKIPHELPERS}
 function TIOTypeHelper.ToString : string;
 
 begin
@@ -319,7 +320,7 @@ begin
   WriteStr(Result,Self);
 end;
 
-
+{$ENDIF SKIPHELPERS}
 
 Procedure CommandToList(S : TProcessString; List : TProcessStrings);
 

packages/fcl-process/src/processunicode.pp

@@ -55,7 +55,7 @@ Type
 {$define processunicodestring}
 {$ENDIF}
 {$define TProcessnamemacro:=TProcess}
-
+{$DEFINE SKIPHELPERS}
 {$i processbody.inc}
 
 end.