diff --git a/lcl/interfaces/qt/qtwinapi.inc b/lcl/interfaces/qt/qtwinapi.inc
index 605f367104..a715878df4 100644
--- a/lcl/interfaces/qt/qtwinapi.inc
+++ b/lcl/interfaces/qt/qtwinapi.inc
@@ -5259,9 +5259,6 @@ var
   //OkStr: WideString;
   AParent: QWidgetH;
   DialogType, DefButton, DefIcon : Cardinal;
-  {$IFNDEF QTDIALOGSUSEHTMLTEXT}
-  AQtString: QStringH;
-  {$ENDIF}
 begin
   Result := 0;
   Str := lpText;
@@ -5276,14 +5273,6 @@ begin
   DefIcon := (uType and $000000FF) shr 4;
 
 
-  {$IFNDEF QTDIALOGSUSEHTMLTEXT}
-  //issue #37805 - we must show plain text.
-  AQtString := QString_Create(PWideString(@Str));
-  QString_toHtmlEscaped(AQtString, @Str);
-  QString_destroy(AQtString);
-  {$ENDIF}
-
-
   case IconToMessageType(DefIcon) of
     QMessageBoxInformation: Result := QMessageBox_information(AParent, @TitleStr, @Str, ButtonToQtButtons(DialogType), ButtonToQtDefButton(DialogType, DefButton));
     QMessageBoxQuestion: Result := QMessageBox_question(AParent, @TitleStr, @Str, ButtonToQtButtons(DialogType), ButtonToQtDefButton(DialogType, DefButton));