diff --git a/lcl/interfaces/carbon/carbonwinapi.inc b/lcl/interfaces/carbon/carbonwinapi.inc
index dc7da2136b..a51fd94537 100644
--- a/lcl/interfaces/carbon/carbonwinapi.inc
+++ b/lcl/interfaces/carbon/carbonwinapi.inc
@@ -819,7 +819,7 @@ function TCarbonWidgetSet.EnumFontFamiliesEx(DC: HDC; lpLogFont: PLogFont;
 var
   FamilyCount: LongWord;
   FamilyListPtr, PFamily: ^ATSUFontID;
-  FontName: UTF8String;
+  FontName: String;
   EnumLogFont: TEnumLogFontEx;
   Metric: TNewTextMetricEx;
   FontType, I: Integer;
diff --git a/lcl/interfaces/cocoa/cocoaproc.pas b/lcl/interfaces/cocoa/cocoaproc.pas
index 90b9e51453..69ec12f891 100644
--- a/lcl/interfaces/cocoa/cocoaproc.pas
+++ b/lcl/interfaces/cocoa/cocoaproc.pas
@@ -511,7 +511,7 @@ end;
 function CarbonFontIDToFontName(ID: ATSUFontID): String;
 var
   NameLength: LongWord;
-  FontName: UTF8String;
+  FontName: String;
 const
   SName = 'CarbonFontIDToFontName';
 begin
diff --git a/lcl/interfaces/win32/win32winapi.inc b/lcl/interfaces/win32/win32winapi.inc
index 116122481f..a3a4b22575 100644
--- a/lcl/interfaces/win32/win32winapi.inc
+++ b/lcl/interfaces/win32/win32winapi.inc
@@ -2054,7 +2054,7 @@ end;
 function TWin32WidgetSet.GetTextExtentExPoint(DC: HDC; Str: PChar;
   Count, MaxWidth: Integer; MaxCount, PartialWidths: PInteger; var Size: TSize): Boolean;
 var
-  LCLStr: utf8string;
+  LCLStr: string;
   s: AnsiString;
   w: WideString;
 begin