Unit 'PasVulkan.VirtualReality.OpenVR' Package
[Overview][Constants][Types][Procedures and functions][Variables][Index] [#pl_pasvulkan]

TVR_IVRCompositor_FnTable

Declaration

Source position: PasVulkan.VirtualReality.OpenVR.pas line 2262

type TVR_IVRCompositor_FnTable = record

  SetTrackingSpace: procedure(

  

  eOrigin: TETrackingUniverseOrigin

);

  GetTrackingSpace: function: TETrackingUniverseOrigin;

  

  WaitGetPoses: function(

  

  pRenderPoseArray: PTrackedDevicePose_t;

  unRenderPoseArrayCount: TpovrUInt32;

  pGamePoseArray: PTrackedDevicePose_t;

  unGamePoseArrayCount: TpovrUInt32

):TEVRCompositorError;

  GetLastPoses: function(

  

  pRenderPoseArray: PTrackedDevicePose_t;

  unRenderPoseArrayCount: TpovrUInt32;

  pGamePoseArray: PTrackedDevicePose_t;

  unGamePoseArrayCount: TpovrUInt32

):TEVRCompositorError;

  GetLastPoseForTrackedDeviceIndex: function(

  

  unDeviceIndex: TTrackedDeviceIndex_t;

  pOutputPose: PTrackedDevicePose_t;

  pOutputGamePose: PTrackedDevicePose_t

):TEVRCompositorError;

  Submit: function(

  

  eEye: TEVREye;

  pTexture: PTexture_t;

  pBounds: PVRTextureBounds_t;

  nSubmitFlags: TEVRSubmitFlags

):TEVRCompositorError;

  ClearLastSubmittedFrame: procedure;

  

  PostPresentHandoff: procedure;

  

  GetFrameTiming: function(

  

  pTiming: PCompositor_FrameTiming;

  unFramesAgo: TpovrUInt32

):Tbool;

  GetFrameTimings: function(

  

  pTiming: PCompositor_FrameTiming;

  nFrames: TpovrUInt32

):TpovrUInt32;

  GetFrameTimeRemaining: function: single;

  

  GetCumulativeStats: procedure(

  

  pStats: PCompositor_CumulativeStats;

  nStatsSizeInBytes: TpovrUInt32

);

  FadeToColor: procedure(

  

  fSeconds: single;

  fRed: single;

  fGreen: single;

  fBlue: single;

  fAlpha: single;

  bBackground: Tbool

);

  GetCurrentFadeColor: function(

  

  bBackground: Tbool

):THmdColor_t;

  FadeGrid: procedure(

  

  fSeconds: single;

  bFadeIn: Tbool

);

  GetCurrentGridAlpha: function: single;

  

  SetSkyboxOverride: function(

  

  pTextures: PTexture_t;

  unTextureCount: TpovrUInt32

):TEVRCompositorError;

  ClearSkyboxOverride: procedure;

  

  CompositorBringToFront: procedure;

  

  CompositorGoToBack: procedure;

  

  CompositorQuit: procedure;

  

  IsFullscreen: function: Tbool;

  

  GetCurrentSceneFocusProcess: function: TpovrUInt32;

  

  GetLastFrameRenderer: function: TpovrUInt32;

  

  CanRenderScene: function: Tbool;

  

  ShowMirrorWindow: procedure;

  

  HideMirrorWindow: procedure;

  

  IsMirrorWindowVisible: function: Tbool;

  

  CompositorDumpImages: procedure;

  

  ShouldAppRenderWithLowResources: function: Tbool;

  

  ForceInterleavedReprojectionOn: procedure(

  

  bOverride: Tbool

);

  ForceReconnectProcess: procedure;

  

  SuspendRendering: procedure(

  

  bSuspend: Tbool

);

  GetMirrorTextureD3D11: function(

  

  eEye: TEVREye;

  pD3D11DeviceOrResource: pointer;

  ppD3D11ShaderResourceView: Ppointer

):TEVRCompositorError;

  ReleaseMirrorTextureD3D11: procedure(

  

  pD3D11ShaderResourceView: pointer

);

  GetMirrorTextureGL: function(

  

  eEye: TEVREye;

  pglTextureId: PglUInt_t;

  pglSharedTextureHandle: PglSharedTextureHandle_t

):TEVRCompositorError;

  ReleaseSharedGLTexture: function(

  

  glTextureId: TglUInt_t;

  glSharedTextureHandle: TglSharedTextureHandle_t

):Tbool;

  LockGLSharedTextureForAccess: procedure(

  

  glSharedTextureHandle: TglSharedTextureHandle_t

);

  UnlockGLSharedTextureForAccess: procedure(

  

  glSharedTextureHandle: TglSharedTextureHandle_t

);

  GetVulkanInstanceExtensionsRequired: function(

  

  pchValue: PAnsiChar;

  unBufferSize: TpovrUInt32

):TpovrUInt32;

  GetVulkanDeviceExtensionsRequired: function(

  

  pPhysicalDevice: TVkPhysicalDevice;

  pchValue: PAnsiChar;

  unBufferSize: TpovrUInt32

):TpovrUInt32;

  SetExplicitTimingMode: procedure(

  

  eTimingMode: TEVRCompositorTimingMode

);

  SubmitExplicitTimingData: function: TEVRCompositorError;

  

end;



CT Web help

CodeTyphon Studio