mediaplayer_tlb.pas

ATViewer is a component for Delphi/C++Builder, which allows to view files of various types. There is

    property DisplaySize: MPDisplaySizeConstants dispid 1032;
    property InvokeURLs: WordBool dispid 1020;
    property BaseURL: WideString dispid 1082;
    property DefaultFrame: WideString dispid 1083;
    property HasError: WordBool readonly dispid 1065;
    property ErrorDescription: WideString readonly dispid 1066;
    property ErrorCode: Integer readonly dispid 1067;
    property AnimationAtStart: WordBool dispid 1045;
    property TransparentAtStart: WordBool dispid 1022;
    property Volume: Integer dispid 19;
    property Balance: Integer dispid 20;
    property ReadyState: MPReadyStateConstants readonly dispid -525;
    property SelectionStart: Double dispid 15;
    property SelectionEnd: Double dispid 16;
    property ShowDisplay: WordBool dispid 22;
    property ShowControls: WordBool dispid 23;
    property ShowPositionControls: WordBool dispid 24;
    property ShowTracker: WordBool dispid 26;
    property EnablePositionControls: WordBool dispid 27;
    property EnableTracker: WordBool dispid 29;
    property Enabled: WordBool dispid -514;
    property DisplayForeColor: VB_OLE_COLOR dispid 36;
    property DisplayBackColor: VB_OLE_COLOR dispid 37;
    property DisplayMode: MPDisplayModeConstants dispid 32;
    property VideoBorder3D: WordBool dispid 1103;
    property VideoBorderWidth: Integer dispid 1101;
    property VideoBorderColor: VB_OLE_COLOR dispid 1102;
    property ShowGotoBar: WordBool dispid 1088;
    property ShowStatusBar: WordBool dispid 1086;
    property ShowCaptioning: WordBool dispid 1084;
    property ShowAudioControls: WordBool dispid 1107;
    property CaptioningID: WideString dispid 1085;
    property Mute: WordBool dispid 1089;
    property CanPreview: WordBool readonly dispid 1093;
    property PreviewMode: WordBool dispid 1091;
    property HasMultipleItems: WordBool readonly dispid 1094;
    property Language: Integer dispid 1095;
    property AudioStream: Integer dispid 1096;
    property SAMIStyle: WideString dispid 1097;
    property SAMILang: WideString dispid 1098;
    property SAMIFileName: WideString dispid 1099;
    property StreamCount: Integer readonly dispid 1100;
    property ClientId: WideString readonly dispid 1106;
    property ConnectionSpeed: Integer readonly dispid 1113;
    property AutoSize: WordBool dispid -500;
    property EnableFullScreenControls: WordBool dispid 1108;
    property ActiveMovie: IDispatch readonly dispid 1109;
    property NSPlay: IDispatch readonly dispid 1110;
    property WindowlessVideo: WordBool dispid 1112;
    procedure Play; dispid 2001;
    procedure Stop; dispid 2003;
    procedure Pause; dispid 2002;
    function  GetMarkerTime(MarkerNum: Integer): Double; dispid 2004;
    function  GetMarkerName(MarkerNum: Integer): WideString; dispid 2005;
    procedure AboutBox; dispid -552;
    function  GetCodecInstalled(CodecNum: Integer): WordBool; dispid 2007;
    function  GetCodecDescription(CodecNum: Integer): WideString; dispid 2008;
    function  GetCodecURL(CodecNum: Integer): WideString; dispid 2009;
    function  GetMoreInfoURL(MoreInfoType: MPMoreInfoType): WideString; dispid 2011;
    function  GetMediaInfoString(MediaInfoType: MPMediaInfoType): WideString; dispid 2016;
    procedure Cancel; dispid 2006;
    procedure Open(const bstrFileName: WideString); dispid 2010;
    function  IsSoundCardEnabled: WordBool; dispid 53;
    procedure Next; dispid 2023;
    procedure Previous; dispid 2022;
    procedure StreamSelect(StreamNum: Integer); dispid 2015;
    procedure FastForward; dispid 2024;
    procedure FastReverse; dispid 2025;
    function  GetStreamName(StreamNum: Integer): WideString; dispid 2019;
    function  GetStreamGroup(StreamNum: Integer): Integer; dispid 2020;
    function  GetStreamSelected(StreamNum: Integer): WordBool; dispid 2021;
  end;

// *********************************************************************//
// Interface: IMediaPlayer2
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {20D4F5E0-5475-11D2-9774-0000F80855E6}
// *********************************************************************//
  IMediaPlayer2 = interface(IMediaPlayer)
    ['{20D4F5E0-5475-11D2-9774-0000F80855E6}']
    function  Get_DVD: IMediaPlayerDvd; safecall;
    function  GetMediaParameter(EntryNum: Integer; const bstrParameterName: WideString): WideString; safecall;
    function  GetMediaParameterName(EntryNum: Integer; Index: Integer): WideString; safecall;
    function  Get_EntryCount: Integer; safecall;
    function  GetCurrentEntry: Integer; safecall;
    procedure SetCurrentEntry(EntryNumber: Integer); safecall;
    procedure ShowDialog(mpDialogIndex: MPShowDialogConstants); safecall;
    property DVD: IMediaPlayerDvd read Get_DVD;
    property EntryCount: Integer read Get_EntryCount;
  end;

// *********************************************************************//
// DispIntf:  IMediaPlayer2Disp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {20D4F5E0-5475-11D2-9774-0000F80855E6}
// *********************************************************************//
  IMediaPlayer2Disp = dispinterface
    ['{20D4F5E0-5475-11D2-9774-0000F80855E6}']
    property DVD: IMediaPlayerDvd readonly dispid 1500;
    function  GetMediaParameter(EntryNum: Integer; const bstrParameterName: WideString): WideString; dispid 2028;
    function  GetMediaParameterName(EntryNum: Integer; Index: Integer): WideString; dispid 2029;
    property EntryCount: Integer readonly dispid 2030;
    function  GetCurrentEntry: Integer; dispid 2031;
    procedure SetCurrentEntry(EntryNumber: Integer); dispid 2032;
    procedure ShowDialog(mpDialogIndex: MPShowDialogConstants); dispid 2033;
    property CurrentPosition: Double dispid 1027;
    property Duration: Double readonly dispid 1003;
    property ImageSourceWidth: Integer readonly dispid 1001;
    property ImageSourceHeight: Integer readonly dispid 1002;
    property MarkerCount: Integer readonly dispid 1010;
    property CanScan: WordBool readonly dispid 1011;
    property CanSeek: WordBool readonly dispid 1012;
    property CanSeekToMarkers: WordBool readonly dispid 1047;
    property CurrentMarker: Integer dispid 1029;
    property FileName: WideString dispid 1026;
    property SourceLink: WideString readonly dispid 1009;
    property CreationDate: TDateTime readonly dispid 1036;
    property ErrorCorrection: WideString readonly dispid 1038;
    property Bandwidth: Integer readonly dispid 1037;
    property SourceProtocol: Integer readonly dispid 1060;
    property ReceivedPackets: Integer readonly dispid 1039;
    property RecoveredPackets: Integer readonly dispid 1040;
    property LostPackets: Integer readonly dispid 1041;
    property ReceptionQuality: Integer readonly dispid 1042;
    property BufferingCount: Integer readonly dispid 1043;
    property IsBroadcast: WordBool readonly dispid 1058;
    property BufferingProgress: Integer readonly dispid 1080;
    property ChannelName: WideString readonly dispid 1050;
    property ChannelDescription: WideString readonly dispid 1051;
    property ChannelURL: WideString readonly dispid 1052;
    property ContactAddress: WideString readonly dispid 1053;
    property ContactPhone: WideString readonly dispid 1054;
    property ContactEmail: WideString readonly dispid 1055;
    property BufferingTime: Double dispid 1070;
    property AutoStart: WordBool dispid 1017;
    property AutoRewind: WordBool dispid 1018;
    property Rate: Double dispid 1028;
    property SendKeyboardEvents: WordBool dispid 1013;
    property SendMouseClickEvents: WordBool dispid 1014;
    property SendMouseMoveEvents: WordBool dispid 1015;
    property PlayCount: Integer dispid 1030;
    property ClickToPlay: WordBool dispid 1025;
    property AllowScan: WordBool dispid 1035;
    property EnableContextMenu: WordBool dispid 1021;
    property CursorType: Integer dispid 1044;
    property CodecCount: Integer readonly dispid 1057;
    property AllowChangeDisplaySize: WordBool dispid 1056;
    property IsDurationValid: WordBool readonly dispid 1059;
    property OpenState: Integer readonly dispid 1061;
    property SendOpenStateChangeEvents: WordBool dispid 1062;
    property SendWarningEvents: WordBool dispid 1063;
    property SendErrorEvents: WordBool dispid 1064;
    property PlayState: MPPlayStateConstants readonly dispid 1068;
    property SendPlayStateChangeEvents: WordBool dispid 1069;
    property DisplaySize: MPDisplaySizeConstants dispid 1032;
    property InvokeURLs: WordBool dispid 1020;
    property BaseURL: WideString dispid 1082;
    property DefaultFrame: WideString dispid 1083;
    property HasError: WordBool readonly dispid 1065;
    property ErrorDescription: WideString readonly dispid 1066;
    property ErrorCode: Integer readonly dispid 1067;
    property AnimationAtStart: WordBool dispid 1045;
    property TransparentAtStart: WordBool dispid 1022;
    property Volume: Integer dispid 19;
    property Balance: Integer dispid 20;
    property ReadyState: MPReadyStateConstants readonly dispid -525;
    property SelectionStart: Double dispid 15;
    property SelectionEnd: Double dispid 16;
    property ShowDisplay: WordBool dispid 22;
    property ShowControls: WordBool dispid 23;
    property ShowPositionControls: WordBool dispid 24;
    property ShowTracker: WordBool dispid 26;
    property EnablePositionControls: WordBool dispid 27;
    property EnableTracker: WordBool dispid 29;
    property Enabled: WordBool dispid -514;
    property DisplayForeColor: VB_OLE_COLOR dispid 36;
    property DisplayBackColor: VB_OLE_COLOR dispid 37;
    property DisplayMode: MPDisplayModeConstants dispid 32;
    property VideoBorder3D: WordBool dispid 1103;
    property VideoBorderWidth: Integer dispid 1101;
    property VideoBorderColor: VB_OLE_COLOR dispid 1102;
    property ShowGotoBar: WordBool dispid 1088;
    property ShowStatusBar: WordBool dispid 1086;
    property ShowCaptioning: WordBool dispid 1084;
    property ShowAudioControls: WordBool dispid 1107;
    property CaptioningID: WideString dispid 1085;
    property Mute: WordBool dispid 1089;
    property CanPreview: WordBool readonly dispid 1093;
    property PreviewMode: WordBool dispid 1091;
    property HasMultipleItems: WordBool readonly dispid 1094;
    property Language: Integer dispid 1095;
    property AudioStream: Integer dispid 1096;
    property SAMIStyle: WideString dispid 1097;
    property SAMILang: WideString dispid 1098;
    property SAMIFileName: WideString dispid 1099;
    property StreamCount: Integer readonly dispid 1100;
    property ClientId: WideString readonly dispid 1106;
    property ConnectionSpeed: Integer readonly dispid 1113;
    property AutoSize: WordBool dispid -500;
    property EnableFullScreenControls: WordBool dispid 1108;
    property ActiveMovie: IDispatch readonly dispid 1109;
    property NSPlay: IDispatch readonly dispid 1110;
    property WindowlessVideo: WordBool dispid 1112;
    procedure Play; dispid 2001;
    procedure Stop; dispid 2003;
    procedure Pause; dispid 2002;
    function  GetMarkerTime(MarkerNum: Integer): Double; dispid 2004;
    function  GetMarkerName(MarkerNum: Integer): WideString; dispid 2005;
    procedure AboutBox; dispid -552;
    function  GetCodecInstalled(CodecNum: Integer): WordBool; dispid 2007;
    function  GetCodecDescription(CodecNum: Integer): WideString; dispid 2008;
    function  GetCodecURL(CodecNum: Integer): WideString; dispid 2009;
    function  GetMoreInfoURL(MoreInfoType: MPMoreInfoType): WideString; dispid 2011;
    function  GetMediaInfoString(MediaInfoType: MPMediaInfoType): WideString; dispid 2016;
    procedure Cancel; dispid 2006;
    procedure Open(const bstrFileName: WideString); dispid 2010;
    function  IsSoundCardEnabled: WordBool; dispid 53;
    procedure Next; dispid 2023;
    procedure Previous; dispid 2022;
    procedure StreamSelect(StreamNum: Integer); dispid 2015;
    procedure FastForward; dispid 2024;
    procedure FastReverse; dispid 2025;
    function  GetStreamName(StreamNum: Integer): WideString; dispid 2019;
    function  GetStreamGroup(StreamNum: Integer): Integer; dispid 2020;
    function  GetStreamSelected(StreamNum: Integer): WordBool; dispid 2021;
  end;

// *********************************************************************//
// Interface: IMediaBindStream
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {920F0DE3-91C5-11D2-828F-00C04FC99D4E}
// *********************************************************************//
  IMediaBindStream = interface(IDispatch)
    ['{920F0DE3-91C5-11D2-828F-00C04FC99D4E}']
    procedure LoadMoniker(const bszTransferContext: WideString; const bszUrl: WideString); safecall;
  end;

// *********************************************************************//
// DispIntf:  IMediaBindStreamDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {920F0DE3-91C5-11D2-828F-00C04FC99D4E}
// *********************************************************************//
  IMediaBindStreamDisp = dispinterface
    ['{920F0DE3-91C5-11D2-828F-00C04FC99D4E}']
    procedure LoadMoniker(const bszTransferContext: WideString; const bszUrl: WideString); dispid 8004;