rmavsrc.pas

Delphi源码REAlRMSDK.rar

unit RmaVSrc;

interface

uses
  PnResult, PnTypes, RmaCore, RmaFiles, RmaPckts;

//***************************************************************************
//
//  $Id: rmavsrc.h,v 1.10 1999/11/10 09:50:44 jhug Exp $
//
//  Copyright (C) 1999 RealNetworks, Inc. All rights reserved..
//
//  http://www.real.com/devzone
//
//  This program contains proprietary
//  information of RealNetworks, Inc, and is licensed
//  subject to restrictions on use and distribution.
//
//  RealMedia Architecture FileViewSource Interfaces.
//
//

//***************************************************************************
//
//  Interface:
//
//	IRMAFileViewSourceResponse
//
//  IID_IRMAFileViewSourceResponse:
//
//	{00003501-0901-11d1-8B06-00A024406D59}
//
//

const
  IID_IRMAFileViewSourceResponse: TGUID = '{00003501-0901-11d1-8B06-00A024406D59}';
  {$EXTERNALSYM IID_IRMAFileViewSourceResponse}

type
  IRMAFileViewSourceResponse = interface (IUnknown)
  ['{00003501-0901-11d1-8B06-00A024406D59}']

    function InitDone(status: PN_RESULT): HRESULT; stdcall;
    function SourceReady(status: PN_RESULT; pSource: IRMABuffer): HRESULT; stdcall;
    function CloseDone(status: PN_RESULT): HRESULT; stdcall;

  end;
  {$EXTERNALSYM IRMAFileViewSourceResponse}

//***************************************************************************
//
//  Interface:
//
//	IRMAFileViewSource
//
//  IID_IRMAFileViewSource:
//
//	{00003500-0901-11d1-8B06-00A024406D59}
//
//

type
  SOURCE_TYPE = (RAW_SOURCE, HTML_SOURCE);
  {$EXTERNALSYM SOURCE_TYPE}

const
  IID_IRMAFileViewSource: TGUID = '{00003500-0901-11d1-8B06-00A024406D59}';
  {$EXTERNALSYM IID_IRMAFileViewSource}

type
  IRMAFileViewSource = interface (IUnknown)
  ['{00003500-0901-11d1-8B06-00A024406D59}']

    function InitViewSource(pFileObject: IRMAFileObject; pResp: IRMAFileViewSourceResponse;
      sourceType: SOURCE_TYPE; pOptions: IRMAValues): HRESULT; stdcall;
    function GetSource: HRESULT; stdcall;
    function Close: HRESULT; stdcall;

  end;
  {$EXTERNALSYM IRMAFileViewSource}

//***************************************************************************
//
//  Interface:
//
//	IRMAViewSourceURLResponse
//
//  IID_IRMAViewSourceURLResponse:
//
//	{00003505-0901-11d1-8B06-00A024406D59}
//
//

const
  IID_IRMAViewSourceURLResponse: TGUID = '{00003505-0901-11d1-8B06-00A024406D59}';
  {$EXTERNALSYM IID_IRMAViewSourceURLResponse}

type
  IRMAViewSourceURLResponse = interface (IUnknown)
  ['{00003505-0901-11d1-8B06-00A024406D59}']

    function ViewSourceURLReady(pUrl: PChar): HRESULT; stdcall;

  end;
  {$EXTERNALSYM IRMAViewSourceURLResponse}
  
//***************************************************************************
//
//  Interface:
//
//	IRMAViewSourceCommand
//
//  IID_IRMAViewSourceCommand:
//
//	{00003504-0901-11d1-8B06-00A024406D59}
//
//

const
  IID_IRMAViewSourceCommand: TGUID = '{00003504-0901-11d1-8B06-00A024406D59}';
  {$EXTERNALSYM IID_IRMAViewSourceCommand}

type
  IRMAViewSourceCommand = interface (IUnknown)
  ['{00003504-0901-11d1-8B06-00A024406D59}']

    function CanViewSource(pStream: IRMAStreamSource): BOOL; stdcall;
    function DoViewSource(pStream: IRMAStreamSource): HRESULT; stdcall;
    function GetViewSourceURL(pSource: IRMAStreamSource; pResp: IRMAViewSourceURLResponse): HRESULT; stdcall;

  end;
  {$EXTERNALSYM IRMAViewSourceCommand}

implementation

end.