diff --git a/lcl/interfaces/nogui/noguiint.pp b/lcl/interfaces/nogui/noguiint.pp
index a0cce4524a..aa3ef0cb77 100644
--- a/lcl/interfaces/nogui/noguiint.pp
+++ b/lcl/interfaces/nogui/noguiint.pp
@@ -56,6 +56,7 @@ type
     procedure AppRestore; override;
     procedure AppBringToFront; override;
     procedure AppSetTitle(const ATitle: string); override;
+    function EnumFontFamiliesEx(DC: HDC; lpLogFont: PLogFont; Callback: FontEnumExProc; Lparam: LParam; Flags: dword): longint; override;
   public
     constructor Create; override;
     destructor Destroy; override;
@@ -127,6 +128,12 @@ begin
 
 end;
 
+function TNoGUIWidgetSet.EnumFontFamiliesEx(DC: HDC; lpLogFont: PLogFont;
+  Callback: FontEnumExProc; Lparam: LParam; Flags: dword): longint;
+begin
+  Result:=0;
+end;
+
 constructor TNoGUIWidgetSet.Create;
 begin
   inherited Create;