source: trunk/gsinstaller/splash.c@ 1397

#include "Splash.h"

#define bool int
#define false 0
#define true 1

UINT        timer;
HWND    splash_window;
BOOL        splash_done;
HBITMAP splash_bmp;
int         splash_bmpheight;

void CALLBACK splash_timerproc(HWND Window, UINT Message, UINT id, DWORD time)
{   splash_done = TRUE;
  KillTimer(NULL, 0);
}

long FAR PASCAL _export splash_windproc(HWND Window, UINT Message, WPARAM wParameter, LPARAM lParameter)
{   switch (Message)
    { case WM_CREATE:
    { timer = SetTimer(NULL, 0, 3000, (TIMERPROC) splash_timerproc);
    }
    break;

    case WM_TIMER: // valid id; just kill window after timer elapses
      splash_done = TRUE;
        KillTimer(Window, 0);
    break;

    case WM_DESTROY:
      splash_window = 0;
    break;

        case WM_PAINT:
        { PAINTSTRUCT   PaintInfo;
        HDC                 dc, bmpDC;
      BITMAP            bmpData;
      POINT             origin, size;                                        

            dc = BeginPaint(Window, &PaintInfo);
      bmpDC = CreateCompatibleDC(dc);
      SelectObject(bmpDC, splash_bmp);

      GetObject(splash_bmp, sizeof(BITMAP), (LPVOID) &bmpData);

      size.x = bmpData.bmWidth;
      size.y = bmpData.bmHeight;
      DPtoLP(dc, &size, 1);

      origin.x = 0;
      origin.y = 0;
      DPtoLP(dc, &origin, 1);

      BitBlt(dc, 0, 0, size.x, size.y,
             bmpDC, origin.x, origin.y, SRCCOPY);

      DeleteDC(bmpDC);
            EndPaint(Window, &PaintInfo);
        }
        break;

    case WM_COMMAND:
    break;

    default:
            return(DefWindowProc(Window, Message, wParameter, lParameter));
  }
    return 0L;
}

void splash_register(HINSTANCE instance)
{ WNDCLASS Class;
    static bool registered = false;
  if (registered == false)
  { Class.lpszClassName = "Generic:Splash";
        Class.hInstance     = instance;
        Class.lpfnWndProc       = (WNDPROC) splash_windproc;
        Class.hCursor               = LoadCursor(NULL, IDC_ARROW);
        Class.hIcon                 = NULL;
        Class.lpszMenuName  = NULL;
        Class.hbrBackground = (HBRUSH) (COLOR_WINDOW+1);
        Class.style                 = NULL;
        Class.cbClsExtra        = 0;
        Class.cbWndExtra        = 0;
        RegisterClass(&Class);
    registered  = TRUE;
    }
}

void _export splash_show(HINSTANCE instance, unsigned int time)
{ MSG       msg;
  RECT      r;
  BITMAP    bmpData;
  POINT     size;
  int     sx, sy;
  HDC     dc;

  splash_register(instance);

  splash_bmp    = LoadBitmap(instance, (LPCSTR) MAKEINTRESOURCE(9007));
    splash_done = FALSE;

  GetObject(splash_bmp, sizeof(BITMAP), (LPVOID) &bmpData);
  size.x = bmpData.bmWidth;
  size.y = bmpData.bmHeight;

  r.left        = 0;
  r.top         = 0;
  r.right       = size.x;
  r.bottom  = size.y;
  AdjustWindowRect(&r, 0, TRUE);

  splash_bmpheight  = size.y;
  dc = GetDC(GetDesktopWindow());
  sx = GetDeviceCaps(dc, HORZRES);
  sy = GetDeviceCaps(dc, VERTRES);
  ReleaseDC(GetDesktopWindow(), dc);

    splash_window = CreateWindow("Generic:Splash", "Greenstone Installer",
                                                                WS_DLGFRAME | WS_VISIBLE,
                                (sx - r.right + r.left) / 2,
                                (sy - r.bottom + r.top) / 2,
                                r.right-r.left, r.bottom-r.top,
                                0, 0, instance, NULL);
  while (GetMessage(&msg, NULL, NULL, NULL) &&
                splash_done == FALSE)
  { if (msg.message == WM_TIMER)
    { msg.hwnd = splash_window;
    }
    TranslateMessage(&msg);
    DispatchMessage(&msg);
  }
  DestroyWindow(splash_window);
}