Fix for sample: WST now defaults to UnicodeStrings.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5953 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2017-06-22 15:27:00 +00:00
parent be12b3e03e
commit 850d5848a9
4 changed files with 49 additions and 48 deletions
--- a/wst/trunk/samples/user_service_intf_imp.pas
+++ b/wst/trunk/samples/user_service_intf_imp.pas
@@ -5,7 +5,10 @@ This unit has been produced by ws_helper.
  Date            : "30/04/2007 00:07".
 }
 Unit user_service_intf_imp;
-{$IFDEF FPC} {$mode objfpc}{$H+} {$ENDIF}
+{$IFDEF FPC}
+  {$mode objfpc}{$H+}
+  {$modeswitch UNICODESTRINGS}
+{$ENDIF}
 Interface

 Uses SysUtils, Classes,