--- mstools/samples/fontview/dialogs.c	2018/08/09 18:20:51	1.1.1.2
+++ mstools/samples/fontview/dialogs.c	2018/08/09 18:21:54	1.1.1.3
@@ -114,10 +114,10 @@ int FAR PASCAL DlgEnumFontNames (lpLogFo
     hInst = (HANDLE)GetWindowWord (hwnd, GWW_HINSTANCE);
 #endif
 
-    lpFontEnumProc = MakeProcInstance(DlgEnumFontSizes, hInst);
+    lpFontEnumProc = MakeProcInstance((FARPROC)DlgEnumFontSizes, hInst);
     if (lpFontEnumProc) {
         hdc  = GetDC(hwnd);
-	EnumFonts (hdc, lpLogFont->lfFaceName, lpFontEnumProc, (LONG)lpData);
+	EnumFonts (hdc, lpLogFont->lfFaceName, (FONTENUMPROC)lpFontEnumProc, (LPARAM)lpData);
         ReleaseDC(hwnd, hdc);
         FreeProcInstance (lpFontEnumProc);
     } else {
@@ -548,11 +548,11 @@ BOOL APIENTRY EnumDlgProc(HWND hwnd, UIN
     hInst = (HANDLE)GetWindowWord (hwnd, GWW_HINSTANCE);
 #endif
 
-                lpEnumFonts = MakeProcInstance(DlgEnumFontNames, hInst);
+                lpEnumFonts = MakeProcInstance((FARPROC)DlgEnumFontNames, hInst);
                 if (lpEnumFonts) {
                     hdc  = GetDC(hwnd);
                     // The enumeration function will lock down the handle
-		    EnumFonts (hdc, NULL, lpEnumFonts, (LONG)&hFonts);
+		    EnumFonts (hdc, NULL, (FONTENUMPROC)lpEnumFonts, (LPARAM)&hFonts);
                     // The handle will come back to us properly unlocked
                     ReleaseDC(hwnd, hdc);
                     FreeProcInstance (lpEnumFonts);