Drag and Drop Component Suite 5.2 für XE4

[Wishmaster]

Hi. ich habe mir die XE4 zugelegt
nun versuche ich verschiedene Komponente zu installieren.
eine davon ist die Drag and Drop Component Suite 5.2 die ich schon mal für XE2 angepasst hatte.
bei XE4 bekomme ich zwei Fatal Errors die ich mir nicht ganz erklären kann

erster Fehler "Incompatible types"

Delphi-Quellcode:

var
  URLMONDLL: THandle = 0;
  _CopyStgMedium:function(const cstgmedSrc: TStgMedium; var stgmedDest: TStgMedium): HResult; stdcall = nil;

function CopyStgMedium(const SrcMedium: TStgMedium; var DstMedium: TStgMedium): boolean;
begin
 if (URLMONDLL = 0) then
  begin
    URLMONDLL := LoadLibrary('URLMON.DLL');
    if (URLMONDLL <> 0) then
      @_CopyStgMedium := GetProcAddress(URLMONDLL, 'CopyStgMedium');
  end;

  if (@_CopyStgMedium = nil) then              // <<< [dcc32 Error] DragDrop.pas(2466): E2008 Incompatible types
   raise Exception.Create(sNoCopyStgMedium);

  Result := (Succeeded(_CopyStgMedium(SrcMedium, DstMedium)));
end;

hat jemand diese komponente erfolgreich in XE4 installieren können?

by the way ich lade die bass.dll auf dieselbe weise und ohne probleme

thx.