spieleprogrammierer.de - Forum und Wiki zur Spieleprogrammierung und Spieleentwicklung

C-/C++-Quelltext

#include <windows.h>
#include <gdiplus.h>

#include <string> 
#include <sstream>
#include <fstream>

bool AppRun = true;
unsigned int width = 120;
unsigned int height = 60;

::LRESULT CALLBACK WndProc (::HWND hwnd, ::UINT message, ::WPARAM wParam, ::LPARAM lParam);
::WNDCLASS WndClass;
::HINSTANCE hInstance;
::HWND hWnd;
::SIZE BackgroundSize = { width , height};
::RECT WindowRect = { 0 , 0 , 0 , 0 };
::POINT SourcePoint = { 0 , 0 };
::SYSTEMTIME SysTime;

Gdiplus::GdiplusStartupInput gdiplusStartupInput;
::ULONG_PTR gdiplusToken;

// Blendfunktion

::BLENDFUNCTION blendPixelFunction= { AC_SRC_OVER, 0, 255, AC_SRC_ALPHA };

void Write ( 
            ::HDC hdcDest , 
            std::wstring out ,
            unsigned int xPos ,
            unsigned int yPos ,
            unsigned int width,
            unsigned int height
            )
{
    // temporäre DC erstellen

    ::HDC hdcTempFont = ::CreateCompatibleDC (hdcDest);

    // temporäre Bitmap erstellen

    ::HBITMAP hTempFont = ::CreateCompatibleBitmap (hdcDest, width,height);

    // Bitmap auswählen

    ::SelectObject ( hdcTempFont, hTempFont );

    // Font erstellen und auswählen

    ::HFONT hFont = ::CreateFont (0,0,0,0,0,0,0,0,0,0,0,0,0,L"fixedsys" );
    ::SelectObject ( hdcTempFont, hFont );

    // Text Farbe einstellen 

    ::SetTextColor ( hdcTempFont , RGB ( 255,0,0) );

    // Hintergrund für Font einstellen

    ::SetBkMode(hdcTempFont, TRANSPARENT); 

    // in temporäre DC schreiben

    ::TextOut ( hdcTempFont , xPos,yPos,out.c_str(),out.size() );
    
    // von der temporären DC auf die eigentliche DC bliten

    ::AlphaBlend (hdcDest,0,0,width,height,hdcTempFont,0,0,width,height,blendPixelFunction);

    // temporäre DC zerstören

    ::DeleteDC ( hdcTempFont );

    // temporäre Bitmap zerstören

    ::DeleteObject ( hTempFont );
}

int WINAPI WinMain (
                    ::HINSTANCE hInstance, 
                    ::HINSTANCE hPrevInstance,
                    ::PSTR szCmdLine, 
                    int CmdShow
                    )
{
    {
        WndClass.style          = 0;
        WndClass.lpfnWndProc    = WndProc;
        WndClass.cbClsExtra     = 0;
        WndClass.cbWndExtra     = 0;
        WndClass.hInstance      = hInstance;
        WndClass.hIcon          = ::LoadIcon(NULL, IDI_APPLICATION);
        WndClass.hCursor        = ::LoadCursor(NULL, IDC_ARROW);
        WndClass.hbrBackground  = (HBRUSH) ::GetStockObject ( WHITE_BRUSH );
        WndClass.lpszMenuName   = 0 ;
        WndClass.lpszClassName  = L"Clock";

        ::RegisterClass ( &WndClass );

        hWnd = ::CreateWindowEx( WS_EX_LAYERED | WS_EX_TOOLWINDOW,                          
             L"Clock",L"ClockGadget", WS_POPUP, 0, 0, 0, 0, 0, 0, hInstance, 0 );

        ::ShowWindow ( hWnd , CmdShow );
        ::UpdateWindow ( hWnd );

        // GDI+ initialisieren

        Gdiplus::GdiplusStartup(&gdiplusToken, &gdiplusStartupInput, NULL);
        
        // ein Bild mittels GDI+ laden

        Gdiplus::Bitmap background (L"background.png");
        ::HBITMAP hBackground = 0;
        
        //HBITMAP holen

        background.GetHBITMAP ( Gdiplus::Color (),&hBackground);

        // wenn es einen Fehler beim laden gab abbrechen

        if ( !hBackground )
            return -1;

        // DC für den Hintergrund erstellen

        ::HDC hdcBackground = ::CreateCompatibleDC ( 0 );

        // Hintergrundbild auswählen

        ::SelectObject ( hdcBackground , hBackground);

        ::MSG msg;

        while ( AppRun )
        {
            // Messages

            while (::PeekMessage(&msg, NULL, 0, 0,PM_REMOVE))
            {   
                ::TranslateMessage(&msg);
                ::DispatchMessage(&msg);
            }

            // DC für zum rendern holen

            ::HDC hdcScreen = ::GetDC ( hWnd );

            // eine temporäre DC erstellen

            ::HDC hdcTemp = ::CreateCompatibleDC ( hdcScreen );

            // eine temporäre Bitmap erstellen

            ::HBITMAP hTempBitmap = ::CreateCompatibleBitmap ( hdcScreen , width,height);

            // Bitmap auswählen

            ::SelectObject ( hdcTemp , hTempBitmap);

            // Hintergrund in temporäre Bitmap bliten

            ::BitBlt (hdcTemp,0,0,width,height,hdcBackground,0,0,SRCCOPY);

            std::wstringstream str;

            // lokale Zeit holen

            ::GetLocalTime ( &SysTime );

            str << SysTime.wHour << ":" << SysTime.wMinute << ":" << SysTime.wSecond;
            std::wstring out = str.str ();

            // Auf DC schreiben

            Write ( hdcTemp , out , 25 , 25 , width , height );

            // Position des Fenstern holen

            ::GetWindowRect ( hWnd , &WindowRect );
            
            // und in POINT umwandeln

            ::POINT WindowPosition = { WindowRect.left , WindowRect.top };

            // Und nun aktualisieren

            ::UpdateLayeredWindow (hWnd,hdcScreen,&WindowPosition,&BackgroundSize,
                hdcTemp,&SourcePoint,0,&blendPixelFunction,ULW_ALPHA );

            // temporäre DC wieder zerstören

            ::DeleteDC ( hdcTemp );

            // DC zum rendern wieder freigeben

            ::ReleaseDC ( hWnd , hdcScreen );

            // ein wenig schlafen legen

            ::Sleep ( 500 );
        }

        // DC für Hintergrund wieder löschen

        ::DeleteDC ( hdcBackground );

    } // ist dafür da, dass Gdiplus::Bitmap vor GDI+ zerstört wird


    // GDI+ runterfahren

    Gdiplus::GdiplusShutdown(gdiplusToken);

    return 0;
}

::LRESULT CALLBACK WndProc (
                            ::HWND hwnd, 
                            ::UINT message, 
                            ::WPARAM wParam, 
                            ::LPARAM lParam
                            )
{
    switch ( message )
    {
    case WM_KEYDOWN:
        {
            switch ( wParam )
            {
            case VK_ESCAPE:
                // escape zum beenden

                ::SendMessage ( hwnd , WM_CLOSE , 0 , 0 );
                break;
            };
        }break;

    case WM_CLOSE:
        {
            AppRun = false;
            ::PostQuitMessage ( 0 );
        }
        break;

    case WM_LBUTTONDOWN:
        {
            // damit das Gadget überall gepackt und verschoben werden kann

            ::SendMessage(hWnd, WM_NCLBUTTONDOWN, HTCAPTION,NULL);
        }break;
    }

    return ::DefWindowProc (hwnd, message, wParam, lParam);
}