Sample of QuickTime API on Windows

// Win32P.cpp : Defines the entry point for the application.
//

#include "stdafx.h"
#include "Win32P.h"

#include <windows.h>

// quicktime
#include <QTML.h>
#include <Movies.h>

// quicktime
char movieFile[255] = "D://MyWorks//2010.9 QuickTime//movs//QTMovie.mov"; // Name of movie file
Movie theMovie = 0;            // Movie object
MovieController theMC = 0;    // Movie controller
bool hasWndAssociated = false;    // whether has associated with a HWND


#define MAX_LOADSTRING 100


// Global Variables:
HINSTANCE hInst;                                // current instance
TCHAR szTitle[MAX_LOADSTRING];                    // The title bar text
TCHAR szWindowClass[MAX_LOADSTRING];            // the main window class name

// Forward declarations of functions included in this code module:
ATOM                MyRegisterClass(HINSTANCE hInstance);
BOOL                InitInstance(HINSTANCE, int);
LRESULT CALLBACK    WndProc(HWND, UINT, WPARAM, LPARAM);
INT_PTR CALLBACK    About(HWND, UINT, WPARAM, LPARAM);

int APIENTRY _tWinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPTSTR    lpCmdLine,
                     int       nCmdShow)
{
    UNREFERENCED_PARAMETER(hPrevInstance);
    UNREFERENCED_PARAMETER(lpCmdLine);

     // TODO: Place code here.
    MSG msg;
    HACCEL hAccelTable;

    // Initialize global strings
    LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
    LoadString(hInstance, IDC_WIN32P, szWindowClass, MAX_LOADSTRING);
    MyRegisterClass(hInstance);

    // Perform application initialization:
    if (!InitInstance (hInstance, nCmdShow))
    {
        return FALSE;
    }

    hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(IDC_WIN32P));

    // quicktime
    InitializeQTML(0);
    EnterMovies();

    // Main message loop:
    while (GetMessage(&msg, NULL, 0, 0))
    {
        if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg))
        {
            TranslateMessage(&msg);
            DispatchMessage(&msg);
        }
    }

    // quicktime
    //ExitMovies(); // Terminate QuickTime
    //TerminateQTML();

    return (msg.wParam);
}



//
//  FUNCTION: MyRegisterClass()
//
//  PURPOSE: Registers the window class.
//
//  COMMENTS:
//
//    This function and its usage are only necessary if you want this code
//    to be compatible with Win32 systems prior to the 'RegisterClassEx'
//    function that was added to Windows 95. It is important to call this function
//    so that the application will get 'well formed' small icons associated
//    with it.
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
    WNDCLASSEX wcex;

    wcex.cbSize = sizeof(WNDCLASSEX);

    wcex.style            = CS_HREDRAW | CS_VREDRAW;
    wcex.lpfnWndProc    = WndProc;
    wcex.cbClsExtra        = 0;
    wcex.cbWndExtra        = 0;
    wcex.hInstance        = hInstance;
    wcex.hIcon            = LoadIcon(hInstance, MAKEINTRESOURCE(IDI_WIN32P));
    wcex.hCursor        = LoadCursor(NULL, IDC_ARROW);
    wcex.hbrBackground    = (HBRUSH)(COLOR_WINDOW+1);
    wcex.lpszMenuName    = MAKEINTRESOURCE(IDC_WIN32P);
    wcex.lpszClassName    = szWindowClass;
    wcex.hIconSm        = LoadIcon(wcex.hInstance, MAKEINTRESOURCE(IDI_SMALL));

    return RegisterClassEx(&wcex);
}

//
//   FUNCTION: InitInstance(HINSTANCE, int)
//
//   PURPOSE: Saves instance handle and creates main window
//
//   COMMENTS:
//
//        In this function, we save the instance handle in a global variable and
//        create and display the main program window.
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;

   hInst = hInstance; // Store instance handle in our global variable

   hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);

   if (!hWnd)
   {
      return FALSE;
   }

   ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);

   return TRUE;
}





void OpenMovie (HWND hwnd)
{
    short theFile = 0;
    FSSpec sfFile;
    char fullPath[255];
    Rect    bounds;

    if (!hasWndAssociated)
    {
        CreatePortAssociation(hwnd, NULL, 0L); // Register window with QTML
        hasWndAssociated = true;
    }
   
    strcpy (fullPath, movieFile);    // Copy full pathname
    c2pstr (fullPath);                // Convert to Pascal string
   
    FSMakeFSSpec (0, 0L, (ConstStr255Param)fullPath, &sfFile); // Make file-system

    SetGWorld ( (CGrafPtr)GetNativeWindowPort( hwnd ), nil); // Set graphics port

    OSErr err = OpenMovieFile (&sfFile, &theFile, fsRdPerm);
    err = NewMovieFromFile (&theMovie, theFile, nil, nil, newMovieActive, nil);
    CloseMovieFile (theFile);

    Rect theMovieRect;
    GetMovieBox(theMovie, &theMovieRect);
    theMC = NewMovieController(theMovie, &theMovieRect, mcTopLeftMovie);

} /* end OpenMovie */


void CloseMovie (HWND hwnd)
{
    if (theMC)
        DisposeMovieController(theMC);
    if (theMovie)
        DisposeMovie(theMovie);


    if (hasWndAssociated)
    {
        CWindowPtr qtmlPtr;
        qtmlPtr = (CWindowPtr)GetHWNDPort(hwnd);

        DestroyPortAssociation (qtmlPtr); // Unregister window with QTML
        hasWndAssociated = false;
    }

}


//
//  FUNCTION: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  PURPOSE:  Processes messages for the main window.
//
//  WM_COMMAND    - process the application menu
//  WM_PAINT    - Paint the main window
//  WM_DESTROY    - post a quit message and return
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    int wmId, wmEvent;
    PAINTSTRUCT ps;
    HDC hdc;


    if (GetNativeWindowPort(hWnd))
    {
        MSG winMsg;
        EventRecord qtmlEvent;
   
        winMsg.hwnd = hWnd;
        winMsg.lParam = lParam;
        winMsg.message = message;
        winMsg.wParam = wParam;

        winMsg.time = GetMessageTime();
        DWORD msgPos = GetMessagePos(); // Get mouse position
        winMsg.pt.x = LOWORD(msgPos); // Extract x coordinate
        winMsg.pt.y = HIWORD(msgPos); // Extract y coordinate

        NativeEventToMacEvent (&winMsg, &qtmlEvent);

        if (theMC)
            MCIsPlayerEvent (theMC, (const EventRecord *) &qtmlEvent);
    }


    switch (message)
    {
    case WM_CREATE:
        break;

    case WM_COMMAND:
        wmId    = LOWORD(wParam);
        wmEvent = HIWORD(wParam);
        // Parse the menu selections:
        switch (wmId)
        {
        case ID_FILE_OPEN:
            OpenMovie (hWnd);            // Open the movie
            break;
        case ID_FILE_CLOSE:
            CloseMovie(hWnd);
            break;
        case IDM_ABOUT:
            DialogBox(hInst, MAKEINTRESOURCE(IDD_ABOUTBOX), hWnd, About);
            break;
        case IDM_EXIT:
            DestroyWindow(hWnd);
            break;
        default:
            return DefWindowProc(hWnd, message, wParam, lParam);
        }
        break;
    case WM_PAINT:
        hdc = BeginPaint(hWnd, &ps);
        // TODO: Add any drawing code here...
        EndPaint(hWnd, &ps);
        break;
    case WM_CLOSE:
        break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
    default:
        return DefWindowProc(hWnd, message, wParam, lParam);
    }
    return 0;
}

// Message handler for about box.
INT_PTR CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
    UNREFERENCED_PARAMETER(lParam);
    switch (message)
    {
    case WM_INITDIALOG:
        return (INT_PTR)TRUE;

    case WM_COMMAND:
        if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL)
        {
            EndDialog(hDlg, LOWORD(wParam));
            return (INT_PTR)TRUE;
        }
        break;
    }
    return (INT_PTR)FALSE;
}