Sfoglia il codice sorgente

* Unicode stringmanager

Michael VAN CANNEYT 2 anni fa
parent
commit
42423bec02

+ 7 - 0
packages/fcl-web/examples/fptemplate/simpletemplate/cgi/simpletemplate.lpr

@@ -3,11 +3,18 @@ program simpletemplate;
 {$mode objfpc}{$H+}
 
 uses
+  {$ifdef unix}
+  fpwidestring, unicodeducet,
+  {$endif}
+
   fpCGI, webmodule;
 
 {$R *.res}
 
 begin
+  {$ifdef unix}
+  SetActiveCollation('DUCET');
+  {$endif}
   Application.Initialize;
   Application.Run;
 end.