diff --git a/components/turbopower_ipro/iphtml.pas b/components/turbopower_ipro/iphtml.pas
index 4dd1039a38..5cbc6924f1 100644
--- a/components/turbopower_ipro/iphtml.pas
+++ b/components/turbopower_ipro/iphtml.pas
@@ -5552,6 +5552,8 @@ begin
         fDocCharset := copy(content, i, j-i);
       end else
         fDocCharset := FindAttribute(htmlAttrCHARSET);
+      if pos('windows', Lowercase(fDocCharset)) = 1 then
+        fDocCharset := NormalizeEncoding(StringReplace(fDocCharset, 'windows', 'cp', [rfIgnoreCase]));
     end;
     {$ENDIF}
     Scheme := FindAttribute(htmlAttrSCHEME);