diff --git a/lcl/interfaces/win32/win32wsmenus.pp b/lcl/interfaces/win32/win32wsmenus.pp
index 92a5391dfb..2a1ca32ca4 100644
--- a/lcl/interfaces/win32/win32wsmenus.pp
+++ b/lcl/interfaces/win32/win32wsmenus.pp
@@ -472,15 +472,9 @@ begin
 
 {$ifdef WindowsUnicodeSupport}
   if UnicodeEnabledOS then
-  begin
-    WideBuffer := Utf8Decode(aMenuItem.Caption);
-    DrawTextW(aHDC, PWideChar(WideBuffer), length(WideBuffer), @aRect, dtFlags);
-  end
+    DrawTextW(aHDC, PWideChar(WideBuffer), length(WideBuffer), @aRect, dtFlags)
   else
-  begin
-    AnsiBuffer := Utf8ToAnsi(aMenuItem.Caption);
     DrawText(aHDC, pChar(AnsiBuffer), length(AnsiBuffer), @aRect, dtFlags);
-  end;
 {$else}
   DrawText(aHDC, pChar(aMenuItem.Caption), length(aMenuItem.Caption), @aRect, dtFlags);
 {$endif}