diff --git a/components/lazutils/winlazutf8.inc b/components/lazutils/winlazutf8.inc
index 57bad1c135..542a6d605d 100644
--- a/components/lazutils/winlazutf8.inc
+++ b/components/lazutils/winlazutf8.inc
@@ -597,6 +597,12 @@ begin
   end else
     Result:=0;
 end;
+
+function UTF8GetStandardCodePage(const stdcp: TStandardCodePageEnum
+  ): TSystemCodePage;
+begin
+  Result:=CP_UTF8;
+end;
 {$ENDIF}
 
 procedure InitLazUtf8;
@@ -635,6 +641,7 @@ begin
   widestringmanager.StrICompAnsiStringProc:=@UTF8StrICompAnsiString;
   widestringmanager.StrLCompAnsiStringProc:=@UTF8StrLCompAnsiString;
   widestringmanager.StrLICompAnsiStringProc:=@UTF8StrLICompAnsiString;
+  widestringmanager.GetStandardCodePageProc:=@UTF8GetStandardCodePage;
   // Does anyone need these two?
   //widestringmanager.StrLowerAnsiStringProc;
   //widestringmanager.StrUpperAnsiStringProc;