rmaslta.pas

Delphi源码REAlRMSDK.rar

unit RmaSlta;

interface

uses
  PnTypes;

//***************************************************************************
//
//  $Id: rmaslta.h,v 1.7 2000/05/05 18:32:40 jgordon Exp $
//
//  Copyright (C) 1995-1999 RealNetworks, Inc. All rights reserved.
//
//  http://www.real.com/devzone
//
//  This program contains proprietary nformation of RealNetworks, Inc,
//  and is licensed subject to restrictions on use and distribution.
//
//
//  RealMedia Architecture Interfaces for Simulated Live Transfer Agent.
//
//

//***************************************************************************
//
//  Interface:
//
//	IRMASLTA
//
//  Purpose:
//
//	Slta that works with RMA.  Simulates a live stream from a file.
//
//  IID_IRMASLTA
//
//	{00000D00-b4c8-11d0-9995-00a0248da5f0}
//
//

const
  IID_IRMASLTA: TGUID = '{00000D00-b4c8-11d0-9995-00a0248da5f0}';
  {$EXTERNALSYM IID_IRMASLTA}

type
  IRMASLTA = interface (IUnknown)
  ['{00000D00-b4c8-11d0-9995-00a0248da5f0}']

    //***********************************************************************
    //	Method:
    //	    IRMASLTA::Connect
    //	Purpose:
    //	    Connects the slta to a server.
    //

    function Connect(host: PChar; uPort: UINT16; username, passwd, livefile: PChar): HRESULT; stdcall;

    //***********************************************************************
    // Method:
    //    IRMASLTA::SetTAC
    // Purpose:
    //    Set the TAC info for the stream. This method MUST be called
    // before Encode to have any effect.
    //

    function SetTAC(Title, Author, Copyright: PChar): HRESULT; stdcall;

    //***********************************************************************
    // Method:
    //    IRMASLTA:Encode
    // Purpose:
    //    Start encoding the file to the server.
    //

    function Encode(filename: PChar): HRESULT; stdcall;

    //***********************************************************************
    //Method:
    //    IRMASLTA:Disconnect
    //Purpose:
    //    Disconnect the slta from the server.
    //

    function Disconnect: HRESULT; stdcall;


    //***********************************************************************
    //Method:
    //    IRMASLTA::SetTargetBandwidth
    //Purpose:
    //    Sets the target bw for rule subscription.
    //

    function SetTargetBandwidth(ulTargetBW: UINT32): HRESULT; stdcall;

  end;
  {$EXTERNALSYM IRMASLTA}

//***************************************************************************
//
//  Interface:
//
//	IRMASltaEvent
//
//  Purpose:
//
//	Allows events to be sent through an SLTA stream
//
//  IID_IRMASltaEvent
//
//	{00000D01-b4c8-11d0-9995-00a0248da5f0}
//
//

const
  IID_IRMASltaEvent: TGUID = '{00000D01-b4c8-11d0-9995-00a0248da5f0}';
  {$EXTERNALSYM IID_IRMASltaEvent}

//
// Valid RMA event IDs.
//

const
  RMA_EVENT_TITLE             = $0000;
  {$EXTERNALSYM RMA_EVENT_TITLE}
  RMA_EVENT_AUTHOR            = $0001;
  {$EXTERNALSYM RMA_EVENT_AUTHOR}
  RMA_EVENT_COPYRIGHT         = $0002;
  {$EXTERNALSYM RMA_EVENT_COPYRIGHT}
  RMA_EVENT_SERVER_ALERT      = $0003;
  {$EXTERNALSYM RMA_EVENT_SERVER_ALERT}
  RMA_EVENT_PROGRESS_MESSAGE  = $0004;
  {$EXTERNALSYM RMA_EVENT_PROGRESS_MESSAGE}
  RMA_EVENT_TEXT_SIZE         = $0010;
  {$EXTERNALSYM RMA_EVENT_TEXT_SIZE}
  RMA_EVENT_TEXT              = $0011;
  {$EXTERNALSYM RMA_EVENT_TEXT}
  RMA_EVENT_TEXT_ANCHOR       = $0012;
  {$EXTERNALSYM RMA_EVENT_TEXT_ANCHOR}
  RMA_EVENT_BROWSER_OPEN_URL  = $0020;
  {$EXTERNALSYM RMA_EVENT_BROWSER_OPEN_URL}
  RMA_EVENT_TOPIC             = $0030;
  {$EXTERNALSYM RMA_EVENT_TOPIC}
  RMA_EVENT_EMPTY             = $0200;
  {$EXTERNALSYM RMA_EVENT_EMPTY}
  RMA_EVENT_CUSTOM_BEGIN      = $0400;
  {$EXTERNALSYM RMA_EVENT_CUSTOM_BEGIN}

type
  IRMASltaEvent = interface (IUnknown)
  ['{00000D01-b4c8-11d0-9995-00a0248da5f0}']

    //***********************************************************************
    // Method:
    //	    IRMASltaEvent::SetEvent
    // Purpose:
    //	    Sends an event to the slta stream.
    //       nEventID must be one of the valid event IDs defined above.
    //

    function SetEvent(nEventID: UINT16; szEventText: PChar): HRESULT; stdcall;

    //***********************************************************************
    // Method:
    //	    IRMASltaEvent::SetRepeatedEvent
    // Purpose:
    //	    Sets an event to be repeated every ulFrequency milliseconds.
    //       nEventID must be one of the valid event IDs defined above.
    //

    function SetRepeatedEvent(nEventID: UINT16; szEventText: PChar; ulFrequency: UINT32): HRESULT; stdcall;

  end;
  {$EXTERNALSYM IRMASltaEvent}

implementation

end.