From efd27b4488a3ba35a6bf2899440b0dd0b9daa4db Mon Sep 17 00:00:00 2001 From: vincents Date: Wed, 25 May 2011 13:43:46 +0000 Subject: [PATCH] win32 interface: fix compilation on win64 by using the callback declaration from the windows unit, because the record declaration is used from the windows unit too. In fpc < 2.5.1 the windows unit still contains a bug and the callback from the commdlg is not type compatible. git-svn-id: trunk@30897 - --- lcl/interfaces/win32/win32wsdialogs.pp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lcl/interfaces/win32/win32wsdialogs.pp b/lcl/interfaces/win32/win32wsdialogs.pp index 3d7d2e185b..b79dd01315 100644 --- a/lcl/interfaces/win32/win32wsdialogs.pp +++ b/lcl/interfaces/win32/win32wsdialogs.pp @@ -701,7 +701,7 @@ begin {$endif} nMaxFile := FileNameBufferLen + 1; // Size in TCHARs - lpfnHook := LPOFNHOOKPROC(@OpenFileDialogCallBack); + lpfnHook := Windows.LPOFNHOOKPROC(@OpenFileDialogCallBack); Flags := GetFlagsFromOptions(AOpenDialog.Options); New(DialogRec); // new initializes the filename fields, because ansistring and widestring