home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / TURBO_P / TPW_MMEX.ZIP / MMP.PAS next >
Encoding:
Pascal/Delphi Source File  |  1991-12-18  |  4.9 KB  |  101 lines
  1. {***********************************************************************}
  2. {                                                                       }
  3. {  Microsoft Multimedia Player Function Prototypes                      }
  4. {  Links to the mmp.dll in the Microsoft Multimedia Extensions          }
  5. {  Converted by Steve Milton @ ISOMEDIA, Inc. for use with              }
  6. {  Borland's Turbo Pascal for Windows                                   }
  7. {                                                                       }
  8. {  These units are provided as-is with no warranty.  Any damages to     }
  9. {  equipment, peripherals, software, or anything else is solely the     }
  10. {  responsibility of the user.                                          }
  11. {                                                                       }
  12. {  Microsoft Multimedia Extensions is a trademark of Microsoft, Corp.   }
  13. {  Turbo Pascal for Windows is a trademakr of Borland International     }
  14. {                                                                       }
  15. {***********************************************************************}
  16.  
  17. unit MMP;
  18.  
  19. INTERFACE
  20.  
  21. uses WinTypes, MMPTYPES;
  22.  
  23. FUNCTION mmpOpen(hWndStage: HWND; wOptions: WORD) : MMPID;
  24. FUNCTION mmpClose(idMovie: MMPID; wOptions: WORD) : BOOLEAN;
  25. FUNCTION mmpStartAnimating(idMovie: MMPID; wOptions: WORD) : BOOLEAN;
  26. FUNCTION mmpAnimate(idMovie: MMPID) : INTEGER;
  27. FUNCTION mmpAnimStatus(idMovie: MMPID) : INTEGER;
  28. FUNCTION mmpStopAnimating(idMovie: MMPID; wOptions: WORD) : BOOLEAN;
  29. FUNCTION mmpGoToFrame(idMovie: MMPID; sNewFrame: SHORTINT;
  30.          wOptions: WORD) : BOOLEAN;
  31. FUNCTION mmpUpdate(idMovie: MMPID; hDC: HDC; lprectArea: LP_RECT) : BOOLEAN;
  32. FUNCTION mmpSetFrameHook(idMovie: MMPID;
  33.          lpFrameHook: LP_MMPFRAMEHOOK) : BOOLEAN;
  34. FUNCTION mmpGetFrameHook(idMovie: MMPID) : LP_MMPFRAMEHOOK;
  35. FUNCTION mmpGetFileInfo(lpszFileName: POINTER;
  36.          lpInfo: LP_MMPMOVIEINFO) : BOOLEAN;
  37. FUNCTION mmpGetMovieInfo(idMovie: MMPID; lpInfo: LP_MMPMOVIEINFO) : BOOLEAN;
  38. FUNCTION mmpLoadFile(idMovie: MMPID; lpszFileName: POINTER;
  39.          wOptions: WORD) : BOOLEAN;
  40. FUNCTION mmpFreeFile(idMovie: MMPID; wOptions: WORD) : BOOLEAN;
  41. FUNCTION mmpFileLoaded(idMovie: MMPID) : BOOLEAN;
  42. FUNCTION mmpError(idMovie: MMPID; szErrorString: POINTER;
  43.          wLen: WORD) : SHORTINT;
  44. FUNCTION mmpAnimStopped(idMovie: MMPID) : BOOLEAN;
  45. FUNCTION mmpGetCurFrame(idMovie: MMPID) : SHORTINT;
  46. FUNCTION mmpGetMute(idMovie: MMPID) : BOOLEAN;
  47. FUNCTION mmpSetMute(idMovie: MMPID; bMuteOn: BOOLEAN) : BOOLEAN;
  48. FUNCTION mmpSetStage(idMovie: MMPID; hWndStage: HWND;
  49.          lprectStage: LP_RECT; wOptions: WORD) : BOOLEAN;
  50. FUNCTION mmpGetStage(idMovie: MMPID; hWndStage : HWND;
  51.          lprectStage: LP_RECT; lpwOptions: LP_WORD) : BOOLEAN;
  52. FUNCTION mmpSetRepeat(idMovie: MMPID; bbRepeat: BOOLEAN) : BOOLEAN;
  53. FUNCTION mmpGetRepeat(idMovie: MMPID) : BOOLEAN;
  54. FUNCTION mmpSetDC(idMovie: MMPID; theDC: HDC) : BOOLEAN;
  55. FUNCTION mmpGetPaletteHandle(idMovie: MMPID) : HPALETTE;
  56. FUNCTION mmpSetTempo(idMovie: MMPID; sTempo: SHORTINT) : BOOLEAN;
  57. FUNCTION mmpGetTempo(idMovie: MMPID) : SHORTINT;
  58. FUNCTION mmpGetInfo(idMovie: MMPID; nIndex: INTEGER; lpData: LPVOID;
  59.          wLen: WORD) : BOOLEAN;
  60. FUNCTION mmpSetInfo(idMovie: MMPID; nIndex: INTEGER; lpData: LPVOID;
  61.          wLen: WORD) : BOOLEAN;
  62.  
  63.  
  64. IMPLEMENTATION
  65.  
  66. FUNCTION mmpGetRepeat;                 external 'mmp' index  20;
  67. FUNCTION mmpGetMovieInfo;            external 'mmp' index  97;
  68. FUNCTION mmpGetPaletteHandle;            external 'mmp' index 100;
  69. FUNCTION mmpClose;                external 'mmp' index   2;
  70. FUNCTION mmpSetRepeat;                external 'mmp' index  19;
  71. FUNCTION mmpError;                external 'mmp' index   3;
  72. FUNCTION mmpLoadFile;                external 'mmp' index   4;
  73. FUNCTION mmpFreeFile;                external 'mmp' index   5;
  74. FUNCTION mmpGetTempo;                external 'mmp' index  23;
  75. FUNCTION mmpSetTempo;                 external 'mmp' index  22;
  76. FUNCTION mmpAnimStatus;                external 'mmp' index 103;
  77. FUNCTION mmpAnimate;                external 'mmp' index   8;
  78. FUNCTION mmpUpdate;                external 'mmp' index  16;
  79. FUNCTION mmpGotoFrame;                external 'mmp' index  13;
  80. FUNCTION mmpFileLoaded;                external 'mmp' index   6;
  81. FUNCTION mmpStartAnimating;            external 'mmp' index 7;
  82. FUNCTION mmpGetInfo;                external 'mmp' index 101;
  83. FUNCTION mmpGetFileInfo;            external 'mmp' index 59;
  84. FUNCTION mmpSetInfo;                external 'mmp' index 102;
  85. FUNCTION mmpOpen;                external 'mmp' index 1;
  86. FUNCTION mmpGetMute;                external 'mmp' index 98;
  87. {FUNCTION mmpIsLastFrame;            external 'mmp' index 58;}
  88. FUNCTION mmpSetMute;                external 'mmp' index 57;
  89. FUNCTION mmpGetCurFrame;            external 'mmp' index 14;
  90. FUNCTION mmpSetDC;                external 'mmp' index 54;
  91. FUNCTION mmpGetStage;                external 'mmp' index 18;
  92. FUNCTION mmpGetFrameHook;            external 'mmp' index 53;
  93. FUNCTION mmpSetStage;                external 'mmp' index 17;
  94. FUNCTION mmpStopAnimating;            external 'mmp' index 10;
  95. FUNCTION mmpSetFrameHook;            external 'mmp' index 52;
  96. FUNCTION mmpAnimStopped;            external 'mmp' index 11;
  97.  
  98.  
  99. BEGIN
  100. END.
  101.