32 zu 64Bit DLL

[EWeiss]

Zitat:

Edit:
Aber wenn ich das richtig sehe, exportiert deine DLL ja scheinbar eh auch eine ungemanglete Version. Kannst du mal sowohl die aktuelle 64-Bit DLL (als Kompilat) als auch den C/C++ Header mit Testprojekt hochladen? Dann würde ich mal drüberschauen.

Jo hier.
Es wird aber die MadVr benötigt damit ein Video läuft.
Aber zum kompilieren benötigt man die erst mal nicht.

Die KVideoPlayer.dll mit Unterstrich ist die in 64BIT.

Das Projekt läuft unter 32BIT. LIB in 32BIT ist dabei.
Eine 64BIT LIB habe ich noch nicht erstellen können warum auch immer das fehl schlägt.
Mein Delphi Projekt läuft ohne Probleme komplett in 64Bit inc. den ganzen Anhang (3rd Party DLL's).

Die Exports in Delphi sehen so aus.

Delphi-Quellcode:

exports
  KVideo_CloseFile,
  KVideo_CreateOverlayBaseImage,
  KVideo_DisplayModeChanged,
  KVideo_GetCapturedImage,
  KVideo_GetLastError,
  KVideo_GetMediaInfoText,
  KVideo_GetMediaProperty,
  KVideo_GetPlayerState,
  KVideo_GetStreamInfo,
  KVideo_GetStreamPosition,
  KVideo_GetVersion,
  KVideo_GetViewSize,
  KVideo_GetWorkingVR,
  KVideo_GetXySubFilter,
  KVideo_HasOverlayImage,
  KVideo_Initialize,
  KVideo_KeepAspectRatio,
  KVideo_MediaInfoServiceReady,
  KVideo_OpenFile2,
  KVideo_OpenFile,
  KVideo_Pause,
  KVideo_Play,
  KVideo_PutOverlayImage,
  KVideo_Release,
  KVideo_Repaint,
  KVideo_Resize,
  KVideo_SelectAudioStream,
  KVideo_SelectVideoStream,
  KVideo_SetLAVFiltersFolder,
  KVideo_SetPlaybackRate,
  KVideo_SetSearchMode,
  KVideo_SetStreamPosition,
  KVideo_SetVideoRenderer,
  KVideo_SetVolume,
  KVideo_ShowMediaInfo,
  KVideo_ShowXySubFilterPropertyPage,
  KVideo_Stop,
  KVideo_UpdateOverlayImage,
  KVideo_XySubFilterState,

  KVideo_CloseFile                   name 'KVideo_CloseFile@0',
  KVideo_CreateOverlayBaseImage      name 'KVideo_CreateOverlayBaseImage@24',
  KVideo_DisplayModeChanged          name 'KVideo_DisplayModeChanged@0',
  KVideo_GetCapturedImage            name 'KVideo_GetCapturedImage@4',
  KVideo_GetLastError                name 'KVideo_GetLastError@0',
  KVideo_GetMediaInfoText            name 'KVideo_GetMediaInfoText@0',
  KVideo_GetMediaProperty            name 'KVideo_GetMediaProperty@4',
  KVideo_GetPlayerState              name 'KVideo_GetPlayerState@0',
  KVideo_GetStreamInfo               name 'KVideo_GetStreamInfo@108',
  KVideo_GetStreamPosition           name 'KVideo_GetStreamPosition@0',
  KVideo_GetVersion                  name 'KVideo_GetVersion@0',
  KVideo_GetViewSize                 name 'KVideo_GetViewSize@8',
  KVideo_GetWorkingVR                name 'KVideo_GetWorkingVR@0',
  KVideo_GetXySubFilter              name 'KVideo_GetXySubFilter@4',
  KVideo_HasOverlayImage             name 'KVideo_HasOverlayImage@0',
  KVideo_Initialize                  name 'KVideo_Initialize@8',
  KVideo_KeepAspectRatio             name 'KVideo_KeepAspectRatio@4',
  KVideo_MediaInfoServiceReady       name 'KVideo_MediaInfoServiceReady@0',
  KVideo_OpenFile2                   name 'KVideo_OpenFile2@8',
  KVideo_OpenFile                    name 'KVideo_OpenFile@4',
  KVideo_Pause                       name 'KVideo_Pause@0',
  KVideo_Play                        name 'KVideo_Play@0',
  KVideo_PutOverlayImage             name 'KVideo_PutOverlayImage@24',
  KVideo_Release                     name 'KVideo_Release@0',
  KVideo_Repaint                     name 'KVideo_Repaint@0',
  KVideo_Resize                      name 'KVideo_Resize@0',
  KVideo_SelectAudioStream           name 'KVideo_SelectAudioStream@4',
  KVideo_SelectVideoStream           name 'KVideo_SelectVideoStream@4',
  KVideo_SetLAVFiltersFolder         name 'KVideo_SetLAVFiltersFolder@4',
  KVideo_SetPlaybackRate             name 'KVideo_SetPlaybackRate@4',
  KVideo_SetSearchMode               name 'KVideo_SetSearchMode@4',
  KVideo_SetStreamPosition           name 'KVideo_SetStreamPosition@8',
  KVideo_SetVideoRenderer            name 'KVideo_SetVideoRenderer@4',
  KVideo_SetVolume                   name 'KVideo_SetVolume@4',
  KVideo_ShowMediaInfo               name 'KVideo_ShowMediaInfo@0',
  KVideo_ShowXySubFilterPropertyPage name 'KVideo_ShowXySubFilterPropertyPage@4',
  KVideo_Stop                        name 'KVideo_Stop@0',
  KVideo_UpdateOverlayImage          name 'KVideo_UpdateOverlayImage@4',
  KVideo_XySubFilterState            name 'KVideo_XySubFilterState@8';

Zusätzlich nochmal die 64BIT unkomprimiert ansonsten kann man keine DEF erstellen.

gruss