diff options
| author | mistachkin <mistachkin@noemail.net> | 2007-02-04 00:10:53 (GMT) |
|---|---|---|
| committer | mistachkin <mistachkin@noemail.net> | 2007-02-04 00:10:53 (GMT) |
| commit | 48a63a8ebfcd4862984d5582582f939507b751d8 (patch) | |
| tree | a7200b20603fda137b889e26b614b01d8df86d05 /win/ttkWinMonitor.c | |
| parent | f194489cf9326aef98826bc2f71b82c947275852 (diff) | |
| download | tk-48a63a8ebfcd4862984d5582582f939507b751d8.zip tk-48a63a8ebfcd4862984d5582582f939507b751d8.tar.gz tk-48a63a8ebfcd4862984d5582582f939507b751d8.tar.bz2 | |
see log
FossilOrigin-Name: 8cbce03e2dda7e650a52107cf217f9f01d3d70c3
Diffstat (limited to 'win/ttkWinMonitor.c')
| -rw-r--r-- | win/ttkWinMonitor.c | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/win/ttkWinMonitor.c b/win/ttkWinMonitor.c index bf23e39..c0198d9 100644 --- a/win/ttkWinMonitor.c +++ b/win/ttkWinMonitor.c @@ -1,4 +1,4 @@ -/* $Id: ttkWinMonitor.c,v 1.6 2007/01/11 19:59:26 jenglish Exp $ +/* $Id: ttkWinMonitor.c,v 1.7 2007/02/04 00:10:55 mistachkin Exp $ */ #ifdef _MSC_VER @@ -98,7 +98,11 @@ CreateThemeMonitorWindow(HINSTANCE hinst, Tcl_Interp *interp) hwnd = CreateWindow( name, title, WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hinst, NULL ); +#ifdef _WIN64 SetWindowLongPtr(hwnd, GWLP_USERDATA, (LONG)interp); +#else + SetWindowLong(hwnd, GWL_USERDATA, (LONG)interp); +#endif ShowWindow(hwnd, SW_HIDE); UpdateWindow(hwnd); } @@ -115,7 +119,11 @@ DestroyThemeMonitorWindow(void *clientData) static LRESULT WINAPI WndProc(HWND hwnd, UINT msg, WPARAM wp, LPARAM lp) { +#ifdef _WIN64 Tcl_Interp *interp = (Tcl_Interp *)GetWindowLongPtr(hwnd, GWLP_USERDATA); +#else + Tcl_Interp *interp = (Tcl_Interp *)GetWindowLong(hwnd, GWL_USERDATA); +#endif Ttk_Theme theme; switch (msg) { |