You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
206 lines
5.2 KiB
206 lines
5.2 KiB
/*
|
|
* tkWinInt.h --
|
|
*
|
|
* This file contains declarations that are shared among the
|
|
* Windows-specific parts of Tk, but aren't used by the rest of
|
|
* Tk.
|
|
*
|
|
* Copyright (c) 1995-1997 Sun Microsystems, Inc.
|
|
* Copyright (c) 1998-2000 by Scriptics Corporation.
|
|
*
|
|
* See the file "license.terms" for information on usage and redistribution
|
|
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
|
|
*
|
|
* RCS: @(#) $Id: tkWinInt.h,v 1.1 2004/01/07 22:32:39 barre Exp $
|
|
*/
|
|
|
|
#ifndef _TKWININT
|
|
#define _TKWININT
|
|
|
|
#ifndef _TKINT
|
|
#include "tkInt.h"
|
|
#endif
|
|
|
|
/*
|
|
* Include platform specific public interfaces.
|
|
*/
|
|
|
|
#ifndef _TKWIN
|
|
#include "tkWin.h"
|
|
#endif
|
|
|
|
#ifndef _TKPORT
|
|
#include "tkPort.h"
|
|
#endif
|
|
|
|
|
|
/*
|
|
* Define constants missing from older Win32 SDK header files.
|
|
*/
|
|
|
|
#ifndef WS_EX_TOOLWINDOW
|
|
#define WS_EX_TOOLWINDOW 0x00000080L
|
|
#endif
|
|
|
|
/*
|
|
* The TkWinDCState is used to save the state of a device context
|
|
* so that it can be restored later.
|
|
*/
|
|
|
|
typedef struct TkWinDCState {
|
|
HPALETTE palette;
|
|
int bkmode;
|
|
} TkWinDCState;
|
|
|
|
/*
|
|
* The TkWinDrawable is the internal implementation of an X Drawable (either
|
|
* a Window or a Pixmap). The following constants define the valid Drawable
|
|
* types.
|
|
*/
|
|
|
|
#define TWD_BITMAP 1
|
|
#define TWD_WINDOW 2
|
|
#define TWD_WINDC 3
|
|
|
|
typedef struct {
|
|
int type;
|
|
HWND handle;
|
|
TkWindow *winPtr;
|
|
} TkWinWindow;
|
|
|
|
typedef struct {
|
|
int type;
|
|
HBITMAP handle;
|
|
Colormap colormap;
|
|
int depth;
|
|
} TkWinBitmap;
|
|
|
|
typedef struct {
|
|
int type;
|
|
HDC hdc;
|
|
}TkWinDC;
|
|
|
|
typedef union {
|
|
int type;
|
|
TkWinWindow window;
|
|
TkWinBitmap bitmap;
|
|
TkWinDC winDC;
|
|
} TkWinDrawable;
|
|
|
|
/*
|
|
* The following macros are used to retrieve internal values from a Drawable.
|
|
*/
|
|
|
|
#define TkWinGetHWND(w) (((TkWinDrawable *) w)->window.handle)
|
|
#define TkWinGetWinPtr(w) (((TkWinDrawable *) w)->window.winPtr)
|
|
#define TkWinGetHBITMAP(w) (((TkWinDrawable *) w)->bitmap.handle)
|
|
#define TkWinGetColormap(w) (((TkWinDrawable *) w)->bitmap.colormap)
|
|
#define TkWinGetHDC(w) (((TkWinDrawable *) w)->winDC.hdc)
|
|
|
|
/*
|
|
* The following structure is used to encapsulate palette information.
|
|
*/
|
|
|
|
typedef struct {
|
|
HPALETTE palette; /* Palette handle used when drawing. */
|
|
UINT size; /* Number of entries in the palette. */
|
|
int stale; /* 1 if palette needs to be realized,
|
|
* otherwise 0. If the palette is stale,
|
|
* then an idle handler is scheduled to
|
|
* realize the palette. */
|
|
Tcl_HashTable refCounts; /* Hash table of palette entry reference counts
|
|
* indexed by pixel value. */
|
|
} TkWinColormap;
|
|
|
|
/*
|
|
* The following macro retrieves the Win32 palette from a colormap.
|
|
*/
|
|
|
|
#define TkWinGetPalette(colormap) (((TkWinColormap *) colormap)->palette)
|
|
|
|
/*
|
|
* The following macros define the class names for Tk Window types.
|
|
*/
|
|
|
|
#define TK_WIN_TOPLEVEL_CLASS_NAME "TkTopLevel"
|
|
#define TK_WIN_CHILD_CLASS_NAME "TkChild"
|
|
|
|
/*
|
|
* The following variable is a translation table between X gc functions and
|
|
* Win32 raster and BitBlt op modes.
|
|
*/
|
|
|
|
extern int tkpWinRopModes[];
|
|
extern int tkpWinBltModes[];
|
|
|
|
/*
|
|
* The following defines are used with TkWinGetBorderPixels to get the
|
|
* extra 2 border colors from a Tk_3DBorder.
|
|
*/
|
|
|
|
#define TK_3D_LIGHT2 TK_3D_DARK_GC+1
|
|
#define TK_3D_DARK2 TK_3D_DARK_GC+2
|
|
|
|
/*
|
|
* Internal procedures used by more than one source file.
|
|
*/
|
|
|
|
#include "tkIntPlatDecls.h"
|
|
|
|
/*
|
|
* We need to specially add the TkWinChildProc because of the special
|
|
* prototype it has (doesn't fit into stubs schema)
|
|
*/
|
|
#ifdef BUILD_tk
|
|
#undef TCL_STORAGE_CLASS
|
|
#define TCL_STORAGE_CLASS DLLEXPORT
|
|
#endif
|
|
|
|
EXTERN LRESULT CALLBACK TkWinChildProc _ANSI_ARGS_((HWND hwnd, UINT message,
|
|
WPARAM wParam, LPARAM lParam));
|
|
|
|
/*
|
|
* Special proc needed as tsd accessor function between
|
|
* tkWinX.c:GenerateXEvent and tkWinClipboard.c:UpdateClipboard
|
|
*/
|
|
EXTERN void TkWinUpdatingClipboard(int mode);
|
|
|
|
/*
|
|
* The following structure keeps track of whether we are using the
|
|
* multi-byte or the wide-character interfaces to the operating system.
|
|
* System calls should be made through the following function table.
|
|
*
|
|
* While some system calls need to use this A/W jump-table, it is not
|
|
* necessary for all calls to do it, which is why you won't see this
|
|
* used throughout the Tk code, but only in key areas. -- hobbs
|
|
*/
|
|
|
|
typedef struct TkWinProcs {
|
|
int useWide;
|
|
LRESULT (WINAPI *callWindowProc)(WNDPROC lpPrevWndFunc, HWND hWnd,
|
|
UINT Msg, WPARAM wParam, LPARAM lParam);
|
|
LRESULT (WINAPI *defWindowProc)(HWND hWnd, UINT Msg, WPARAM wParam,
|
|
LPARAM lParam);
|
|
ATOM (WINAPI *registerClass)(CONST WNDCLASS *lpWndClass);
|
|
BOOL (WINAPI *setWindowText)(HWND hWnd, LPCTSTR lpString);
|
|
HWND (WINAPI *createWindowEx)(DWORD dwExStyle, LPCTSTR lpClassName,
|
|
LPCTSTR lpWindowName, DWORD dwStyle, int x, int y,
|
|
int nWidth, int nHeight, HWND hWndParent, HMENU hMenu,
|
|
HINSTANCE hInstance, LPVOID lpParam);
|
|
} TkWinProcs;
|
|
|
|
EXTERN TkWinProcs *tkWinProcs;
|
|
|
|
#undef TCL_STORAGE_CLASS
|
|
#define TCL_STORAGE_CLASS DLLIMPORT
|
|
|
|
/*
|
|
* The following allows us to cache these encoding for multiple functions.
|
|
*/
|
|
|
|
|
|
extern Tcl_Encoding TkWinGetKeyInputEncoding _ANSI_ARGS_((void));
|
|
extern Tcl_Encoding TkWinGetUnicodeEncoding _ANSI_ARGS_((void));
|
|
|
|
#endif /* _TKWININT */
|
|
|
|
|