BOXED font problem

From: Charles Melice <mail_at_forthcad.com>
Date: Fri, 14 Apr 2000 14:58:12 +0200

I have noticed that dialog boxes templates created with BOXED have incorrect
font size inside the application using it.

To fix the font problem, I use the following 'ForceGuiFont' word
just before existing any WM_INITDIALOG.

    : ForceGuiFont ( hwnd -- )
        GW_CHILD GetWindow
        BEGIN DUP WHILE
            DUP WM_SETFONT DEFAULT_GUI_FONT GetStockObject FALSE SendMessage DROP
            GW_HWNDNEXT GetWindow
        REPEAT
        DROP ;

Charles

.
Received on Fri Apr 14 2000 - 14:58:12 PDT


Subscribe to our e-mail list service. It's free for all SwiftForth and SwiftX users!

This archive was generated 09-Feb-2012. Archive updated nightly.