diff --git a/dlls/gdiplus/font.c b/dlls/gdiplus/font.c
index d321ba9a304..77ee2742908 100644
--- a/dlls/gdiplus/font.c
+++ b/dlls/gdiplus/font.c
@@ -75,6 +75,16 @@ GpStatus WINGDIPAPI GdipCreateFontFromLogfontA(HDC hdc,
     return Ok;
 }
 
+GpStatus WINGDIPAPI GdipDeleteFont(GpFont* font)
+{
+    if(!font)
+        return InvalidParameter;
+
+    GdipFree(font);
+
+    return Ok;
+}
+
 /* FIXME: use graphics */
 GpStatus WINGDIPAPI GdipGetLogFontW(GpFont *font, GpGraphics *graphics,
     LOGFONTW *lfw)
diff --git a/dlls/gdiplus/gdiplus.spec b/dlls/gdiplus/gdiplus.spec
index c2b90420c52..b4c0c36f1a9 100644
--- a/dlls/gdiplus/gdiplus.spec
+++ b/dlls/gdiplus/gdiplus.spec
@@ -140,7 +140,7 @@
 @ stub GdipDeleteCachedBitmap
 @ stdcall GdipDeleteCustomLineCap(ptr)
 @ stub GdipDeleteEffect
-@ stub GdipDeleteFont
+@ stdcall GdipDeleteFont(ptr)
 @ stub GdipDeleteFontFamily
 @ stdcall GdipDeleteGraphics(ptr)
 @ stdcall GdipDeleteMatrix(ptr)
diff --git a/include/gdiplusflat.h b/include/gdiplusflat.h
index d2c6db80119..ed11b4a5923 100644
--- a/include/gdiplusflat.h
+++ b/include/gdiplusflat.h
@@ -241,6 +241,7 @@ GpStatus WINGDIPAPI GdipSetImageAttributesWrapMode(GpImageAttributes*,WrapMode,
 
 GpStatus WINGDIPAPI GdipCreateFontFromLogfontA(HDC,GDIPCONST LOGFONTA*,GpFont**);
 GpStatus WINGDIPAPI GdipCreateFontFromLogfontW(HDC,GDIPCONST LOGFONTW*,GpFont**);
+GpStatus WINGDIPAPI GdipDeleteFont(GpFont*);
 GpStatus WINGDIPAPI GdipGetLogFontW(GpFont*,GpGraphics*,LOGFONTW*);
 
 #ifdef __cplusplus