瀏覽代碼
* shellapi has pshpack1 for win32. There is a structure defined after poppack(NC_ADDRESS), but that is not in this unit.
Patch from mantis #34441
git-svn-id: trunk@40020 -
marco
7 年之前
|
|
@@ -18,7 +18,11 @@
|
|
|
{$smartlink on}
|
|
|
{$endif}
|
|
|
|
|
|
-{$PACKRECORDS C}
|
|
|
+{$ifdef WIN64}
|
|
|
+ {$PACKRECORDS C}
|
|
|
+{$else}
|
|
|
+ {$PACKRECORDS 1}
|
|
|
+$endif}
|
|
|
{$calling stdcall}
|
|
|
{$mode objfpc}
|
|
|
|
