Mercurial > dwindows
view win/dw.c @ 1542:edbc7405ed4d
Added code to auto-size container on Windows.
author | bsmith@81767d24-ef19-dc11-ae90-00e081727c95 |
---|---|
date | Fri, 13 Jan 2012 02:35:59 +0000 |
parents | 1c6593b0ce45 |
children | 78a2e6a51285 |
line wrap: on
line source
/* * Dynamic Windows: * A GTK like implementation of the Win32 GUI * * (C) 2000-2011 Brian Smith <brian@dbsoft.org> * (C) 2003-2011 Mark Hessling <mark@rexx.org> * */ #define _WIN32_IE 0x0500 #define WINVER 0x500 #include <windows.h> #include <windowsx.h> #include <commctrl.h> #include <shlwapi.h> #include <shlobj.h> #include <userenv.h> #include <stdlib.h> #include <string.h> #include <stdio.h> #include <process.h> #include <malloc.h> #include <io.h> #include <time.h> #include <math.h> #include "dw.h" #ifdef BUILD_DLL #include "XBrowseForFolder.h" #endif #ifdef AEROGLASS #include <uxtheme.h> #endif #ifdef GDIPLUS /* GDI+ Headers are not C compatible... so define what we need here instead */ struct GdiplusStartupInput { UINT32 GdiplusVersion; void *DebugEventCallback; BOOL SuppressBackgroundThread; BOOL SuppressExternalCodecs; }; typedef enum { Ok = 0, GenericError = 1, InvalidParameter = 2, OutOfMemory = 3, ObjectBusy = 4, InsufficientBuffer = 5, NotImplemented = 6, Win32Error = 7, WrongState = 8, Aborted = 9, FileNotFound = 10, ValueOverflow = 11, AccessDenied = 12, UnknownImageFormat = 13, FontFamilyNotFound = 14, FontStyleNotFound = 15, NotTrueTypeFont = 16, UnsupportedGdiplusVersion = 17, GdiplusNotInitialized = 18, PropertyNotFound = 19, PropertyNotSupported = 20, ProfileNotFound = 21 } Status; Status WINAPI GdipCreateBitmapFromFile(const WCHAR* filename, void **bitmap); Status WINAPI GdipCreateHBITMAPFromBitmap(void *bitmap, HBITMAP* hbmReturn, DWORD background); Status WINAPI GdipCreateHICONFromBitmap(void *bitmap, HICON *hbmReturn); Status WINAPI GdipDisposeImage(void *image); Status WINAPI GdipGetImagePixelFormat(void *image, INT *format); Status WINAPI GdiplusStartup(ULONG_PTR *token, const struct GdiplusStartupInput *input, void *output); VOID WINAPI GdiplusShutdown(ULONG_PTR token); /* Pixel format information */ #define PixelFormatIndexed 0x00010000 #define PixelFormatGDI 0x00020000 #define PixelFormatAlpha 0x00040000 #define PixelFormatPAlpha 0x00080000 #define PixelFormatExtended 0x00100000 #define PixelFormatCanonical 0x00200000 #define PixelFormatUndefined 0 #define PixelFormatDontCare 0 #define PixelFormat1bppIndexed (1 | ( 1 << 8) | PixelFormatIndexed | PixelFormatGDI) #define PixelFormat4bppIndexed (2 | ( 4 << 8) | PixelFormatIndexed | PixelFormatGDI) #define PixelFormat8bppIndexed (3 | ( 8 << 8) | PixelFormatIndexed | PixelFormatGDI) #define PixelFormat16bppGrayScale (4 | (16 << 8) | PixelFormatExtended) #define PixelFormat16bppRGB555 (5 | (16 << 8) | PixelFormatGDI) #define PixelFormat16bppRGB565 (6 | (16 << 8) | PixelFormatGDI) #define PixelFormat16bppARGB1555 (7 | (16 << 8) | PixelFormatAlpha | PixelFormatGDI) #define PixelFormat24bppRGB (8 | (24 << 8) | PixelFormatGDI) #define PixelFormat32bppRGB (9 | (32 << 8) | PixelFormatGDI) #define PixelFormat32bppARGB (10 | (32 << 8) | PixelFormatAlpha | PixelFormatGDI | PixelFormatCanonical) #define PixelFormat32bppPARGB (11 | (32 << 8) | PixelFormatAlpha | PixelFormatPAlpha | PixelFormatGDI) #define PixelFormat48bppRGB (12 | (48 << 8) | PixelFormatExtended) #define PixelFormat64bppARGB (13 | (64 << 8) | PixelFormatAlpha | PixelFormatCanonical | PixelFormatExtended) #define PixelFormat64bppPARGB (14 | (64 << 8) | PixelFormatAlpha | PixelFormatPAlpha | PixelFormatExtended) #define PixelFormat32bppCMYK (15 | (32 << 8)) /* Token to the GDI+ Instance */ ULONG_PTR gdiplusToken; #endif #ifdef AEROGLASS HRESULT (WINAPI *_DwmExtendFrameIntoClientArea)(HWND hWnd, const MARGINS *pMarInset) = 0; HRESULT (WINAPI *_DwmIsCompositionEnabled)(BOOL *pfEnabled) = 0; HTHEME (WINAPI *_OpenThemeData)(HWND hwnd, LPCWSTR pszClassList); HPAINTBUFFER (WINAPI *_BeginBufferedPaint)(HDC hdcTarget, const RECT *prcTarget, BP_BUFFERFORMAT dwFormat, BP_PAINTPARAMS *pPaintParams, HDC *phdc); HRESULT (WINAPI *_BufferedPaintSetAlpha)(HPAINTBUFFER hBufferedPaint, const RECT *prc, BYTE alpha); HRESULT (WINAPI *_DrawThemeTextEx)(HTHEME hTheme, HDC hdc, int iPartId, int iStateId, LPCWSTR pszText, int iCharCount, DWORD dwFlags, LPRECT pRect, const DTTOPTS *pOptions); HRESULT (WINAPI *_EndBufferedPaint)(HPAINTBUFFER hBufferedPaint, BOOL fUpdateTarget); HRESULT (WINAPI *_CloseThemeData)(HTHEME hTheme); BOOL _dw_composition = FALSE; COLORREF _dw_transparencykey = RGB(200,201,202); HANDLE hdwm = 0, huxtheme = 0; #endif /* * MinGW Is missing a bunch of definitions * so #define them here... */ #if !defined( MIM_MENUDATA ) # define MIM_MENUDATA 0x00000008 #endif #if !defined(PBS_MARQUEE) # define PBS_MARQUEE 0x08 #endif #if !defined(PBM_SETMARQUEE) # define PBM_SETMARQUEE (WM_USER+10) #endif #if !defined(LVS_EX_DOUBLEBUFFER) # define LVS_EX_DOUBLEBUFFER 0x10000 #endif HWND popup = (HWND)NULL, DW_HWND_OBJECT = (HWND)NULL; HINSTANCE DWInstance = NULL; DWORD dwVersion = 0, dwComctlVer = 0; DWTID _dwtid = -1; SECURITY_DESCRIPTOR _dwsd; #define PACKVERSION(major,minor) MAKELONG(minor,major) #define IS_XPPLUS (dwComctlVer >= PACKVERSION(5,82)) #define IS_VISTAPLUS (dwComctlVer >= PACKVERSION(6,10)) #ifndef MIN #define MIN(a, b) (((a) < (b)) ? (a) : (b)) #endif /* * For the dw*from_data() functions, a temporary file is required to write * the contents of the image to so it can be loaded by the Win32 API * We use _tempnam() which uses TMP env variable by default. It can be passed * an alternate temporary directory if TMP is not set, so we get the value * of TEMP and store it here. */ static char _dw_alternate_temp_dir[MAX_PATH+1] = {0}; static char _dw_exec_dir[MAX_PATH+1] = {0}; int main(int argc, char *argv[]); #define ICON_INDEX_LIMIT 200 HICON lookup[200]; HIMAGELIST hSmall = 0, hLarge = 0; /* Special flag used for internal tracking */ #define DW_CFA_RESERVED (1 << 30) DWORD _foreground; DWORD _background; DWORD _hPen; DWORD _hBrush; BYTE _red[] = { 0x00, 0xbb, 0x00, 0xaa, 0x00, 0xbb, 0x00, 0xaa, 0x77, 0xff, 0x00, 0xee, 0x00, 0xff, 0x00, 0xff, 0xaa, 0x00 }; BYTE _green[] = { 0x00, 0x00, 0xbb, 0xaa, 0x00, 0x00, 0xbb, 0xaa, 0x77, 0x00, 0xff, 0xee, 0x00, 0x00, 0xee, 0xff, 0xaa, 0x00 }; BYTE _blue[] = { 0x00, 0x00, 0x00, 0x00, 0xcc, 0xbb, 0xbb, 0xaa, 0x77, 0x00, 0x00, 0x00, 0xff, 0xff, 0xee, 0xff, 0xaa, 0x00}; HBRUSH _colors[18]; HFONT _DefaultFont = NULL; #if (defined(BUILD_DLL) || defined(BUILD_HTML)) && !defined(__MINGW32__) LRESULT CALLBACK _browserWindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); #endif BOOL CALLBACK _colorwndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2); void _resize_notebook_page(HWND handle, int pageid); void _handle_splitbar_resize(HWND hwnd, float percent, int type, int x, int y); int _lookup_icon(HWND handle, HICON hicon, int type); HFONT _acquire_font(HWND handle, char *fontname); void _click_default(HWND handle); void _do_resize(Box *thisbox, int x, int y); /* Internal function to queue a window redraw */ void _dw_redraw(HWND window, int skip) { static HWND lastwindow = 0; HWND redraw = lastwindow; if(skip && !window) return; lastwindow = window; if(redraw != lastwindow && redraw) { dw_window_redraw(redraw); } } typedef struct _sighandler { struct _sighandler *next; ULONG message; HWND window; int id; void *signalfunction; void *data; } SignalHandler; SignalHandler *Root = NULL; typedef struct { ULONG message; char name[30]; } SignalList; static int in_checkbox_handler = 0; /* List of signals and their equivilent Win32 message */ #define SIGNALMAX 17 SignalList SignalTranslate[SIGNALMAX] = { { WM_SIZE, DW_SIGNAL_CONFIGURE }, { WM_CHAR, DW_SIGNAL_KEY_PRESS }, { WM_LBUTTONDOWN, DW_SIGNAL_BUTTON_PRESS }, { WM_LBUTTONUP, DW_SIGNAL_BUTTON_RELEASE }, { WM_MOUSEMOVE, DW_SIGNAL_MOTION_NOTIFY }, { WM_CLOSE, DW_SIGNAL_DELETE }, { WM_PAINT, DW_SIGNAL_EXPOSE }, { WM_COMMAND, DW_SIGNAL_CLICKED }, { NM_DBLCLK, DW_SIGNAL_ITEM_ENTER }, { NM_RCLICK, DW_SIGNAL_ITEM_CONTEXT }, { LBN_SELCHANGE, DW_SIGNAL_LIST_SELECT }, { TVN_SELCHANGED, DW_SIGNAL_ITEM_SELECT }, { WM_SETFOCUS, DW_SIGNAL_SET_FOCUS }, { WM_VSCROLL, DW_SIGNAL_VALUE_CHANGED }, { TCN_SELCHANGE, DW_SIGNAL_SWITCH_PAGE }, { LVN_COLUMNCLICK, DW_SIGNAL_COLUMN_CLICK }, { TVN_ITEMEXPANDED,DW_SIGNAL_TREE_EXPAND } }; #ifdef BUILD_DLL void Win32_Set_Instance(HINSTANCE hInstance) { DWInstance = hInstance; } #else char **_convertargs(int *count, char *start) { char *tmp, *argstart, **argv; int loc = 0, inquotes = 0; (*count) = 1; tmp = start; /* Count the number of entries */ if(*start) { (*count)++; while(*tmp) { if(*tmp == '"' && inquotes) inquotes = 0; else if(*tmp == '"' && !inquotes) inquotes = 1; else if(*tmp == ' ' && !inquotes) { /* Push past any white space */ while(*(tmp+1) == ' ') tmp++; /* If we aren't at the end of the command * line increment the count. */ if(*(tmp+1)) (*count)++; } tmp++; } } argv = (char **)malloc(sizeof(char *) * ((*count)+1)); argv[0] = malloc(260); GetModuleFileName(DWInstance, argv[0], 260); argstart = tmp = start; if(*start) { loc = 1; while(*tmp) { if(*tmp == '"' && inquotes) { *tmp = 0; inquotes = 0; } else if(*tmp == '"' && !inquotes) { argstart = tmp+1; inquotes = 1; } else if(*tmp == ' ' && !inquotes) { *tmp = 0; argv[loc] = strdup(argstart); /* Push past any white space */ while(*(tmp+1) == ' ') tmp++; /* Move the start pointer */ argstart = tmp+1; /* If we aren't at the end of the command * line increment the count. */ if(*(tmp+1)) loc++; } tmp++; } if(*argstart) argv[loc] = strdup(argstart); } argv[loc+1] = NULL; return argv; } /* Ok this is a really big hack but what the hell ;) */ int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow) { char **argv; int argc; DWInstance = hInstance; argv = _convertargs(&argc, lpCmdLine); return main(argc, argv); } #endif DWORD GetDllVersion(LPCTSTR lpszDllName) { HINSTANCE hinstDll; DWORD dwVersion = 0; hinstDll = LoadLibrary(lpszDllName); if(hinstDll) { DLLGETVERSIONPROC pDllGetVersion; pDllGetVersion = (DLLGETVERSIONPROC) GetProcAddress(hinstDll, "DllGetVersion"); /* Because some DLLs might not implement this function, you * must test for it explicitly. Depending on the particular * DLL, the lack of a DllGetVersion function can be a useful * indicator of the version. */ if(pDllGetVersion) { DLLVERSIONINFO dvi; HRESULT hr; ZeroMemory(&dvi, sizeof(dvi)); dvi.cbSize = sizeof(dvi); hr = (*pDllGetVersion)(&dvi); if(SUCCEEDED(hr)) { dwVersion = PACKVERSION(dvi.dwMajorVersion, dvi.dwMinorVersion); } } FreeLibrary(hinstDll); } return dwVersion; } #ifdef GDIPLUS /* * List those icons that have transparency first * GDI+ List of supported formats: BMP, ICON, GIF, JPEG, Exif, PNG, TIFF, WMF, and EMF. * Not sure if we should include all these or not... maybe we should add TIFF and GIF? */ #define NUM_EXTS 8 char *image_exts[NUM_EXTS] = { "", ".png", ".ico", ".gif", ".jpg", ".jpeg", ".tiff", ".bmp" }; /* Section for loading files of types besides BMP and ICO and return HBITMAP or HICON */ void *_dw_load_gpbitmap( char *filename ) { int i, wclen = (strlen(filename) + 6) * sizeof(wchar_t); char *file = _alloca(strlen(filename) + 6); wchar_t *wfile = _alloca(wclen); void *image; /* Try various extentions */ for ( i = 0; i < NUM_EXTS; i++ ) { strcpy( file, filename ); strcat( file, image_exts[i] ); if ( _access( file, 04 ) == 0 ) { /* Convert to wide format */ MultiByteToWideChar(CP_ACP, 0, file, strlen(file)+1, wfile, wclen); if(!GdipCreateBitmapFromFile(wfile, &image)) return image; } } return NULL; } /* Try to load the appropriate image and return the HBITMAP handle */ HBITMAP _dw_load_bitmap(char *filename, unsigned long *depth) { void *bitmap = _dw_load_gpbitmap(filename); if(bitmap) { HBITMAP hbm = NULL; if(!GdipCreateHBITMAPFromBitmap(bitmap, &hbm, 0)) { if(depth) { INT pf; /* Default to 0 */ *depth = 0; /* Query the pixel format so we can determine the depth */ if(!GdipGetImagePixelFormat(bitmap, &pf)) { switch(pf) { case PixelFormat1bppIndexed: *depth = 1; break; case PixelFormat4bppIndexed: *depth = 4; break; case PixelFormat8bppIndexed: *depth = 8; break; case PixelFormat16bppGrayScale: case PixelFormat16bppRGB555: case PixelFormat16bppRGB565: case PixelFormat16bppARGB1555: *depth = 16; break; case PixelFormat24bppRGB: *depth = 24; break; case PixelFormat32bppRGB: case PixelFormat32bppARGB: case PixelFormat32bppPARGB: case PixelFormat32bppCMYK: *depth = 32; break; case PixelFormat48bppRGB: *depth = 48; break; case PixelFormat64bppARGB: case PixelFormat64bppPARGB: *depth = 64; break; } } } } GdipDisposeImage(bitmap); return hbm; } return NULL; } /* Try to load the appropriate image and return the HICON handle */ HICON _dw_load_icon(char *filename) { void *bitmap = _dw_load_gpbitmap(filename); if(bitmap) { HICON hicon = NULL; GdipCreateHICONFromBitmap(bitmap, &hicon); GdipDisposeImage(bitmap); return hicon; } return NULL; } #endif /* This function adds a signal handler callback into the linked list. */ void _new_signal(ULONG message, HWND window, int id, void *signalfunction, void *data) { SignalHandler *new = malloc(sizeof(SignalHandler)); new->message = message; new->window = window; new->id = id; new->signalfunction = signalfunction; new->data = data; new->next = NULL; if (!Root) { Root = new; } else { SignalHandler *prev = NULL, *tmp = Root; while(tmp) { if(tmp->message == message && tmp->window == window && tmp->id == id && tmp->signalfunction == signalfunction) { tmp->data = data; free(new); return; } prev = tmp; tmp = tmp->next; } if(prev) prev->next = new; else Root = new; } } /* Finds the message number for a given signal name */ ULONG _findsigmessage(char *signame) { int z; for(z=0;z<SIGNALMAX;z++) { if(stricmp(signame, SignalTranslate[z].name) == 0) return SignalTranslate[z].message; } return 0L; } /* This function removes and handlers on windows and frees * the user memory allocated to it. */ BOOL CALLBACK _free_window_memory(HWND handle, LPARAM lParam) { ColorInfo *thiscinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); HFONT oldfont = (HFONT)SendMessage(handle, WM_GETFONT, 0, 0); HICON oldicon = (HICON)SendMessage(handle, WM_GETICON, 0, 0); char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); /* Don't try to free memory from an OLE embedded IE */ if(strncmp(tmpbuf, "Internet Explorer_Server", 25) == 0) return TRUE; /* Delete font, icon and bitmap GDI objects in use */ if(oldfont) DeleteObject(oldfont); if(oldicon) DeleteObject(oldicon); if(strnicmp(tmpbuf, STATICCLASSNAME, strlen(STATICCLASSNAME)+1)==0) { HBITMAP oldbitmap = (HBITMAP)SendMessage(handle, STM_GETIMAGE, IMAGE_BITMAP, 0); if(oldbitmap) DeleteObject(oldbitmap); } if(strnicmp(tmpbuf, BUTTONCLASSNAME, strlen(BUTTONCLASSNAME)+1)==0) { HBITMAP oldbitmap = (HBITMAP)SendMessage(handle, BM_GETIMAGE, IMAGE_BITMAP, 0); if(oldbitmap) DeleteObject(oldbitmap); } else if(strnicmp(tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1)==0) { Box *box = (Box *)thiscinfo; if(box && box->count && box->items) free(box->items); } else if(strnicmp(tmpbuf, SplitbarClassName, strlen(SplitbarClassName)+1)==0) { void *data = dw_window_get_data(handle, "_dw_percent"); if(data) free(data); } else if(strnicmp(tmpbuf, WC_TREEVIEW, strlen(WC_TREEVIEW)+1)==0) { dw_tree_clear(handle); } else if(strnicmp(tmpbuf, WC_TABCONTROL, strlen(WC_TABCONTROL)+1)==0) /* Notebook */ { NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); if(array) { int z; for(z=0;z<256;z++) { if(array[z]) { _free_window_memory(array[z]->hwnd, 0); EnumChildWindows(array[z]->hwnd, _free_window_memory, 0); DestroyWindow(array[z]->hwnd); free(array[z]); } } free(array); } } else if(strnicmp(tmpbuf, UPDOWN_CLASS, strlen(UPDOWN_CLASS)+1)==0) { /* for spinbuttons, we need to get the spinbutton's "buddy", the text window associated and destroy it */ ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if(cinfo && cinfo->buddy) DestroyWindow( cinfo->buddy ); } dw_signal_disconnect_by_window(handle); if(thiscinfo) { if(thiscinfo->pOldProc) SetWindowLongPtr(handle, GWLP_WNDPROC, (LPARAM)(WNDPROC)thiscinfo->pOldProc); /* Delete the brush so as not to leak GDI objects */ if(thiscinfo->hbrush) DeleteObject(thiscinfo->hbrush); /* Free user data linked list memory */ if(thiscinfo->root) dw_window_set_data(handle, NULL, NULL); SetWindowLongPtr(handle, GWLP_USERDATA, 0); free(thiscinfo); } return TRUE; } void _free_menu_data(HMENU menu) { int i, count = GetMenuItemCount(menu); for(i=0;i<count;i++) { MENUITEMINFO mii; mii.cbSize = sizeof(MENUITEMINFO); mii.fMask = MIIM_SUBMENU | MIIM_ID; if ( GetMenuItemInfo( menu, i, TRUE, &mii ) ) { /* Free the data associated with the ID */ if(mii.wID >= 30000) { char buffer[31] = {0}; _snprintf(buffer, 30, "_dw_id%ld", mii.wID); dw_window_set_data( DW_HWND_OBJECT, buffer, NULL ); _snprintf(buffer, 30, "_dw_checkable%ld", mii.wID); dw_window_set_data( DW_HWND_OBJECT, buffer, NULL ); _snprintf(buffer, 30, "_dw_ischecked%ld", mii.wID); dw_window_set_data( DW_HWND_OBJECT, buffer, NULL ); _snprintf(buffer, 30, "_dw_isdisabled%ld", mii.wID); dw_window_set_data( DW_HWND_OBJECT, buffer, NULL ); } /* Check any submenus */ if( mii.hSubMenu ) _free_menu_data(mii.hSubMenu); } } dw_signal_disconnect_by_name((HWND)menu, DW_SIGNAL_CLICKED); } /* Convert to our internal color scheme */ ULONG _internal_color(ULONG color) { if(color == DW_CLR_DEFAULT) return DW_RGB_TRANSPARENT; if(color < 18) return DW_RGB(_red[color], _green[color], _blue[color]); return color; } /* This function returns 1 if the window (widget) handle * passed to it is a valid window that can gain input focus. */ int _validate_focus(HWND handle) { char tmpbuf[100] = {0}; if(!handle) return 0; if(!IsWindowEnabled(handle)) return 0; GetClassName(handle, tmpbuf, 99); /* These are the window classes which can * obtain input focus. */ if(strnicmp(tmpbuf, EDITCLASSNAME, strlen(EDITCLASSNAME)+1)==0 || /* Entryfield */ strnicmp(tmpbuf, BUTTONCLASSNAME, strlen(BUTTONCLASSNAME)+1)==0 || /* Button */ strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0 || /* Combobox */ strnicmp(tmpbuf, LISTBOXCLASSNAME, strlen(LISTBOXCLASSNAME)+1)==0 || /* List box */ strnicmp(tmpbuf, UPDOWN_CLASS, strlen(UPDOWN_CLASS)+1)==0 || /* Spinbutton */ strnicmp(tmpbuf, TRACKBAR_CLASS, strlen(TRACKBAR_CLASS)+1)==0 || /* Slider */ strnicmp(tmpbuf, WC_LISTVIEW, strlen(WC_LISTVIEW)+1)== 0 || /* Container */ strnicmp(tmpbuf, WC_TREEVIEW, strlen(WC_TREEVIEW)+1)== 0) /* Tree */ return 1; return 0; } HWND _normalize_handle(HWND handle) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, UPDOWN_CLASS, strlen(UPDOWN_CLASS))==0) /* Spinner */ { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if(cinfo && cinfo->buddy) return cinfo->buddy; } if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME))==0) /* Combobox */ { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if(cinfo && cinfo->buddy) return cinfo->buddy; } return handle; } int _focus_check_box(Box *box, HWND handle, int start, HWND defaultitem) { int z; static HWND lasthwnd, firsthwnd; static int finish_searching; /* Start is 2 when we have cycled completely and * need to set the focus to the last widget we found * that was valid. */ if(start == 2) { if(lasthwnd) SetFocus(lasthwnd); return 0; } /* Start is 1 when we are entering the function * for the first time, it is zero when entering * the function recursively. */ if(start == 1) { lasthwnd = handle; finish_searching = 0; firsthwnd = 0; } for(z=box->count-1;z>-1;z--) { if(box->items[z].type == TYPEBOX) { Box *thisbox = (Box *)GetWindowLongPtr(box->items[z].hwnd, GWLP_USERDATA); if(thisbox && _focus_check_box(thisbox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } else { if(box->items[z].hwnd == handle) { if(lasthwnd == handle && firsthwnd) SetFocus(firsthwnd); else if(lasthwnd == handle && !firsthwnd) finish_searching = 1; else SetFocus(lasthwnd); /* If we aren't looking for the last handle, * return immediately. */ if(!finish_searching) return 1; } if(_validate_focus(box->items[z].hwnd)) { /* Start is 3 when we are looking for the * first valid item in the layout. */ if(start == 3) { if(!defaultitem || (defaultitem && box->items[z].hwnd == defaultitem)) { SetFocus(_normalize_handle(box->items[z].hwnd)); return 1; } } if(!firsthwnd) firsthwnd = _normalize_handle(box->items[z].hwnd); lasthwnd = _normalize_handle(box->items[z].hwnd); } else { char tmpbuf[100] = {0}; GetClassName(box->items[z].hwnd, tmpbuf, 99); if(strncmp(tmpbuf, SplitbarClassName, strlen(SplitbarClassName)+1)==0) { /* Then try the bottom or right box */ HWND mybox = (HWND)dw_window_get_data(box->items[z].hwnd, "_dw_bottomright"); if(mybox) { Box *splitbox = (Box *)GetWindowLongPtr(mybox, GWLP_USERDATA); if(splitbox && _focus_check_box(splitbox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } /* Try the top or left box */ mybox = (HWND)dw_window_get_data(box->items[z].hwnd, "_dw_topleft"); if(mybox) { Box *splitbox = (Box *)GetWindowLongPtr(mybox, GWLP_USERDATA); if(splitbox && _focus_check_box(splitbox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } } else if(strnicmp(tmpbuf, WC_TABCONTROL, strlen(WC_TABCONTROL))==0) /* Notebook */ { NotebookPage **array = (NotebookPage **)dw_window_get_data(box->items[z].hwnd, "_dw_array"); int pageid = TabCtrl_GetCurSel(box->items[z].hwnd); if(pageid > -1 && array && array[pageid]) { Box *notebox; if(array[pageid]->hwnd) { notebox = (Box *)GetWindowLongPtr(array[pageid]->hwnd, GWLP_USERDATA); if(notebox && _focus_check_box(notebox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } } } else if(strnicmp(tmpbuf, ScrollClassName, strlen(ScrollClassName))==0) /* Scroll Box */ { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(box->items[z].hwnd, GWLP_USERDATA); Box *scrollbox = (Box *)GetWindowLongPtr(cinfo->combo, GWLP_USERDATA); if(scrollbox && _focus_check_box(scrollbox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } } } } return 0; } int _focus_check_box_back(Box *box, HWND handle, int start, HWND defaultitem) { int z; static HWND lasthwnd, firsthwnd; static int finish_searching; /* Start is 2 when we have cycled completely and * need to set the focus to the last widget we found * that was valid. */ if(start == 2) { if(lasthwnd) SetFocus(lasthwnd); return 0; } /* Start is 1 when we are entering the function * for the first time, it is zero when entering * the function recursively. */ if(start == 1) { lasthwnd = handle; finish_searching = 0; firsthwnd = 0; } for(z=0;z<box->count;z++) { if(box->items[z].type == TYPEBOX) { Box *thisbox = (Box *)GetWindowLongPtr(box->items[z].hwnd, GWLP_USERDATA); if(thisbox && _focus_check_box_back(thisbox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } else { if(box->items[z].hwnd == handle) { if(lasthwnd == handle && firsthwnd) SetFocus(firsthwnd); else if(lasthwnd == handle && !firsthwnd) finish_searching = 1; else SetFocus(lasthwnd); /* If we aren't looking for the last handle, * return immediately. */ if(!finish_searching) return 1; } if(_validate_focus(box->items[z].hwnd)) { /* Start is 3 when we are looking for the * first valid item in the layout. */ if(start == 3) { if(!defaultitem || (defaultitem && box->items[z].hwnd == defaultitem)) { SetFocus(_normalize_handle(box->items[z].hwnd)); return 1; } } if(!firsthwnd) firsthwnd = _normalize_handle(box->items[z].hwnd); lasthwnd = _normalize_handle(box->items[z].hwnd); } else { char tmpbuf[100] = {0}; GetClassName(box->items[z].hwnd, tmpbuf, 99); if(strncmp(tmpbuf, SplitbarClassName, strlen(SplitbarClassName)+1)==0) { /* Try the top or left box */ HWND mybox = (HWND)dw_window_get_data(box->items[z].hwnd, "_dw_topleft"); if(mybox) { Box *splitbox = (Box *)GetWindowLongPtr(mybox, GWLP_USERDATA); if(splitbox && _focus_check_box_back(splitbox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } /* Then try the bottom or right box */ mybox = (HWND)dw_window_get_data(box->items[z].hwnd, "_dw_bottomright"); if(mybox) { Box *splitbox = (Box *)GetWindowLongPtr(mybox, GWLP_USERDATA); if(splitbox && _focus_check_box_back(splitbox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } } else if(strnicmp(tmpbuf, WC_TABCONTROL, strlen(WC_TABCONTROL))==0) /* Notebook */ { NotebookPage **array = (NotebookPage **)dw_window_get_data(box->items[z].hwnd, "_dw_array"); int pageid = TabCtrl_GetCurSel(box->items[z].hwnd); if(pageid > -1 && array && array[pageid]) { Box *notebox; if(array[pageid]->hwnd) { notebox = (Box *)GetWindowLongPtr(array[pageid]->hwnd, GWLP_USERDATA); if(notebox && _focus_check_box_back(notebox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } } } else if(strnicmp(tmpbuf, ScrollClassName, strlen(ScrollClassName))==0) /* Scroll Box */ { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(box->items[z].hwnd, GWLP_USERDATA); Box *scrollbox = (Box *)GetWindowLongPtr(cinfo->combo, GWLP_USERDATA); if(scrollbox && _focus_check_box_back(scrollbox, handle, start == 3 ? 3 : 0, defaultitem)) return 1; } } } } return 0; } /* This function finds the first widget in the * layout and moves the current focus to it. */ void _initial_focus(HWND handle) { Box *thisbox; char tmpbuf[100] = {0}; if(!handle) return; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, ClassName, strlen(ClassName)+1)!=0) return; if(handle) thisbox = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); if(thisbox) { _focus_check_box(thisbox, handle, 3, thisbox->defaultitem); } } HWND _toplevel_window(HWND handle) { HWND box, lastbox = GetParent(handle); /* Find the toplevel window */ while((box = GetParent(lastbox))) { /* If it hasn't been packed yet.. */ if(box == DW_HWND_OBJECT) return 0; lastbox = box; } if(lastbox) { char tmpbuf[100] = {0}; GetClassName(lastbox, tmpbuf, 99); if(strncmp(tmpbuf, ClassName, strlen(ClassName)+1)==0) return lastbox; } return 0; } /* This function finds the current widget in the * layout and moves the current focus to the next item. */ void _shift_focus(HWND handle) { Box *thisbox; HWND box, lastbox = GetParent(handle); /* Find the toplevel window */ while((box = GetParent(lastbox))) { lastbox = box; } thisbox = (Box *)GetWindowLongPtr(lastbox, GWLP_USERDATA); if(thisbox) { if(_focus_check_box(thisbox, handle, 1, 0) == 0) _focus_check_box(thisbox, handle, 2, 0); } } /* This function finds the current widget in the * layout and moves the current focus to the next item. */ void _shift_focus_back(HWND handle) { Box *thisbox; HWND box, lastbox = GetParent(handle); /* Find the toplevel window */ while((box = GetParent(lastbox))) { lastbox = box; } thisbox = (Box *)GetWindowLongPtr(lastbox, GWLP_USERDATA); if(thisbox) { if(_focus_check_box_back(thisbox, handle, 1, 0) == 0) _focus_check_box_back(thisbox, handle, 2, 0); } } /* This function calculates how much space the widgets and boxes require * and does expansion as necessary. */ static void _resize_box(Box *thisbox, int *depth, int x, int y, int pass) { /* Current item position */ int z, currentx = thisbox->pad, currenty = thisbox->pad; /* Used x, y and padding maximum values... * These will be used to find the widest or * tallest items in a box. */ int uymax = 0, uxmax = 0; int upymax = 0, upxmax = 0; /* Reset the box sizes */ thisbox->minwidth = thisbox->minheight = thisbox->usedpadx = thisbox->usedpady = thisbox->pad * 2; if(thisbox->grouphwnd) { /* Only calculate the size on the first pass... * use the cached values on second. */ if(pass == 1) { char *text = dw_window_get_text(thisbox->grouphwnd); thisbox->grouppady = 9; if(text) { if(*text) dw_font_text_extents_get(thisbox->grouphwnd, 0, text, NULL, &thisbox->grouppady); dw_free(text); } /* If the string height is less than 9... * set it to 9 anyway since that is the minimum. */ if(thisbox->grouppady < 9) thisbox->grouppady = 9; if(thisbox->grouppady) thisbox->grouppady += 3; else thisbox->grouppady = 6; thisbox->grouppadx = 6; } thisbox->minwidth += thisbox->grouppadx; thisbox->usedpadx += thisbox->grouppadx; thisbox->minheight += thisbox->grouppady; thisbox->usedpady += thisbox->grouppady; } /* Count up all the space for all items in the box */ for(z=0;z<thisbox->count;z++) { int itempad, itemwidth, itemheight; if(thisbox->items[z].type == TYPEBOX) { Box *tmp = (Box *)GetWindowLongPtr(thisbox->items[z].hwnd, GWLP_USERDATA); if(tmp) { /* On the first pass calculate the box contents */ if(pass == 1) { (*depth)++; /* Save the newly calculated values on the box */ _resize_box(tmp, depth, x, y, pass); /* Duplicate the values in the item list for use below */ thisbox->items[z].width = tmp->minwidth; thisbox->items[z].height = tmp->minheight; /* If the box has no contents but is expandable... default the size to 1 */ if(!thisbox->items[z].width && thisbox->items[z].hsize) thisbox->items[z].width = 1; if(!thisbox->items[z].height && thisbox->items[z].vsize) thisbox->items[z].height = 1; (*depth)--; } } } /* Precalculate these values, since they will * be used used repeatedly in the next section. */ itempad = thisbox->items[z].pad * 2; itemwidth = thisbox->items[z].width + itempad; itemheight = thisbox->items[z].height + itempad; /* Calculate the totals and maximums */ if(thisbox->type == DW_VERT) { if(itemwidth > uxmax) uxmax = itemwidth; if(thisbox->items[z].hsize != SIZEEXPAND) { if(itemwidth > upxmax) upxmax = itemwidth; } else { if(itempad > upxmax) upxmax = itempad; } thisbox->minheight += itemheight; if(thisbox->items[z].vsize != SIZEEXPAND) thisbox->usedpady += itemheight; else thisbox->usedpady += itempad; } else { if(itemheight > uymax) uymax = itemheight; if(thisbox->items[z].vsize != SIZEEXPAND) { if(itemheight > upymax) upymax = itemheight; } else { if(itempad > upymax) upymax = itempad; } thisbox->minwidth += itemwidth; if(thisbox->items[z].hsize != SIZEEXPAND) thisbox->usedpadx += itemwidth; else thisbox->usedpadx += itempad; } } /* Add the maximums which were calculated in the previous loop */ thisbox->minwidth += uxmax; thisbox->minheight += uymax; thisbox->usedpadx += upxmax; thisbox->usedpady += upymax; /* Move the groupbox start past the group border */ if(thisbox->grouphwnd) { currentx += 3; currenty += thisbox->grouppady - 3; } /* The second pass is for actual placement. */ if(pass > 1) { for(z=0;z<(thisbox->count);z++) { int height = thisbox->items[z].height; int width = thisbox->items[z].width; int itempad = thisbox->items[z].pad * 2; int thispad = thisbox->pad * 2; /* Calculate the new sizes */ if(thisbox->items[z].hsize == SIZEEXPAND) { if(thisbox->type == DW_HORZ) { int expandablex = thisbox->minwidth - thisbox->usedpadx; if(expandablex) width = (int)(((float)width / (float)expandablex) * (float)(x - thisbox->usedpadx)); } else width = x - (itempad + thispad + thisbox->grouppadx); } if(thisbox->items[z].vsize == SIZEEXPAND) { if(thisbox->type == DW_VERT) { int expandabley = thisbox->minheight - thisbox->usedpady; if(expandabley) height = (int)(((float)height / (float)expandabley) * (float)(y - thisbox->usedpady)); } else height = y - (itempad + thispad + thisbox->grouppady); } /* If the calculated size is valid... */ if(width > 0 && height > 0) { int pad = thisbox->items[z].pad; HWND handle = thisbox->items[z].hwnd; char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) { /* Handle special case Combobox */ MoveWindow(handle, currentx + pad, currenty + pad, width, height + 400, FALSE); } else if(strnicmp(tmpbuf, UPDOWN_CLASS, strlen(UPDOWN_CLASS)+1)==0) { /* Handle special case Spinbutton */ ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); MoveWindow(handle, currentx + pad + (width - 20), currenty + pad, 20, height, FALSE); if(cinfo) { MoveWindow(cinfo->buddy, currentx + pad, currenty + pad, width - 20, height, FALSE); } } else if(strncmp(tmpbuf, ScrollClassName, strlen(ScrollClassName)+1)==0) { /* Handle special case of scrollbox */ ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); int cx, cy, depth = 0; Box *thisbox = (Box *)GetWindowLongPtr(cinfo->combo, GWLP_USERDATA); SCROLLINFO hsi, vsi; RECT rect; vsi.cbSize = hsi.cbSize = sizeof(SCROLLINFO); vsi.fMask = hsi.fMask = SIF_POS; /* Save the current scroll positions */ GetScrollInfo(handle, SB_HORZ, &hsi); GetScrollInfo(handle, SB_VERT, &vsi); /* Position the scrollbox */ MoveWindow(handle, currentx + pad, currenty + pad, width, height, FALSE); GetClientRect(handle, &rect); cx = rect.right; cy = rect.bottom; /* Get the required space for the box */ _resize_box(thisbox, &depth, cx, cy, 1); if(cx < thisbox->minwidth) { cx = thisbox->minwidth; } if(cy < thisbox->minheight) { cy = thisbox->minheight; } /* Position the scrolled box */ vsi.fMask = hsi.fMask = SIF_POS | SIF_RANGE | SIF_PAGE | SIF_DISABLENOSCROLL; vsi.nMin = hsi.nMin = vsi.nMax = hsi.nMax = 0; if(rect.bottom < thisbox->minheight) { vsi.nMax = thisbox->minheight; vsi.nPage = rect.bottom; if(vsi.nPos > vsi.nMax) { vsi.nPos = vsi.nMax; } } if(rect.right < thisbox->minwidth) { hsi.nMax = thisbox->minwidth; hsi.nPage = rect.right; if(hsi.nPos > hsi.nMax) { hsi.nPos = hsi.nMax; } } MoveWindow(cinfo->combo, -hsi.nPos, -vsi.nPos, cx, cy, FALSE); SetScrollInfo(handle, SB_HORZ, &hsi, TRUE); SetScrollInfo(handle, SB_VERT, &vsi, TRUE); /* Layout the content of the scrollbox */ _do_resize(thisbox, cx, cy); } else if(strncmp(tmpbuf, SplitbarClassName, strlen(SplitbarClassName)+1)==0) { /* Then try the bottom or right box */ float *percent = (float *)dw_window_get_data(handle, "_dw_percent"); int type = (int)dw_window_get_data(handle, "_dw_type"); MoveWindow(handle, currentx + pad, currenty + pad, width, height, FALSE); if(percent && width > 0 && height > 0) _handle_splitbar_resize(handle, *percent, type, width, height); } else if(strnicmp(tmpbuf, STATICCLASSNAME, strlen(STATICCLASSNAME)+1)==0) { /* Handle special case Vertically Center static text */ ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if(cinfo && cinfo->vcenter) { /* We are centered so calculate a new position */ char tmpbuf[1024] = {0}; int textheight, diff, total = height; GetWindowText(handle, tmpbuf, 1023); /* Figure out how big the text is */ dw_font_text_extents_get(handle, 0, tmpbuf, 0, &textheight); diff = (total - textheight) / 2; MoveWindow(handle, currentx + pad, currenty + pad + diff, width, height - diff, FALSE); } else { MoveWindow(handle, currentx + pad, currenty + pad, width, height, FALSE); } } else { /* Everything else */ if(*depth) MoveWindow(handle, currentx + pad, currenty + pad, width, height, FALSE); else /* FIXME: This is a hack to generate WM_PAINT messages for items on the top-level */ SetWindowPos(handle, HWND_TOP, currentx + pad, currenty + pad, width, height, 0); /* After placing a box... place its components */ if(thisbox->items[z].type == TYPEBOX) { Box *boxinfo = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); if(boxinfo) { /* Move the group border into place */ if(boxinfo->grouphwnd) { MoveWindow(boxinfo->grouphwnd, 0, 0, width, height, FALSE); } /* Dive into the box */ (*depth)++; _resize_box(boxinfo, depth, width, height, pass); (*depth)--; } } } /* Notebook dialog requires additional processing */ if(strncmp(tmpbuf, WC_TABCONTROL, strlen(WC_TABCONTROL))==0) { RECT rect; NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); int pageid = TabCtrl_GetCurSel(handle); if(pageid > -1 && array && array[pageid]) { GetClientRect(handle,&rect); TabCtrl_AdjustRect(handle,FALSE,&rect); MoveWindow(array[pageid]->hwnd, rect.left, rect.top, rect.right - rect.left, rect.bottom-rect.top, FALSE); dw_window_redraw(array[pageid]->hwnd); } } /* So does the List View... handle delayed cursoring */ if(strnicmp(tmpbuf, WC_LISTVIEW, strlen(WC_LISTVIEW)+1)==0 && width > 10 && height > 10) { int index = DW_POINTER_TO_INT(dw_window_get_data(handle, "_dw_cursor")); if(index > 0) ListView_EnsureVisible(handle, index, TRUE); } /* Advance the current position in the box */ if(thisbox->type == DW_HORZ) currentx += width + (pad * 2); if(thisbox->type == DW_VERT) currenty += height + (pad * 2); } } } } void _do_resize(Box *thisbox, int x, int y) { if(x != 0 && y != 0) { if(thisbox) { int depth = 0; /* Calculate space requirements */ _resize_box(thisbox, &depth, x, y, 1); /* Finally place all the boxes and controls */ _resize_box(thisbox, &depth, x, y, 2); } } } int _HandleScroller(HWND handle, int bar, int pos, int which) { SCROLLINFO si; ZeroMemory( &si, sizeof(si) ); si.cbSize = sizeof(SCROLLINFO); si.fMask = SIF_ALL; SendMessage(handle, SBM_GETSCROLLINFO, 0, (LPARAM)&si); switch(which) { case SB_THUMBTRACK: return pos; /*case SB_PAGEUP:*/ case SB_PAGELEFT: pos = si.nPos - si.nPage; if(pos < si.nMin) pos = si.nMin; return pos; /*case SB_PAGEDOWN:*/ case SB_PAGERIGHT: pos = si.nPos + si.nPage; if(pos > (si.nMax - si.nPage) + 1) pos = (si.nMax - si.nPage) + 1; return pos; /*case SB_LINEUP:*/ case SB_LINELEFT: pos = si.nPos - 1; if(pos < si.nMin) pos = si.nMin; return pos; /*case SB_LINEDOWN:*/ case SB_LINERIGHT: pos = si.nPos + 1; if(pos > (si.nMax - si.nPage) + 1) pos = (si.nMax - si.nPage) + 1; return pos; } return -1; } HMENU _get_owner(HMENU menu) { MENUINFO mi; mi.cbSize = sizeof(MENUINFO); mi.fMask = MIM_MENUDATA; if ( GetMenuInfo( menu, &mi ) ) return (HMENU)mi.dwMenuData; return (HMENU)0; } /* Find the desktop window handle */ HMENU _menu_owner(HMENU handle) { HMENU menuowner = 0, lastowner = _get_owner(handle); /* Find the toplevel menu */ while((menuowner = _get_owner(lastowner)) != 0) { if(menuowner == (HMENU)1) return lastowner; lastowner = menuowner; } return (HMENU)0; } /* * Determine if this is a checkable menu. If it is get the current state * and toggle it. Windows doesn't do this automatically :-( */ static void _dw_toggle_checkable_menu_item( HWND window, int id ) { char buffer[40]; int checkable; sprintf( buffer, "_dw_checkable%d", id ); checkable = (int)dw_window_get_data(DW_HWND_OBJECT, buffer); if ( checkable ) { int is_checked; sprintf( buffer, "_dw_ischecked%d", id ); is_checked = (int)dw_window_get_data(DW_HWND_OBJECT, buffer); is_checked = (is_checked) ? 0 : 1; dw_menu_item_set_check( window, id, is_checked ); } } /* The main window procedure for Dynamic Windows, all the resizing code is done here. */ BOOL CALLBACK _wndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { int result = -1, taskbar = FALSE; static int command_active = 0; SignalHandler *tmp = Root; void (*windowfunc)(PVOID); ULONG origmsg = msg; /* Deal with translating some messages */ if (msg == WM_USER+2) { taskbar = TRUE; origmsg = msg = (UINT)mp2; /* no else here */ } if (msg == WM_RBUTTONDOWN || msg == WM_MBUTTONDOWN) msg = WM_LBUTTONDOWN; else if (msg == WM_RBUTTONUP || msg == WM_MBUTTONUP) msg = WM_LBUTTONUP; else if (msg == WM_HSCROLL) msg = WM_VSCROLL; else if (msg == WM_KEYDOWN) /* && mp1 >= VK_F1 && mp1 <= VK_F24) allow ALL special keys */ msg = WM_CHAR; if (result == -1) { /* Avoid infinite recursion */ command_active = 1; /* Find any callbacks for this function */ while (tmp) { if (tmp->message == msg || msg == WM_COMMAND || msg == WM_NOTIFY || tmp->message == WM_USER+1) { switch (msg) { case WM_TIMER: { if (!hWnd) { int (*timerfunc)(void *) = tmp->signalfunction; if (tmp->id == (int)mp1) { if (!timerfunc(tmp->data)) { dw_timer_disconnect(tmp->id); } tmp = NULL; } } result = 0; } break; case WM_SETFOCUS: { int (*setfocusfunc)(HWND, void *) = (int (*)(HWND, void *))tmp->signalfunction; if(hWnd == tmp->window) { result = setfocusfunc(tmp->window, tmp->data); tmp = NULL; } } break; case WM_SIZE: { int (*sizefunc)(HWND, int, int, void *) = tmp->signalfunction; if(hWnd == tmp->window) { result = sizefunc(tmp->window, LOWORD(mp2), HIWORD(mp2), tmp->data); tmp = NULL; } } break; case WM_LBUTTONDOWN: { int (*buttonfunc)(HWND, int, int, int, void *) = (int (*)(HWND, int, int, int, void *))tmp->signalfunction; if(hWnd == tmp->window) { int button=0; switch(origmsg) { case WM_LBUTTONDOWN: button = 1; break; case WM_RBUTTONDOWN: button = 2; break; case WM_MBUTTONDOWN: button = 3; break; } if(taskbar) { POINT ptl; GetCursorPos(&ptl); result = buttonfunc(tmp->window, ptl.x, ptl.y, button, tmp->data); } else { POINTS pts = MAKEPOINTS(mp2); result = buttonfunc(tmp->window, pts.x, pts.y, button, tmp->data); } tmp = NULL; } } break; case WM_LBUTTONUP: { int (*buttonfunc)(HWND, int, int, int, void *) = (int (*)(HWND, int, int, int, void *))tmp->signalfunction; if(hWnd == tmp->window) { int button=0; switch(origmsg) { case WM_LBUTTONUP: button = 1; break; case WM_RBUTTONUP: button = 2; break; case WM_MBUTTONUP: button = 3; break; } if(taskbar) { POINT ptl; GetCursorPos(&ptl); result = buttonfunc(tmp->window, ptl.x, ptl.y, button, tmp->data); } else { POINTS pts = MAKEPOINTS(mp2); result = buttonfunc(tmp->window, pts.x, pts.y, button, tmp->data); } tmp = NULL; } } break; case WM_MOUSEMOVE: { POINTS pts = MAKEPOINTS(mp2); int (*motionfunc)(HWND, int, int, int, void *) = (int (*)(HWND, int, int, int, void *))tmp->signalfunction; if(hWnd == tmp->window) { int keys = 0; if (mp1 & MK_LBUTTON) keys = DW_BUTTON1_MASK; if (mp1 & MK_RBUTTON) keys |= DW_BUTTON2_MASK; if (mp1 & MK_MBUTTON) keys |= DW_BUTTON3_MASK; result = motionfunc(tmp->window, pts.x, pts.y, keys, tmp->data); tmp = NULL; } } break; case WM_CHAR: { int (*keypressfunc)(HWND, char, int, int, void *) = tmp->signalfunction; if(hWnd == tmp->window || _toplevel_window(hWnd) == tmp->window) { int special = 0; char ch = 0; if(GetAsyncKeyState(VK_SHIFT) & 0x8000) special |= KC_SHIFT; if(GetAsyncKeyState(VK_CONTROL) & 0x8000) special |= KC_CTRL; if(mp2 & (1 << 29)) special |= KC_ALT; if(origmsg == WM_CHAR && mp1 < 128) ch = (char)mp1; result = keypressfunc(tmp->window, ch, mp1, special, tmp->data); tmp = NULL; } } break; case WM_CLOSE: { int (*closefunc)(HWND, void *) = tmp->signalfunction; if(hWnd == tmp->window) { result = closefunc(tmp->window, tmp->data); tmp = NULL; } } break; case WM_PAINT: { PAINTSTRUCT ps; DWExpose exp; int (*exposefunc)(HWND, DWExpose *, void *) = tmp->signalfunction; if ( hWnd == tmp->window ) { BeginPaint(hWnd, &ps); exp.x = ps.rcPaint.left; exp.y = ps.rcPaint.top; exp.width = ps.rcPaint.right - ps.rcPaint.left; exp.height = ps.rcPaint.bottom - ps.rcPaint.top; result = exposefunc(hWnd, &exp, tmp->data); EndPaint(hWnd, &ps); } } break; case WM_NOTIFY: { if(tmp->message == TVN_SELCHANGED || tmp->message == NM_RCLICK || tmp->message == TVN_ITEMEXPANDED) { NMTREEVIEW FAR *tem=(NMTREEVIEW FAR *)mp2; NMLISTVIEW FAR *lem=(NMLISTVIEW FAR *)mp2; char tmpbuf[100] = {0}; GetClassName(tem->hdr.hwndFrom, tmpbuf, 99); if(strnicmp(tmpbuf, WC_TREEVIEW, strlen(WC_TREEVIEW))==0) { if(tem->hdr.code == TVN_SELCHANGED && tmp->message == TVN_SELCHANGED) { if(tmp->window == tem->hdr.hwndFrom && !dw_window_get_data(tmp->window, "_dw_select_item")) { int (*treeselectfunc)(HWND, HTREEITEM, char *, void *, void *) = tmp->signalfunction; TVITEM tvi; void **ptrs; tvi.mask = TVIF_HANDLE | TVIF_PARAM; tvi.hItem = tem->itemNew.hItem; TreeView_GetItem(tmp->window, &tvi); ptrs = (void **)tvi.lParam; if(ptrs) result = treeselectfunc(tmp->window, tem->itemNew.hItem, (char *)ptrs[0], tmp->data, (void *)ptrs[1]); tmp = NULL; } } else if(tem->hdr.code == TVN_ITEMEXPANDED && tmp->message == TVN_ITEMEXPANDED) { if(tmp->window == tem->hdr.hwndFrom && tem->action == TVE_EXPAND) { int (*treeexpandfunc)(HWND, HTREEITEM, void *) = tmp->signalfunction; result = treeexpandfunc(tmp->window, tem->itemNew.hItem, tmp->data); tmp = NULL; } } else if(tem->hdr.code == NM_RCLICK && tmp->message == NM_RCLICK) { if(tmp->window == tem->hdr.hwndFrom) { int (*containercontextfunc)(HWND, char *, int, int, void *, void *) = tmp->signalfunction; HTREEITEM hti, last; TVITEM tvi; TVHITTESTINFO thi; void **ptrs = NULL; LONG x, y; dw_pointer_query_pos(&x, &y); thi.pt.x = x; thi.pt.y = y; MapWindowPoints(HWND_DESKTOP, tmp->window, &thi.pt, 1); last = TreeView_GetSelection(tmp->window); hti = TreeView_HitTest(tmp->window, &thi); if(hti) { tvi.mask = TVIF_HANDLE | TVIF_PARAM; tvi.hItem = hti; TreeView_GetItem(tmp->window, &tvi); TreeView_SelectItem(tmp->window, hti); ptrs = (void **)tvi.lParam; } containercontextfunc(tmp->window, ptrs ? (char *)ptrs[0] : NULL, x, y, tmp->data, ptrs ? ptrs[1] : NULL); tmp = NULL; } } } else if(strnicmp(tmpbuf, WC_LISTVIEW, strlen(WC_LISTVIEW)+1)==0) { if((lem->hdr.code == LVN_ITEMCHANGED && (lem->uChanged & LVIF_STATE)) && tmp->message == TVN_SELCHANGED) { if(tmp->window == tem->hdr.hwndFrom) { LV_ITEM lvi; int iItem; iItem = ListView_GetNextItem(tmp->window, -1, LVNI_SELECTED); memset(&lvi, 0, sizeof(LV_ITEM)); if(iItem > -1) { int (*treeselectfunc)(HWND, HWND, char *, void *, void *) = tmp->signalfunction; lvi.iItem = iItem; lvi.mask = LVIF_PARAM; ListView_GetItem(tmp->window, &lvi); /* Seems to be having lParam as 1 which really sucks */ if(lvi.lParam < 100) lvi.lParam = 0; treeselectfunc(tmp->window, 0, (char *)lvi.lParam, tmp->data, 0); tmp = NULL; } } } } } else if(tmp->message == TCN_SELCHANGE) { NMHDR FAR *tem=(NMHDR FAR *)mp2; if(tmp->window == tem->hwndFrom && tem->code == tmp->message) { int (*switchpagefunc)(HWND, unsigned long, void *) = tmp->signalfunction; unsigned long num=dw_notebook_page_get(tem->hwndFrom); result = switchpagefunc(tem->hwndFrom, num, tmp->data); tmp = NULL; } } else if(tmp->message == LVN_COLUMNCLICK) { NMLISTVIEW FAR *tem=(NMLISTVIEW FAR *)mp2; if(tmp->window == tem->hdr.hwndFrom && tem->hdr.code == tmp->message) { int (*columnclickfunc)(HWND, int, void *) = tmp->signalfunction; result = columnclickfunc(tem->hdr.hwndFrom, tem->iSubItem, tmp->data); tmp = NULL; } } } break; case WM_COMMAND: { int (*clickfunc)(HWND, void *) = tmp->signalfunction; HWND command; ULONG passthru = (ULONG)LOWORD(mp1); ULONG message = HIWORD(mp1); command = (HWND)passthru; if (message == LBN_SELCHANGE || message == CBN_SELCHANGE) { int (*listboxselectfunc)(HWND, int, void *) = tmp->signalfunction; if (tmp->message == LBN_SELCHANGE && tmp->window == (HWND)mp2) { result = listboxselectfunc(tmp->window, dw_listbox_selected(tmp->window), tmp->data); tmp = NULL; } } else if (tmp->id && passthru == tmp->id) { HMENU hwndmenu = GetMenu(hWnd), menuowner = _menu_owner((HMENU)tmp->window); if (menuowner == hwndmenu || !menuowner) { _dw_toggle_checkable_menu_item( tmp->window, tmp->id ); /* * Call the user supplied callback */ result = clickfunc((HWND)tmp->id, tmp->data); tmp = NULL; } } /* this fires for checkable menu items */ else if ( tmp->window < (HWND)65536 && command == tmp->window && tmp->message != WM_TIMER ) { _dw_toggle_checkable_menu_item( popup ? popup : tmp->window, (int)tmp->data ); result = clickfunc(popup ? popup : tmp->window, tmp->data); tmp = NULL; } } break; case WM_HSCROLL: case WM_VSCROLL: { char tmpbuf[100] = {0}; HWND handle = (HWND)mp2; int (*valuechangefunc)(HWND, int, void *) = tmp->signalfunction; if(!GetClassName(handle, tmpbuf, 99)) { GetClassName(hWnd, tmpbuf, 99); } if (strnicmp(tmpbuf, TRACKBAR_CLASS, strlen(TRACKBAR_CLASS)+1)==0) { if (handle == tmp->window) { int value = (int)SendMessage(handle, TBM_GETPOS, 0, 0); int max = (int)SendMessage(handle, TBM_GETRANGEMAX, 0, 0); ULONG currentstyle = GetWindowLong(handle, GWL_STYLE); if(currentstyle & TBS_VERT) result = valuechangefunc(tmp->window, max - value, tmp->data); else result = valuechangefunc(tmp->window, value, tmp->data); tmp = NULL; } } else if(strnicmp(tmpbuf, SCROLLBARCLASSNAME, strlen(SCROLLBARCLASSNAME)+1)==0) { if(handle == tmp->window) { int bar = (origmsg == WM_HSCROLL) ? SB_HORZ : SB_VERT; int value = _HandleScroller(handle, bar, (int)HIWORD(mp1), (int)LOWORD(mp1)); if(value > -1) { dw_scrollbar_set_pos(tmp->window, value); result = valuechangefunc(tmp->window, value, tmp->data); } tmp = NULL; msg = 0; } } } break; } } if(tmp) tmp = tmp->next; } command_active = 0; } /* Now that any handlers are done... do normal processing */ switch( msg ) { #ifdef AEROGLASS case WM_DWMCOMPOSITIONCHANGED: { DWORD styleex = GetWindowLongPtr(hWnd, GWL_EXSTYLE); if(_DwmIsCompositionEnabled) _DwmIsCompositionEnabled(&_dw_composition); /* If we are no longer compositing... disable layered windows */ if(!_dw_composition && (styleex & WS_EX_LAYERED)) { MARGINS mar = {0}; SetWindowLongPtr(hWnd, GWL_EXSTYLE, styleex & ~WS_EX_LAYERED); if(_DwmExtendFrameIntoClientArea) _DwmExtendFrameIntoClientArea(hWnd, &mar); } } break; #endif #ifdef AEROGLASS1 case WM_ERASEBKGND: if(_dw_composition && (GetWindowLongPtr(hWnd, GWL_EXSTYLE) & WS_EX_LAYERED)) { static HBRUSH hbrush = 0; RECT rect; if(!hbrush) hbrush = CreateSolidBrush(_dw_transparencykey); GetClientRect(hWnd, &rect); FillRect((HDC)mp1, &rect, hbrush); return TRUE; } break; #endif case WM_PAINT: { PAINTSTRUCT ps; BeginPaint(hWnd, &ps); EndPaint(hWnd, &ps); } break; case WM_SIZE: { static int lastx = -1, lasty = -1; static HWND lasthwnd = 0; if(lastx != LOWORD(mp2) || lasty != HIWORD(mp2) || lasthwnd != hWnd) { Box *mybox = (Box *)GetWindowLongPtr(hWnd, GWLP_USERDATA); if(mybox && mybox->count) { lastx = LOWORD(mp2); lasty = HIWORD(mp2); lasthwnd = hWnd; ShowWindow(mybox->items[0].hwnd, SW_HIDE); _do_resize(mybox,LOWORD(mp2),HIWORD(mp2)); ShowWindow(mybox->items[0].hwnd, SW_SHOW); return 0; } } } break; case WM_USER: windowfunc = (void *)mp1; if(windowfunc) windowfunc((void *)mp2); break; case WM_USER+5: _free_menu_data((HMENU)mp1); DestroyMenu((HMENU)mp1); break; case WM_NOTIFY: { NMHDR FAR *tem=(NMHDR FAR *)mp2; if(tem->code == TCN_SELCHANGING) { int num=TabCtrl_GetCurSel(tem->hwndFrom); NotebookPage **array = (NotebookPage **)dw_window_get_data(tem->hwndFrom, "_dw_array"); if(num > -1 && array && array[num]) SetParent(array[num]->hwnd, DW_HWND_OBJECT); } else if(tem->code == TCN_SELCHANGE) { int num=TabCtrl_GetCurSel(tem->hwndFrom); NotebookPage **array = (NotebookPage **)dw_window_get_data(tem->hwndFrom, "_dw_array"); if(num > -1 && array && array[num]) SetParent(array[num]->hwnd, tem->hwndFrom); _resize_notebook_page(tem->hwndFrom, num); } } break; case WM_HSCROLL: case WM_VSCROLL: { HWND handle = (HWND)mp2; int bar = (origmsg == WM_HSCROLL) ? SB_HORZ : SB_VERT; if(dw_window_get_data(handle, "_dw_scrollbar")) { int value = _HandleScroller(handle, bar, (int)HIWORD(mp1), (int)LOWORD(mp1)); if(value > -1) dw_scrollbar_set_pos(handle, value); } else { char tmpbuf[100] = {0}; GetClassName( hWnd, tmpbuf, 99 ); if ( strnicmp(tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1 ) == 0 ) { _HandleScroller(hWnd, bar, (int)HIWORD(mp1), (int)LOWORD(mp1)); } } } break; case WM_GETMINMAXINFO: { MINMAXINFO *info = (MINMAXINFO *)mp2; info->ptMinTrackSize.x = 8; info->ptMinTrackSize.y = 8; return 0; } break; case WM_DESTROY: { HMENU menu = GetMenu(hWnd); if(menu) _free_menu_data(menu); /* Free memory before destroying */ _free_window_memory(hWnd, 0); EnumChildWindows(hWnd, _free_window_memory, 0); } break; case WM_MOUSEMOVE: { HCURSOR cursor; if((cursor = (HCURSOR)dw_window_get_data(hWnd, "_dw_cursor")) || (cursor = (HCURSOR)dw_window_get_data(_toplevel_window(hWnd), "_dw_cursor"))) { SetCursor(cursor); } } break; case WM_CTLCOLORSTATIC: case WM_CTLCOLORLISTBOX: case WM_CTLCOLORBTN: case WM_CTLCOLOREDIT: case WM_CTLCOLORMSGBOX: case WM_CTLCOLORSCROLLBAR: case WM_CTLCOLORDLG: return _colorwndproc(hWnd, msg, mp1, mp2); } if(result != -1) { /* Make sure any queued redraws are handled */ _dw_redraw(0, FALSE); /* Then finally return */ return result; } return DefWindowProc(hWnd, msg, mp1, mp2); } VOID CALLBACK _TimerProc(HWND hwnd, UINT msg, UINT_PTR idEvent, DWORD dwTime) { _wndproc(hwnd, msg, (WPARAM)idEvent, 0); } BOOL CALLBACK _framewndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { switch( msg ) { case WM_LBUTTONDOWN: case WM_MBUTTONDOWN: case WM_RBUTTONDOWN: SetActiveWindow(hWnd); SetFocus(hWnd); break; case WM_COMMAND: case WM_NOTIFY: case WM_MOUSEMOVE: _wndproc(hWnd, msg, mp1, mp2); break; #ifdef AEROGLASS case WM_ERASEBKGND: if(_dw_composition && (GetWindowLongPtr(_toplevel_window(hWnd), GWL_EXSTYLE) & WS_EX_LAYERED)) { static HBRUSH hbrush = 0; RECT rect; if(!hbrush) hbrush = CreateSolidBrush(_dw_transparencykey); GetClientRect(hWnd, &rect); FillRect((HDC)mp1, &rect, hbrush); return TRUE; } break; #endif case WM_PAINT: { ColorInfo *thiscinfo = (ColorInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); if(thiscinfo && thiscinfo->fore != -1 && thiscinfo->back != -1) { PAINTSTRUCT ps; HDC hdcPaint = BeginPaint(hWnd, &ps); int success = FALSE; if(thiscinfo && thiscinfo->fore != -1 && thiscinfo->back != -1) { /* Handle foreground */ if(thiscinfo->fore > -1 && thiscinfo->fore < 18) { if(thiscinfo->fore != DW_CLR_DEFAULT) { SetTextColor((HDC)mp1, RGB(_red[thiscinfo->fore], _green[thiscinfo->fore], _blue[thiscinfo->fore])); } } else if((thiscinfo->fore & DW_RGB_COLOR) == DW_RGB_COLOR) { SetTextColor((HDC)mp1, RGB(DW_RED_VALUE(thiscinfo->fore), DW_GREEN_VALUE(thiscinfo->fore), DW_BLUE_VALUE(thiscinfo->fore))); } /* Handle background */ if(thiscinfo->back > -1 && thiscinfo->back < 18) { if(thiscinfo->back != DW_CLR_DEFAULT) { SetBkColor((HDC)mp1, RGB(_red[thiscinfo->back], _green[thiscinfo->back], _blue[thiscinfo->back])); if(thiscinfo->hbrush) DeleteObject(thiscinfo->hbrush); thiscinfo->hbrush = CreateSolidBrush(RGB(_red[thiscinfo->back], _green[thiscinfo->back], _blue[thiscinfo->back])); SelectObject(hdcPaint, thiscinfo->hbrush); Rectangle(hdcPaint, ps.rcPaint.left - 1, ps.rcPaint.top - 1, ps.rcPaint.right + 1, ps.rcPaint.bottom + 1); success = TRUE; } } else if((thiscinfo->back & DW_RGB_COLOR) == DW_RGB_COLOR) { SetBkColor((HDC)mp1, RGB(DW_RED_VALUE(thiscinfo->back), DW_GREEN_VALUE(thiscinfo->back), DW_BLUE_VALUE(thiscinfo->back))); if(thiscinfo->hbrush) DeleteObject(thiscinfo->hbrush); thiscinfo->hbrush = CreateSolidBrush(RGB(DW_RED_VALUE(thiscinfo->back), DW_GREEN_VALUE(thiscinfo->back), DW_BLUE_VALUE(thiscinfo->back))); SelectObject(hdcPaint, thiscinfo->hbrush); Rectangle(hdcPaint, ps.rcPaint.left - 1, ps.rcPaint.top - 1, ps.rcPaint.right + 1, ps.rcPaint.bottom + 1); success = TRUE; } } EndPaint(hWnd, &ps); if(success) return FALSE; } } break; } return DefWindowProc(hWnd, msg, mp1, mp2); } BOOL CALLBACK _rendwndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { BOOL rcode = TRUE; switch( msg ) { case WM_LBUTTONDOWN: case WM_MBUTTONDOWN: case WM_RBUTTONDOWN: SetFocus(hWnd); rcode = _wndproc(hWnd, msg, mp1, mp2); break; case WM_MOUSEMOVE: /* call our standard Windows procedure */ rcode = _wndproc(hWnd, msg, mp1, mp2); break; case WM_USER+2: case WM_LBUTTONUP: case WM_MBUTTONUP: case WM_RBUTTONUP: rcode = _wndproc(hWnd, msg, mp1, mp2); break; case WM_PAINT: case WM_SIZE: case WM_COMMAND: case WM_CHAR: case WM_KEYDOWN: rcode = _wndproc(hWnd, msg, mp1, mp2); break; default: break; } /* only call the default Windows process if the user hasn't handled the message themselves */ if ( rcode != 0 ) rcode = DefWindowProc(hWnd, msg, mp1, mp2); return rcode; } BOOL CALLBACK _spinnerwndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { ColorInfo *cinfo; cinfo = (ColorInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); if(msg == WM_MOUSEMOVE) _wndproc(hWnd, msg, mp1, mp2); if(cinfo) { switch( msg ) { case WM_LBUTTONDOWN: case WM_MBUTTONDOWN: case WM_RBUTTONDOWN: case WM_KEYDOWN: { BOOL ret; if(!cinfo || !cinfo->pOldProc) ret = DefWindowProc(hWnd, msg, mp1, mp2); ret = CallWindowProc(cinfo->pOldProc, hWnd, msg, mp1, mp2); /* Tell the edit control that a buttonpress has * occured and to update it's window title. */ if(cinfo && cinfo->buddy) SendMessage(cinfo->buddy, WM_USER+10, 0, 0); SetTimer(hWnd, 100, 100, (TIMERPROC)NULL); return ret; } break; case WM_LBUTTONUP: case WM_MBUTTONUP: case WM_RBUTTONUP: case WM_KEYUP: { BOOL ret; if(!cinfo || !cinfo->pOldProc) ret = DefWindowProc(hWnd, msg, mp1, mp2); ret = CallWindowProc(cinfo->pOldProc, hWnd, msg, mp1, mp2); /* Tell the edit control that a buttonpress has * occured and to update it's window title. */ if(cinfo && cinfo->buddy) SendMessage(cinfo->buddy, WM_USER+10, 0, 0); if(hWnd) KillTimer(hWnd, 100); return ret; } break; case WM_TIMER: { if(mp1 == 100) { BOOL ret; if(cinfo && cinfo->buddy) SendMessage(cinfo->buddy, WM_USER+10, 0, 0); if(!cinfo || !cinfo->pOldProc) ret = DefWindowProc(hWnd, msg, mp1, mp2); ret = CallWindowProc(cinfo->pOldProc, hWnd, msg, mp1, mp2); /* Tell the edit control that a buttonpress has * occured and to update it's window title. */ if(cinfo && cinfo->buddy) SendMessage(cinfo->buddy, WM_USER+10, 0, 0); return ret; } } break; case WM_USER+10: { if(cinfo->buddy) { char tempbuf[100] = ""; long position; GetWindowText(cinfo->buddy, tempbuf, 99); position = atol(tempbuf); SendMessage(hWnd, UDM_SETPOS32, 0, (LPARAM)position); } } break; } } if(!cinfo || !cinfo->pOldProc) return DefWindowProc(hWnd, msg, mp1, mp2); return CallWindowProc(cinfo->pOldProc, hWnd, msg, mp1, mp2); } void _click_default(HWND handle) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); /* These are the window classes which can * obtain input focus. */ if (strnicmp(tmpbuf, BUTTONCLASSNAME, strlen(BUTTONCLASSNAME))==0) { /* Generate click on default item */ SignalHandler *tmp = Root; /* Find any callbacks for this function */ while (tmp) { if (tmp->message == WM_COMMAND) { /* Make sure it's the right window, and the right ID */ if (tmp->window == handle) { int (*clickfunc)(HWND, void *) = tmp->signalfunction; clickfunc(tmp->window, tmp->data); tmp = NULL; } } if (tmp) tmp= tmp->next; } } else SetFocus(handle); } /* Subclass function that will handle setting colors on controls */ BOOL CALLBACK _colorwndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { ColorInfo *cinfo; char tmpbuf[100] = {0}; WNDPROC pOldProc = 0; int ret = -1; cinfo = (ColorInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); GetClassName(hWnd, tmpbuf, 99); if(strcmp(tmpbuf, FRAMECLASSNAME) == 0) cinfo = &(((Box *)cinfo)->cinfo); if ( msg == WM_MOUSEMOVE || msg == WM_USER+2 ) ret = _wndproc(hWnd, msg, mp1, mp2); if (cinfo) { pOldProc = cinfo->pOldProc; switch( msg ) { case WM_SETFOCUS: if(cinfo->combo) ret = _wndproc(cinfo->combo, msg, mp1, mp2); else ret = _wndproc(hWnd, msg, mp1, mp2); break; case WM_VSCROLL: case WM_HSCROLL: ret = _wndproc(hWnd, msg, mp1, mp2); break; case WM_KEYDOWN: case WM_KEYUP: { if (hWnd && (mp1 == VK_UP || mp1 == VK_DOWN)) { if (!cinfo || !cinfo->pOldProc) ret = DefWindowProc(hWnd, msg, mp1, mp2); ret = CallWindowProc(cinfo->pOldProc, hWnd, msg, mp1, mp2); /* Tell the spinner control that a keypress has * occured and to update it's internal value. */ if (cinfo && cinfo->buddy && !cinfo->combo) PostMessage(hWnd, WM_USER+10, 0, 0); if(msg == WM_KEYDOWN) SetTimer(hWnd, 101, 100, (TIMERPROC)NULL); else KillTimer(hWnd, 101); return ret; } } break; case WM_TIMER: { if(mp1 == 101) { if(!cinfo || !cinfo->pOldProc) ret = DefWindowProc(hWnd, msg, mp1, mp2); ret = CallWindowProc(cinfo->pOldProc, hWnd, msg, mp1, mp2); /* Tell the spinner control that a keypress has * occured and to update it's internal value. */ if(cinfo && cinfo->buddy && !cinfo->combo) PostMessage(hWnd, WM_USER+10, 0, 0); return ret; } } break; case WM_CHAR: ret = _wndproc(hWnd, msg, mp1, mp2); if (ret != TRUE && LOWORD(mp1) == '\t') { if (GetAsyncKeyState(VK_SHIFT) & 0x8000) { if (cinfo->combo) _shift_focus_back(cinfo->combo); else if(cinfo->buddy) _shift_focus_back(cinfo->buddy); else _shift_focus_back(hWnd); } else { if (cinfo->combo) _shift_focus(cinfo->combo); else if(cinfo->buddy) _shift_focus(cinfo->buddy); else _shift_focus(hWnd); } return FALSE; } else if(LOWORD(mp1) == '\r') { if ( cinfo->clickdefault ) { _click_default(cinfo->clickdefault); } else { /* * Find the toplevel window for the current window and check if it * has a default click set */ HWND tl = _toplevel_window( hWnd ); ColorInfo *mycinfo = (ColorInfo *)GetWindowLongPtr( tl, GWLP_USERDATA ); if ( mycinfo && mycinfo->clickdefault ) { _click_default( mycinfo->clickdefault ); } } } /* Tell the spinner control that a keypress has * occured and to update it's internal value. */ if (cinfo->buddy && !cinfo->combo) { PostMessage(cinfo->buddy, WM_USER+10, 0, 0); } break; case WM_USER+10: { if(cinfo->buddy) { long val; val = (long)SendMessage(cinfo->buddy, UDM_GETPOS32, 0, 0); sprintf(tmpbuf, "%ld", val); SetWindowText(hWnd, tmpbuf); } } break; case WM_CTLCOLORSTATIC: case WM_CTLCOLORLISTBOX: case WM_CTLCOLORBTN: case WM_CTLCOLOREDIT: case WM_CTLCOLORMSGBOX: case WM_CTLCOLORSCROLLBAR: case WM_CTLCOLORDLG: { ColorInfo *thiscinfo = (ColorInfo *)GetWindowLongPtr((HWND)mp2, GWLP_USERDATA); if(thiscinfo && thiscinfo->fore != -1 && thiscinfo->back != -1) { int thisback = thiscinfo->back; /* Handle foreground */ if(thiscinfo->fore != DW_CLR_DEFAULT) { int fore = _internal_color(thiscinfo->fore); SetTextColor((HDC)mp1, RGB(DW_RED_VALUE(fore), DW_GREEN_VALUE(fore), DW_BLUE_VALUE(fore))); } /* Handle background */ if(thiscinfo->back == DW_RGB_TRANSPARENT) { ColorInfo *parentcinfo = (ColorInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); if(parentcinfo && parentcinfo->back != -1) thisback = parentcinfo->back; } if(thisback == DW_CLR_DEFAULT) { HBRUSH hbr = GetSysColorBrush(COLOR_3DFACE); SetBkColor((HDC)mp1, GetSysColor(COLOR_3DFACE)); SelectObject((HDC)mp1, hbr); return (LONG)hbr; } else if(thisback != -1 && thisback != DW_RGB_TRANSPARENT) { int back = _internal_color(thisback); SetBkColor((HDC)mp1, RGB(DW_RED_VALUE(back), DW_GREEN_VALUE(back), DW_BLUE_VALUE(back))); if(thiscinfo->hbrush) DeleteObject(thiscinfo->hbrush); thiscinfo->hbrush = CreateSolidBrush(RGB(DW_RED_VALUE(back), DW_GREEN_VALUE(back), DW_BLUE_VALUE(back))); SelectObject((HDC)mp1, thiscinfo->hbrush); return (LONG)thiscinfo->hbrush; } } #ifdef AEROGLASS switch(msg) { case WM_CTLCOLORSTATIC: case WM_CTLCOLORBTN: case WM_CTLCOLORDLG: { if((_dw_composition && GetWindowLongPtr(_toplevel_window(hWnd), GWL_EXSTYLE) & WS_EX_LAYERED) && (!thiscinfo || (thiscinfo && (thiscinfo->back == -1 || thiscinfo->back == DW_RGB_TRANSPARENT)))) { if(!(msg == WM_CTLCOLORSTATIC && SendMessage((HWND)mp2, STM_GETIMAGE, IMAGE_BITMAP, 0))) { SetBkColor((HDC)mp1, _dw_transparencykey); if(thiscinfo->hbrush) DeleteObject(thiscinfo->hbrush); thiscinfo->hbrush = CreateSolidBrush(_dw_transparencykey); SelectObject((HDC)mp1, thiscinfo->hbrush); return (LONG)thiscinfo->hbrush; } } } } #endif } break; } } if(ret != TRUE) { if(!pOldProc) return DefWindowProc(hWnd, msg, mp1, mp2); return CallWindowProc(pOldProc, hWnd, msg, mp1, mp2); } return ret; } /* Window procedure for container/listview */ BOOL CALLBACK _containerwndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { ContainerInfo *continfo = (ContainerInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); switch( msg ) { case WM_COMMAND: case WM_NOTIFY: case WM_MOUSEMOVE: _wndproc(hWnd, msg, mp1, mp2); break; case WM_PAINT: if(continfo->cinfo.pOldProc && (continfo->even != DW_RGB_TRANSPARENT || continfo->odd != DW_RGB_TRANSPARENT)) { RECT rectUpd, rectDestin, rect; int iItems, iTop, i; COLORREF c; /* Load the default background color for the first pass */ ListView_SetTextBkColor(hWnd, continfo->cinfo.back != -1 ? continfo->cinfo.back : ListView_GetBkColor(hWnd)); /* get the rectangle to be updated */ GetUpdateRect(hWnd, &rectUpd, FALSE); /* allow default processing first */ CallWindowProc(continfo->cinfo.pOldProc, hWnd, msg, 0, 0); /* number of displayed rows */ iItems = ListView_GetCountPerPage(hWnd); /* first visible row */ iTop = ListView_GetTopIndex(hWnd); for(i=iTop; i<=(iTop+iItems+1); i++) { /* if row rectangle intersects update rectangle then it requires re-drawing */ if(ListView_GetItemRect(hWnd, i, &rect, LVIR_BOUNDS) && IntersectRect(&rectDestin, &rectUpd, &rect)) { /* change text background colour accordingly */ c = (i % 2) ? continfo->odd : continfo->even; if(c != DW_RGB_TRANSPARENT) { ListView_SetTextBkColor(hWnd, c); /* invalidate the row rectangle then... */ InvalidateRect(hWnd, &rectDestin, FALSE); /* ...force default processing */ CallWindowProc(continfo->cinfo.pOldProc, hWnd, msg, 0, 0); } } } } break; case WM_LBUTTONDBLCLK: case WM_CHAR: { LV_ITEM lvi; int iItem; if(LOWORD(mp1) == '\t') { if(GetAsyncKeyState(VK_SHIFT) & 0x8000) _shift_focus_back(hWnd); else _shift_focus(hWnd); return FALSE; } if(msg == WM_CHAR && (char)mp1 != '\r') break; iItem = ListView_GetNextItem(hWnd, -1, LVNI_FOCUSED); memset(&lvi, 0, sizeof(LV_ITEM)); if(iItem > -1) { lvi.iItem = iItem; lvi.mask = LVIF_PARAM; ListView_GetItem(hWnd, &lvi); } { SignalHandler *tmp = Root; while(tmp) { if(tmp->message == NM_DBLCLK && tmp->window == hWnd) { int (*containerselectfunc)(HWND, char *, void *) = tmp->signalfunction; /* Seems to be having lParam as 1 which really sucks */ if(lvi.lParam < 100) lvi.lParam = 0; containerselectfunc(tmp->window, (char *)lvi.lParam, tmp->data); tmp = NULL; } if(tmp) tmp = tmp->next; } } } break; case WM_CONTEXTMENU: { SignalHandler *tmp = Root; while(tmp) { if(tmp->message == NM_RCLICK && tmp->window == hWnd) { int (*containercontextfunc)(HWND, char *, int, int, void *, void *) = tmp->signalfunction; LONG x,y; LV_ITEM lvi; int iItem; LVHITTESTINFO lhi; dw_pointer_query_pos(&x, &y); lhi.pt.x = x; lhi.pt.y = y; MapWindowPoints(HWND_DESKTOP, tmp->window, &lhi.pt, 1); iItem = ListView_HitTest(tmp->window, &lhi); memset(&lvi, 0, sizeof(LV_ITEM)); if(iItem > -1) { lvi.iItem = iItem; lvi.mask = LVIF_PARAM; ListView_GetItem(tmp->window, &lvi); ListView_SetSelectionMark(tmp->window, iItem); } /* Seems to be having lParam as 1 which really sucks */ if(lvi.lParam < 100) lvi.lParam = 0; containercontextfunc(tmp->window, (char *)lvi.lParam, x, y, tmp->data, NULL); tmp = NULL; } if(tmp) tmp = tmp->next; } } break; } if(!continfo || !continfo->cinfo.pOldProc) return DefWindowProc(hWnd, msg, mp1, mp2); return CallWindowProc(continfo->cinfo.pOldProc, hWnd, msg, mp1, mp2); } BOOL CALLBACK _treewndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { ContainerInfo *cinfo; int ret = -1; cinfo = (ContainerInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); switch( msg ) { case WM_MOUSEMOVE: ret = _wndproc(hWnd, msg, mp1, mp2); break; case WM_CHAR: ret = _wndproc(hWnd, msg, mp1, mp2); if(ret != TRUE && LOWORD(mp1) == '\t') { if(GetAsyncKeyState(VK_SHIFT) & 0x8000) _shift_focus_back(hWnd); else _shift_focus(hWnd); return FALSE; } break; } if(ret != TRUE) { if(!cinfo || !cinfo->cinfo.pOldProc) return DefWindowProc(hWnd, msg, mp1, mp2); return CallWindowProc(cinfo->cinfo.pOldProc, hWnd, msg, mp1, mp2); } return ret; } void _changebox(Box *thisbox, int percent, int type) { int z; for(z=0;z<thisbox->count;z++) { if(thisbox->items[z].type == TYPEBOX) { Box *tmp = (Box*)GetWindowLongPtr(thisbox->items[z].hwnd, GWLP_USERDATA); _changebox(tmp, percent, type); } else { if(type == DW_HORZ) { if(thisbox->items[z].hsize == SIZEEXPAND) thisbox->items[z].width = (int)(((float)thisbox->items[z].origwidth) * (((float)percent)/((float)100.0))); } else { if(thisbox->items[z].vsize == SIZEEXPAND) thisbox->items[z].height = (int)(((float)thisbox->items[z].origheight) * (((float)percent)/((float)100.0))); } } } } void _handle_splitbar_resize(HWND hwnd, float percent, int type, int x, int y) { HWND handle1 = (HWND)dw_window_get_data(hwnd, "_dw_topleft"); HWND handle2 = (HWND)dw_window_get_data(hwnd, "_dw_bottomright"); ShowWindow(handle1, SW_HIDE); ShowWindow(handle2, SW_HIDE); if(type == DW_HORZ) { int newx = x; float ratio = (float)percent/(float)100.0; Box *tmp = (Box *)GetWindowLongPtr(handle1, GWLP_USERDATA); newx = (int)((float)newx * ratio) - (SPLITBAR_WIDTH/2); MoveWindow(handle1, 0, 0, newx, y, FALSE); _do_resize(tmp, newx - 1, y - 1); tmp = (Box *)GetWindowLongPtr(handle2, GWLP_USERDATA); newx = x - newx - SPLITBAR_WIDTH; MoveWindow(handle2, x - newx, 0, newx, y, FALSE); _do_resize(tmp, newx - 1, y - 1); dw_window_set_data(hwnd, "_dw_start", (void *)newx); } else { int newy = y; float ratio = (float)(100.0-percent)/(float)100.0; Box *tmp = (Box *)GetWindowLongPtr(handle2, GWLP_USERDATA); newy = (int)((float)newy * ratio) - (SPLITBAR_WIDTH/2); MoveWindow(handle2, 0, y - newy, x, newy, FALSE); _do_resize(tmp, x - 1, newy - 1); tmp = (Box *)GetWindowLongPtr(handle1, GWLP_USERDATA); newy = y - newy - SPLITBAR_WIDTH; MoveWindow(handle1, 0, 0, x, newy, FALSE); _do_resize(tmp, x - 1, newy - 1); dw_window_set_data(hwnd, "_dw_start", (void *)newy); } ShowWindow(handle1, SW_SHOW); ShowWindow(handle2, SW_SHOW); } /* This handles any activity on the scrollbox */ BOOL CALLBACK _scrollwndproc(HWND hwnd, UINT msg, WPARAM mp1, LPARAM mp2) { switch (msg) { case WM_HSCROLL: case WM_VSCROLL: { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(hwnd, GWLP_USERDATA); SCROLLINFO hsi, vsi, *si = &hsi; int bar = SB_HORZ; int which = LOWORD(mp1); /* Initialize the scroll info structs */ vsi.cbSize = hsi.cbSize = sizeof(SCROLLINFO); vsi.fMask = hsi.fMask = SIF_POS | SIF_RANGE | SIF_PAGE; /* Save the current scroll positions */ GetScrollInfo(hwnd, SB_HORZ, &hsi); GetScrollInfo(hwnd, SB_VERT, &vsi); if(msg == WM_VSCROLL) { bar = SB_VERT; si = &vsi; } switch(which) { case SB_THUMBTRACK: si->nPos = HIWORD(mp1); break; /*case SB_PAGEDOWN:*/ case SB_PAGELEFT: si->nPos = si->nPos - si->nPage; if(si->nPos < 0) si->nPos = 0; break; /*case SB_PAGEUP:*/ case SB_PAGERIGHT: si->nPos = si->nPos + si->nPage; if(si->nPos > (si->nMax - si->nPage) + 1) si->nPos = (si->nMax - si->nPage) + 1; break; /*case SB_LINEDOWN:*/ case SB_LINELEFT: si->nPos = si->nPos - 1; if(si->nPos < si->nMin) si->nPos = si->nMin; break; /*case SB_LINEUP:*/ case SB_LINERIGHT: si->nPos = si->nPos + 1; if(si->nPos > (si->nMax - si->nPage) + 1) si->nPos = (si->nMax - si->nPage) + 1; break; } /* Position the scrolled box */ vsi.fMask = hsi.fMask = SIF_POS | SIF_DISABLENOSCROLL; SetWindowPos(cinfo->combo, 0, -hsi.nPos, -vsi.nPos, 0, 0, SWP_NOACTIVATE | SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); SetScrollInfo(hwnd, bar, si, TRUE); } break; } return DefWindowProc(hwnd, msg, mp1, mp2); } /* This handles any activity on the splitbars (sizers) */ BOOL CALLBACK _splitwndproc(HWND hwnd, UINT msg, WPARAM mp1, LPARAM mp2) { switch (msg) { case WM_ACTIVATE: case WM_SETFOCUS: return FALSE; case WM_PAINT: { PAINTSTRUCT ps; HDC hdcPaint; int type = (int)dw_window_get_data(hwnd, "_dw_type"); int start = (int)dw_window_get_data(hwnd, "_dw_start"); BeginPaint(hwnd, &ps); if((hdcPaint = GetDC(hwnd)) != NULL) { unsigned long cx, cy; HBRUSH oldBrush = SelectObject(hdcPaint, GetSysColorBrush(COLOR_3DFACE)); HPEN oldPen = SelectObject(hdcPaint, CreatePen(PS_SOLID, 1, GetSysColor(COLOR_3DFACE))); dw_window_get_pos_size(hwnd, NULL, NULL, &cx, &cy); if(type == DW_HORZ) Rectangle(hdcPaint, cx - start - SPLITBAR_WIDTH, 0, cx - start, cy); else Rectangle(hdcPaint, 0, start, cx, start + SPLITBAR_WIDTH); SelectObject(hdcPaint, oldBrush); DeleteObject(SelectObject(hdcPaint, oldPen)); ReleaseDC(hwnd, hdcPaint); } EndPaint(hwnd, &ps); } break; case WM_LBUTTONDOWN: { SetCapture(hwnd); break; } case WM_LBUTTONUP: { if(GetCapture() == hwnd) ReleaseCapture(); } break; case WM_MOUSEMOVE: { float *percent = (float *)dw_window_get_data(hwnd, "_dw_percent"); int type = (int)dw_window_get_data(hwnd, "_dw_type"); int start; if(type == DW_HORZ) SetCursor(LoadCursor(NULL, IDC_SIZEWE)); else SetCursor(LoadCursor(NULL, IDC_SIZENS)); if(GetCapture() == hwnd && percent) { POINT point; RECT rect; static POINT lastpoint; GetCursorPos(&point); GetWindowRect(hwnd, &rect); if(memcmp(&point, &lastpoint, sizeof(POINT))) { if(PtInRect(&rect, point)) { int width = (rect.right - rect.left); int height = (rect.bottom - rect.top); if(type == DW_HORZ) { start = point.x - rect.left; if(width - SPLITBAR_WIDTH > 1 && start < width - SPLITBAR_WIDTH) *percent = ((float)start / (float)(width - SPLITBAR_WIDTH)) * 100.0; } else { start = point.y - rect.top; if(height - SPLITBAR_WIDTH > 1 && start < height - SPLITBAR_WIDTH) *percent = ((float)start / (float)(height - SPLITBAR_WIDTH)) * 100.0; } _handle_splitbar_resize(hwnd, *percent, type, width, height); } memcpy(&lastpoint, &point, sizeof(POINT)); } } break; } } return DefWindowProc(hwnd, msg, mp1, mp2); } /* This handles drawing the status text areas */ BOOL CALLBACK _statuswndproc(HWND hwnd, UINT msg, WPARAM mp1, LPARAM mp2) { switch (msg) { case WM_MOUSEMOVE: _wndproc(hwnd, msg, mp1, mp2); break; case WM_SETTEXT: { /* Make sure the control redraws when there is a text change */ int ret = (int)DefWindowProc(hwnd, msg, mp1, mp2); InvalidateRgn(hwnd, NULL, TRUE); return ret; } case WM_PAINT: { HDC hdcPaint; PAINTSTRUCT ps; RECT rc; unsigned long cx, cy; char tempbuf[1025] = { 0 }; ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(hwnd, GWLP_USERDATA); HFONT hfont = _acquire_font(hwnd, cinfo ? cinfo->fontname : NULL); HFONT oldfont = (HFONT)SendMessage(hwnd, WM_GETFONT, 0, 0); dw_window_get_pos_size(hwnd, NULL, NULL, &cx, &cy); GetWindowText(hwnd, tempbuf, 1024); hdcPaint = BeginPaint(hwnd, &ps); if(hfont) oldfont = (HFONT)SelectObject(hdcPaint, hfont); rc.top = rc.left = 0; rc.right = cx; rc.bottom = cy; DrawStatusText(hdcPaint, &rc, tempbuf, 0); if(hfont && oldfont) SelectObject(hdcPaint, oldfont); if(hfont) DeleteObject(hfont); EndPaint(hwnd, &ps); } return FALSE; } return DefWindowProc(hwnd, msg, mp1, mp2); } #ifdef AEROGLASS /* Window procedure to handle drawing themed text when in composited mode */ BOOL CALLBACK _staticwndproc(HWND hwnd, ULONG msg, WPARAM mp1, LPARAM mp2) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(hwnd, GWLP_USERDATA); WNDPROC pOldProc; if (!cinfo) return DefWindowProc(hwnd, msg, mp1, mp2); /* If we don't require themed drawing */ if(cinfo->back != -1 && !_dw_composition || !(GetWindowLongPtr(_toplevel_window(hwnd), GWL_EXSTYLE) & WS_EX_LAYERED)) return _colorwndproc(hwnd, msg, mp1, mp2); pOldProc = cinfo->pOldProc; switch(msg) { case WM_PAINT: { PAINTSTRUCT ps; HDC hdc = BeginPaint(hwnd, &ps); if(hdc) { /* Figure out how to draw */ HDC hdcPaint = NULL; RECT rcClient; LONG_PTR dwStyle = GetWindowLongPtr(hwnd, GWL_STYLE); LONG_PTR dwStyleEx = GetWindowLongPtr(hwnd, GWL_EXSTYLE); HTHEME hTheme = _OpenThemeData(NULL, L"ControlPanelStyle"); GetClientRect(hwnd, &rcClient); if(hTheme) { /* Create an in memory image to draw to */ HPAINTBUFFER hBufferedPaint = _BeginBufferedPaint(hdc, &rcClient, BPBF_TOPDOWNDIB, NULL, &hdcPaint); if(hdcPaint) { LONG_PTR dwStaticStyle = dwStyle & 0x1F; HFONT hFontOld = (HFONT)SendMessage(hwnd, WM_GETFONT, 0, 0); int iLen = GetWindowTextLength(hwnd), fore = _internal_color(cinfo->fore); DTTOPTS DttOpts = { sizeof(DTTOPTS) }; static HBRUSH hbrush = 0; /* Make sure we have a transparency brush */ if(!hbrush) hbrush = CreateSolidBrush(_dw_transparencykey); /* Fill the background with the transparency color */ FillRect(hdcPaint, &rcClient, hbrush); _BufferedPaintSetAlpha(hBufferedPaint, &ps.rcPaint, 0x00); /* Setup how we will draw the text */ DttOpts.dwFlags = DTT_COMPOSITED | DTT_GLOWSIZE | DTT_TEXTCOLOR; DttOpts.crText = cinfo->fore == -1 ? RGB(255, 255, 255) : RGB(DW_RED_VALUE(fore), DW_GREEN_VALUE(fore), DW_BLUE_VALUE(fore)); DttOpts.iGlowSize = 12; SetBkMode(hdcPaint, TRANSPARENT); if(hFontOld) hFontOld = (HFONT)SelectObject(hdcPaint, hFontOld); /* Make sure there is text to draw */ if(iLen) { LPWSTR szText = (LPWSTR)_alloca(sizeof(WCHAR)*(iLen+5)); if(szText) { iLen = GetWindowTextW(hwnd, szText, iLen+5); if(iLen) { DWORD dwFlags = DT_WORDBREAK; switch (dwStaticStyle) { case SS_CENTER: dwFlags |= DT_CENTER; break; case SS_RIGHT: dwFlags |= DT_RIGHT; break; case SS_LEFTNOWORDWRAP: dwFlags &= ~DT_WORDBREAK; break; } if(dwStyle & SS_CENTERIMAGE) { dwFlags |= DT_VCENTER; dwFlags &= ~DT_WORDBREAK; } if(dwStyle & SS_ENDELLIPSIS) dwFlags |= DT_END_ELLIPSIS|DT_MODIFYSTRING; else if(dwStyle & SS_PATHELLIPSIS) dwFlags |= DT_PATH_ELLIPSIS|DT_MODIFYSTRING; else if(dwStyle & SS_WORDELLIPSIS) dwFlags |= DT_WORD_ELLIPSIS|DT_MODIFYSTRING; if (dwStyleEx&WS_EX_RIGHT) dwFlags |= DT_RIGHT; if(dwStyle & SS_NOPREFIX) dwFlags |= DT_NOPREFIX; /* Draw the text! */ _DrawThemeTextEx(hTheme, hdcPaint, 0, 0, szText, -1, dwFlags, &rcClient, &DttOpts); } } } /* Cleanup */ if (hFontOld) SelectObject(hdcPaint, hFontOld); _EndBufferedPaint(hBufferedPaint, TRUE); } _CloseThemeData(hTheme); } } EndPaint(hwnd, &ps); return TRUE; } break; } if ( !pOldProc ) return DefWindowProc(hwnd, msg, mp1, mp2); return CallWindowProc(pOldProc, hwnd, msg, mp1, mp2); } #endif /* Function: _BtProc * Abstract: Subclass procedure for buttons */ BOOL CALLBACK _BtProc(HWND hwnd, ULONG msg, WPARAM mp1, LPARAM mp2) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(hwnd, GWLP_USERDATA); WNDPROC pOldProc; int retval = -1; if ( !cinfo ) return DefWindowProc(hwnd, msg, mp1, mp2); /* We must save a pointer to the old * window procedure because if a signal * handler attached here destroys this * window it will then be invalid. */ pOldProc = cinfo->pOldProc; switch(msg) { case WM_CTLCOLORSTATIC: case WM_CTLCOLORLISTBOX: case WM_CTLCOLORBTN: case WM_CTLCOLOREDIT: case WM_CTLCOLORMSGBOX: case WM_CTLCOLORSCROLLBAR: case WM_CTLCOLORDLG: return _colorwndproc(hwnd, msg, mp1, mp2); case WM_SETFOCUS: _wndproc(hwnd, msg, mp1, mp2); break; case WM_LBUTTONUP: { SignalHandler *tmp = Root; /* Find any callbacks for this function */ while(tmp) { if(tmp->message == WM_COMMAND) { int (*clickfunc)(HWND, void *) = tmp->signalfunction; /* Make sure it's the right window, and the right ID */ if(tmp->window == hwnd) { int checkbox = DW_POINTER_TO_INT(dw_window_get_data(hwnd, "_dw_checkbox")); if(checkbox) in_checkbox_handler = 1; retval = clickfunc(tmp->window, tmp->data); if(checkbox) in_checkbox_handler = 0; tmp = NULL; } } if(tmp) tmp= tmp->next; } } break; case WM_CHAR: { /* A button press should also occur for an ENTER or SPACE press * while the button has the active input focus. */ if(LOWORD(mp1) == '\r' || LOWORD(mp1) == ' ') { SignalHandler *tmp = Root; /* Find any callbacks for this function */ while(tmp) { if(tmp->message == WM_COMMAND) { int (*clickfunc)(HWND, void *) = tmp->signalfunction; /* Make sure it's the right window, and the right ID */ if(tmp->window == hwnd) { retval = clickfunc(tmp->window, tmp->data); tmp = NULL; } } if(tmp) tmp= tmp->next; } } if(LOWORD(mp1) == '\t') { if(GetAsyncKeyState(VK_SHIFT) & 0x8000) _shift_focus_back(hwnd); else _shift_focus(hwnd); return FALSE; } } break; case WM_KEYDOWN: if(mp1 == VK_LEFT || mp1 == VK_UP) _shift_focus_back(hwnd); if(mp1 == VK_RIGHT || mp1 == VK_DOWN) _shift_focus(hwnd); break; } /* Make sure windows are up-to-date */ if(retval != -1) _dw_redraw(0, FALSE); if ( !pOldProc ) return DefWindowProc(hwnd, msg, mp1, mp2); return CallWindowProc(pOldProc, hwnd, msg, mp1, mp2); } /* This function recalculates a notebook page for example * during switching of notebook pages. */ void _resize_notebook_page(HWND handle, int pageid) { RECT rect; NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); if(array && array[pageid]) { Box *box = (Box *)GetWindowLongPtr(array[pageid]->hwnd, GWLP_USERDATA); GetClientRect(handle,&rect); TabCtrl_AdjustRect(handle,FALSE,&rect); MoveWindow(array[pageid]->hwnd, rect.left, rect.top, rect.right - rect.left, rect.bottom-rect.top, TRUE); if(box && box->count) { ShowWindow(box->items[0].hwnd, SW_HIDE); _do_resize(box, rect.right - rect.left, rect.bottom - rect.top); ShowWindow(box->items[0].hwnd, SW_SHOW); } ShowWindow(array[pageid]->hwnd, SW_SHOWNORMAL); } } void _create_tooltip(HWND handle, char *text) { HWND hwndTT = 0; HWND oldTT = (HWND)dw_window_get_data(handle, "_dw_tooltip"); if(oldTT) DestroyWindow(oldTT); if(text) { TOOLINFO ti = { 0 }; /* Create a tooltip. */ hwndTT = CreateWindowEx(WS_EX_TOPMOST, TOOLTIPS_CLASS, NULL, WS_POPUP | TTS_NOPREFIX | TTS_ALWAYSTIP, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, handle, NULL, DWInstance,NULL); SetWindowPos(hwndTT, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE); /* Set up "tool" information. * In this case, the "tool" is the entire parent window. */ ti.cbSize = sizeof(TOOLINFO); ti.uFlags = TTF_SUBCLASS; ti.hwnd = handle; ti.hinst = DWInstance; ti.lpszText = text; ti.rect.right = ti.rect.bottom = 2000; /* Associate the tooltip with the "tool" window. */ SendMessage(hwndTT, TTM_ADDTOOL, 0, (LPARAM) (LPTOOLINFO) &ti); } dw_window_set_data(handle, "_dw_tooltip", (void *)hwndTT); } #ifndef GDIPLUS /* This function determines the handle for a supplied image filename */ int _dw_get_image_handle(char *filename, HANDLE *icon, HBITMAP *hbitmap) { int len, windowtype = 0; char *file = malloc(strlen(filename) + 5); *hbitmap = 0; *icon = 0; if (!file) { return 0; } strcpy(file, filename); /* check if we can read from this file (it exists and read permission) */ if (access(file, 04) == 0) { len = strlen( file ); if ( len < 4 ) { free(file); return 0; } if ( stricmp( file + len - 4, ".ico" ) == 0 ) { *icon = LoadImage(NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE); windowtype = BS_ICON; } else if ( stricmp( file + len - 4, ".bmp" ) == 0 ) { *hbitmap = (HBITMAP)LoadImage(NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE); windowtype = BS_BITMAP; } else if ( stricmp( file + len - 4, ".png" ) == 0 ) { *hbitmap = (HBITMAP)LoadImage(NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE); windowtype = BS_BITMAP; } free(file); } else { /* Try with .ico extension first...*/ strcat(file, ".ico"); if (access(file, 04) == 0) { *icon = LoadImage(NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE); windowtype = BS_ICON; } else { strcpy(file, filename); strcat(file, ".bmp"); if (access(file, 04) == 0) { *hbitmap = (HBITMAP)LoadImage(NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE); windowtype = BS_BITMAP; } } free(file); } return windowtype; } #endif /* Initialize thread local values to the defaults */ void _init_thread(void) { COLORREF foreground = RGB(128,128,128); COLORREF background = DW_RGB_TRANSPARENT; TlsSetValue(_foreground, (LPVOID)foreground); TlsSetValue(_background, (LPVOID)background); TlsSetValue(_hPen, CreatePen(PS_SOLID, 1, foreground)); TlsSetValue(_hBrush, CreateSolidBrush(foreground)); } /* * Initializes the Dynamic Windows engine. * Parameters: * newthread: True if this is the only thread. * False if there is already a message loop running. */ int API dw_init(int newthread, int argc, char *argv[]) { WNDCLASS wc; int z; INITCOMMONCONTROLSEX icc; char *alttmpdir; #ifdef GDIPLUS struct GdiplusStartupInput si; #endif /* Setup the private data directory */ if(argc > 0 && argv[0]) { char *pos = strrchr(argv[0], '\\'); /* Just to be safe try the unix style */ if(!pos) pos = strrchr(argv[0], '/'); if(pos) strncpy(_dw_exec_dir, argv[0], (size_t)(pos - argv[0])); } /* If that failed... just get the current directory */ if(!_dw_exec_dir[0]) GetCurrentDirectory(MAX_PATH, _dw_exec_dir); /* Initialize our thread local storage */ _foreground = TlsAlloc(); _background = TlsAlloc(); _hPen = TlsAlloc(); _hBrush = TlsAlloc(); _init_thread(); icc.dwSize = sizeof(INITCOMMONCONTROLSEX); icc.dwICC = ICC_WIN95_CLASSES|ICC_DATE_CLASSES; InitCommonControlsEx(&icc); memset(lookup, 0, sizeof(HICON) * ICON_INDEX_LIMIT); /* Register the generic Dynamic Windows class */ memset(&wc, 0, sizeof(WNDCLASS)); wc.style = CS_DBLCLKS; wc.lpfnWndProc = (WNDPROC)_wndproc; wc.cbClsExtra = 0; wc.cbWndExtra = 32; wc.hbrBackground = NULL; wc.lpszMenuName = NULL; wc.lpszClassName = ClassName; RegisterClass(&wc); /* Register the splitbar control */ memset(&wc, 0, sizeof(WNDCLASS)); wc.style = CS_DBLCLKS | CS_HREDRAW | CS_VREDRAW; wc.lpfnWndProc = (WNDPROC)_splitwndproc; wc.cbClsExtra = 0; wc.cbWndExtra = 0; wc.hbrBackground = NULL; wc.lpszMenuName = NULL; wc.lpszClassName = SplitbarClassName; RegisterClass(&wc); /* Register the scroller control */ memset(&wc, 0, sizeof(WNDCLASS)); wc.style = CS_DBLCLKS; wc.lpfnWndProc = (WNDPROC)_scrollwndproc; wc.cbClsExtra = 0; wc.cbWndExtra = 32; wc.hbrBackground = NULL; wc.lpszMenuName = NULL; wc.lpszClassName = ScrollClassName; RegisterClass(&wc); /* Register a frame control like on OS/2 */ memset(&wc, 0, sizeof(WNDCLASS)); wc.style = CS_DBLCLKS; wc.lpfnWndProc = (WNDPROC)_framewndproc; wc.cbClsExtra = 0; wc.cbWndExtra = 32; wc.hbrBackground = (HBRUSH)GetSysColorBrush(COLOR_3DFACE); wc.hCursor = LoadCursor(NULL, IDC_ARROW); wc.lpszMenuName = NULL; wc.lpszClassName = FRAMECLASSNAME; RegisterClass(&wc); /* Register a status bar control */ memset(&wc, 0, sizeof(WNDCLASS)); wc.style = CS_DBLCLKS; wc.lpfnWndProc = (WNDPROC)_statuswndproc; wc.cbClsExtra = 0; wc.cbWndExtra = 32; wc.hbrBackground = (HBRUSH)GetSysColorBrush(COLOR_3DFACE); wc.hCursor = LoadCursor(NULL, IDC_ARROW); wc.lpszMenuName = NULL; wc.lpszClassName = StatusbarClassName; RegisterClass(&wc); #if (defined(BUILD_DLL) || defined(BUILD_HTML)) && !defined(__MINGW32__) /* Register HTML renderer class */ memset(&wc, 0, sizeof(WNDCLASS)); wc.lpfnWndProc = (WNDPROC)_browserWindowProc; wc.lpszClassName = BrowserClassName; wc.style = CS_HREDRAW|CS_VREDRAW; RegisterClass(&wc); #endif /* Create a set of brushes using the default OS/2 and DOS colors */ for(z=0;z<18;z++) _colors[z] = CreateSolidBrush(RGB(_red[z],_green[z],_blue[z])); /* Register an Object Windows class like OS/2 and Win2k+ * so similar functionality can be used on earlier releases * of Windows. */ memset(&wc, 0, sizeof(WNDCLASS)); wc.style = 0; wc.lpfnWndProc = (WNDPROC)_wndproc; wc.cbClsExtra = 0; wc.cbWndExtra = 0; wc.hbrBackground = NULL; wc.hCursor = LoadCursor(NULL, IDC_ARROW); wc.lpszMenuName = NULL; wc.lpszClassName = ObjectClassName; RegisterClass(&wc); /* Since Windows 95/98/NT don't have a HWND_OBJECT class * also known as a input only window, I will create a * temporary window that isn't visible and really does nothing * except temporarily hold the child windows before they are * packed into their correct parent. */ DW_HWND_OBJECT = CreateWindow(ObjectClassName, "", 0, 0, 0, 0, 0, HWND_DESKTOP, NULL, DWInstance, NULL); if(!DW_HWND_OBJECT) { dw_messagebox("Dynamic Windows", DW_MB_OK|DW_MB_ERROR, "Could not initialize the object window. error code %d", GetLastError()); exit(1); } /* Create empty box data */ SetWindowLongPtr(DW_HWND_OBJECT, GWLP_USERDATA, (LONG_PTR)calloc(sizeof(Box), 1)); /* We need the version to check capability like up-down controls */ dwVersion = GetVersion(); dwComctlVer = GetDllVersion(TEXT("comctl32.dll")); /* Initialize Security for named events and memory */ InitializeSecurityDescriptor(&_dwsd, SECURITY_DESCRIPTOR_REVISION); SetSecurityDescriptorDacl(&_dwsd, TRUE, (PACL) NULL, FALSE); OleInitialize(NULL); /* * Get an alternate temporary directory in case TMP doesn't exist */ if ( (alttmpdir = getenv( "TEMP" ) ) == NULL ) { strcpy( _dw_alternate_temp_dir, "c:\\tmp" ); } else { strncpy( _dw_alternate_temp_dir, alttmpdir, MAX_PATH ); } #ifdef GDIPLUS /* Setup GDI+ */ si.GdiplusVersion = 1; si.DebugEventCallback = NULL; si.SuppressBackgroundThread = FALSE; si.SuppressExternalCodecs = FALSE; GdiplusStartup(&gdiplusToken, &si, NULL); #endif #ifdef AEROGLASS /* Attempt to load the Desktop Window Manager and Theme library */ if((hdwm = LoadLibrary("dwmapi")) && (huxtheme = LoadLibrary("uxtheme"))) { _DwmExtendFrameIntoClientArea = (HRESULT (WINAPI *)(HWND, const MARGINS *))GetProcAddress(hdwm, "DwmExtendFrameIntoClientArea"); if((_DwmIsCompositionEnabled = (HRESULT (WINAPI *)(BOOL *))GetProcAddress(hdwm, "DwmIsCompositionEnabled"))) _DwmIsCompositionEnabled(&_dw_composition); _OpenThemeData = (HTHEME (WINAPI *)(HWND, LPCWSTR))GetProcAddress(huxtheme, "OpenThemeData"); _BeginBufferedPaint = (HPAINTBUFFER (WINAPI *)(HDC, const RECT *, BP_BUFFERFORMAT, BP_PAINTPARAMS *, HDC *))GetProcAddress(huxtheme, "BeginBufferedPaint"); _BufferedPaintSetAlpha = (HRESULT (WINAPI *)(HPAINTBUFFER, const RECT *, BYTE))GetProcAddress(huxtheme, "BufferedPaintSetAlpha"); _DrawThemeTextEx = (HRESULT (WINAPI *)(HTHEME, HDC, int, int, LPCWSTR, int, DWORD, LPRECT, const DTTOPTS *))GetProcAddress(huxtheme, "DrawThemeTextEx"); _EndBufferedPaint = (HRESULT (WINAPI *)(HPAINTBUFFER, BOOL))GetProcAddress(huxtheme, "EndBufferedPaint"); _CloseThemeData = (HRESULT (WINAPI *)(HTHEME))GetProcAddress(huxtheme, "CloseThemeData"); } /* In case of error close the library if needed */ else if(hdwm) { FreeLibrary(hdwm); hdwm = 0; } #endif return 0; } static int _dw_main_running = FALSE; /* * Runs a message loop for Dynamic Windows. */ void API dw_main(void) { MSG msg; _dwtid = dw_thread_id(); /* Make sure any queued redraws are handled */ _dw_redraw(0, FALSE); /* Set the running flag to TRUE */ _dw_main_running = TRUE; /* Run the loop until the flag is unset... or error */ while(_dw_main_running && GetMessage(&msg, NULL, 0, 0)) { if(msg.hwnd == NULL && msg.message == WM_TIMER) _wndproc(msg.hwnd, msg.message, msg.wParam, msg.lParam); else { TranslateMessage(&msg); DispatchMessage(&msg); } } } /* * Causes running dw_main() to return. */ void API dw_main_quit(void) { _dw_main_running = FALSE; } /* * Runs a message loop for Dynamic Windows, for a period of milliseconds. * Parameters: * milliseconds: Number of milliseconds to run the loop for. */ void API dw_main_sleep(int milliseconds) { MSG msg; double start = (double)clock(); while(((clock() - start) / (CLOCKS_PER_SEC/1000)) <= milliseconds) { if(PeekMessage(&msg, NULL, 0, 0, PM_NOREMOVE)) { GetMessage(&msg, NULL, 0, 0); if(msg.hwnd == NULL && msg.message == WM_TIMER) _wndproc(msg.hwnd, msg.message, msg.wParam, msg.lParam); else { TranslateMessage(&msg); DispatchMessage(&msg); } } else Sleep(1); } } /* * Processes a single message iteration and returns. */ void API dw_main_iteration(void) { MSG msg; _dwtid = dw_thread_id(); if(GetMessage(&msg, NULL, 0, 0)) { if(msg.hwnd == NULL && msg.message == WM_TIMER) _wndproc(msg.hwnd, msg.message, msg.wParam, msg.lParam); else { TranslateMessage(&msg); DispatchMessage(&msg); } } } /* * Free's memory allocated by dynamic windows. * Parameters: * ptr: Pointer to dynamic windows allocated * memory to be free()'d. */ void API dw_free(void *ptr) { free(ptr); } /* * Allocates and initializes a dialog struct. * Parameters: * data: User defined data to be passed to functions. */ DWDialog * API dw_dialog_new(void *data) { DWDialog *tmp = malloc(sizeof(DWDialog)); tmp->eve = dw_event_new(); dw_event_reset(tmp->eve); tmp->data = data; tmp->done = FALSE; tmp->result = NULL; return tmp; } /* * Accepts a dialog struct and returns the given data to the * initial called of dw_dialog_wait(). * Parameters: * dialog: Pointer to a dialog struct aquired by dw_dialog_new). * result: Data to be returned by dw_dialog_wait(). */ int API dw_dialog_dismiss(DWDialog *dialog, void *result) { dialog->result = result; dw_event_post(dialog->eve); dialog->done = TRUE; return 0; } /* * Accepts a dialog struct waits for dw_dialog_dismiss() to be * called by a signal handler with the given dialog struct. * Parameters: * dialog: Pointer to a dialog struct aquired by dw_dialog_new). */ void * API dw_dialog_wait(DWDialog *dialog) { MSG msg; void *tmp; while (GetMessage(&msg,NULL,0,0)) { if(msg.hwnd == NULL && msg.message == WM_TIMER) _wndproc(msg.hwnd, msg.message, msg.wParam, msg.lParam); else { TranslateMessage(&msg); DispatchMessage(&msg); } if(dialog->done) break; } dw_event_close(&dialog->eve); tmp = dialog->result; free(dialog); return tmp; } /* * Displays a debug message on the console... * Parameters: * format: printf style format string. * ...: Additional variables for use in the format. */ void API dw_debug(char *format, ...) { va_list args; char outbuf[1025] = {0}; va_start(args, format); vsnprintf(outbuf, 1024, format, args); va_end(args); OutputDebugString(outbuf); } /* * Displays a Message Box with given text and title.. * Parameters: * title: The title of the message box. * format: printf style format string. * ...: Additional variables for use in the format. */ int API dw_messagebox(char *title, int flags, char *format, ...) { va_list args; char outbuf[1025] = { 0 }; int rc; va_start(args, format); vsnprintf(outbuf, 1024, format, args); va_end(args); rc = MessageBox(HWND_DESKTOP, outbuf, title, flags); if(rc == IDOK) return DW_MB_RETURN_OK; else if(rc == IDYES) return DW_MB_RETURN_YES; else if(rc == IDNO) return DW_MB_RETURN_NO; else if(rc == IDCANCEL) return DW_MB_RETURN_CANCEL; else return 0; } /* * Minimizes or Iconifies a top-level window. * Parameters: * handle: The window handle to minimize. */ int API dw_window_minimize(HWND handle) { return ShowWindow(handle, SW_MINIMIZE); } /* * Makes the window topmost. * Parameters: * handle: The window handle to make topmost. */ int API dw_window_raise(HWND handle) { return SetWindowPos(handle, HWND_TOP, 0, 0, 0, 0, SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOSIZE); } /* * Makes the window bottommost. * Parameters: * handle: The window handle to make bottommost. */ int API dw_window_lower(HWND handle) { return SetWindowPos(handle, HWND_BOTTOM, 0, 0, 0, 0, SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOSIZE); } /* * Makes the window visible. * Parameters: * handle: The window handle to make visible. */ int API dw_window_show(HWND handle) { int rc; RECT rect; GetClientRect(handle, &rect); /* If the client area is 0x0 then call the autosize routine */ if((rect.bottom - rect.top) == 0 || (rect.right - rect.left) == 0) dw_window_set_size(handle, 0, 0); rc = ShowWindow(handle, SW_SHOW); SetFocus(handle); _initial_focus(handle); return rc; } /* * Makes the window invisible. * Parameters: * handle: The window handle to make visible. */ int API dw_window_hide(HWND handle) { return ShowWindow(handle, SW_HIDE); } /* * Destroys a window and all of it's children. * Parameters: * handle: The window handle to destroy. */ int API dw_window_destroy(HWND handle) { HWND parent; Box *thisbox; HMENU menu; /* Handle special case for menu handle */ if(handle < (HWND)65536) { char buffer[31] = {0}; ULONG id = (ULONG)handle; _snprintf(buffer, 30, "_dw_id%ld", id); menu = (HMENU)dw_window_get_data(DW_HWND_OBJECT, buffer); if(menu && IsMenu(menu)) return dw_menu_delete_item((HMENUI)menu, id); return DW_ERROR_UNKNOWN; } parent = GetParent(handle); thisbox = (Box *)GetWindowLongPtr(parent, GWLP_USERDATA); menu = GetMenu(handle); if(menu) _free_menu_data(menu); /* If it is a desktop window let WM_DESTROY handle it */ if(parent != HWND_DESKTOP) { /* If the parent box has items... * try to remove it from the layout */ if(thisbox && thisbox->count) { int z, index = -1; Item *tmpitem, *thisitem = thisbox->items; for(z=0;z<thisbox->count;z++) { if(thisitem[z].hwnd == handle) index = z; } if(index == -1) return 0; tmpitem = malloc(sizeof(Item)*(thisbox->count-1)); /* Copy all but the current entry to the new list */ for(z=0;z<index;z++) { tmpitem[z] = thisitem[z]; } for(z=index+1;z<thisbox->count;z++) { tmpitem[z-1] = thisitem[z]; } thisbox->items = tmpitem; free(thisitem); thisbox->count--; } _free_window_memory(handle, 0); EnumChildWindows(handle, _free_window_memory, 0); } return DestroyWindow(handle); } /* Causes entire window to be invalidated and redrawn. * Parameters: * handle: Toplevel window handle to be redrawn. */ void API dw_window_redraw(HWND handle) { Box *mybox = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); if(mybox) { RECT rect; int istoplevel = (GetParent(handle) == HWND_DESKTOP); GetClientRect(handle, &rect); ShowWindow(istoplevel ? mybox->items[0].hwnd : handle, SW_HIDE); _do_resize(mybox, rect.right - rect.left, rect.bottom - rect.top); ShowWindow(istoplevel ? mybox->items[0].hwnd : handle, SW_SHOW); } } int instring(char *text, char *buffer) { int z, len = strlen(text), buflen = strlen(buffer); if(buflen > len) { for(z=0;z<=(buflen-len);z++) { if(memcmp(text, &buffer[z], len) == 0) return z; } } return 0; } /* * Changes a window's parent to newparent. * Parameters: * handle: The window handle to destroy. * newparent: The window's new parent window. */ void API dw_window_reparent(HWND handle, HWND newparent) { SetParent(handle, newparent); } LOGFONT _get_logfont(HDC hdc, char *fontname) { int Italic, Bold; char *myFontName; int z, size = 9; LOGFONT lf = {0}; for(z=0;z<strlen(fontname);z++) { if(fontname[z]=='.') break; } size = atoi(fontname); lf.lfHeight = -MulDiv(size, GetDeviceCaps(hdc, LOGPIXELSY), 72); Italic = instring(" Italic", &fontname[z+1]); Bold = instring(" Bold", &fontname[z+1]); lf.lfWidth = 0; lf.lfEscapement = 0; lf.lfOrientation = 0; lf.lfItalic = Italic ? TRUE : FALSE; lf.lfUnderline = 0; lf.lfStrikeOut = 0; lf.lfWeight = Bold ? FW_BOLD : FW_NORMAL; lf.lfCharSet = DEFAULT_CHARSET; lf.lfOutPrecision = 0; lf.lfClipPrecision = 0; lf.lfQuality = DEFAULT_QUALITY; lf.lfPitchAndFamily = DEFAULT_PITCH | FW_DONTCARE; /* * remove any font modifiers */ myFontName = strdup(&fontname[z+1]); if(Italic) myFontName[Italic] = 0; if(Bold) myFontName[Bold] = 0; strncpy(lf.lfFaceName, myFontName, sizeof(lf.lfFaceName)-1); free(myFontName); return lf; } /* Create a duplicate of an existing font handle * that is safe to call DeleteObject() on. */ HFONT _DupFontHandle(HFONT hfont) { LOGFONT lf = {0}; return GetObject(hfont, sizeof(lf), &lf) ? CreateFontIndirect(&lf) : NULL; } /* Create a font handle from specified font name.. * or return a handle to the default font. */ HFONT _acquire_font2(HDC hdc, char *fontname) { HFONT hfont = 0; if(fontname != DefaultFont && fontname[0]) { LOGFONT lf = _get_logfont(hdc, fontname); hfont = CreateFontIndirect(&lf); } if(!hfont && _DefaultFont) hfont = _DupFontHandle(_DefaultFont); if(!hfont) hfont = GetStockObject(DEFAULT_GUI_FONT); return hfont; } /* Create a font handle from specified font name.. * or return a handle to the default font. */ HFONT _acquire_font(HWND handle, char *fontname) { HDC hdc = GetDC(handle); HFONT hfont = _acquire_font2(hdc, fontname); ReleaseDC(handle, hdc); return hfont; } /* * Sets the default font used on text based widgets. * Parameters: * fontname: Font name in Dynamic Windows format. */ void API dw_font_set_default(char *fontname) { HFONT oldfont = _DefaultFont; _DefaultFont = _acquire_font(HWND_DESKTOP, fontname); if(oldfont) { DeleteObject(oldfont); } } /* Internal function to return a pointer to an item struct * with information about the packing information regarding object. */ Item *_box_item(HWND handle) { HWND parent = GetParent(handle); Box *thisbox = (Box *)GetWindowLongPtr(parent, GWLP_USERDATA); /* If it is a desktop window let WM_DESTROY handle it */ if(parent != HWND_DESKTOP) { if(thisbox && thisbox->count) { int z; Item *thisitem = thisbox->items; for(z=0;z<thisbox->count;z++) { if(thisitem[z].hwnd == handle) return &thisitem[z]; } } } return NULL; } /* Internal function to calculate the widget's required size.. * These are the general rules for widget sizes: * * Render/Unspecified: 1x1 * Scrolled(Container,Tree,MLE): 500x200 * Entryfield/Combobox/Spinbutton: 150x(maxfontheight) * Spinbutton: 50x(maxfontheight) * Text/Status: (textwidth)x(textheight) * Ranged: 100x14 or 14x100 for vertical. * Buttons/Bitmaps: Size of text or image and border. */ void _control_size(HWND handle, int *width, int *height) { int thiswidth = 1, thisheight = 1, extrawidth = 0, extraheight = 0; char tmpbuf[100] = {0}, *buf = dw_window_get_text(handle); static char testtext[] = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"; HBITMAP hbm = 0; GetClassName(handle, tmpbuf, 99); /* If we have a string... * calculate the size with the current font. */ if(buf) { if(*buf) dw_font_text_extents_get(handle, NULL, buf, &thiswidth, &thisheight); dw_free(buf); } /* Attempt to get bitmap from classes that can have them */ if(strnicmp(tmpbuf, STATICCLASSNAME, strlen(STATICCLASSNAME)+1) == 0) hbm = (HBITMAP)SendMessage(handle, STM_GETIMAGE, IMAGE_BITMAP, 0); if(strnicmp(tmpbuf, BUTTONCLASSNAME, strlen(BUTTONCLASSNAME)+1) == 0) hbm = (HBITMAP)SendMessage(handle, BM_GETIMAGE, IMAGE_BITMAP, 0); /* If we got an image... set the sizes appropriately */ if(hbm) { BITMAP bmi = { 0 }; GetObject(hbm, sizeof(BITMAP), &bmi); thiswidth = bmi.bmWidth; thisheight = bmi.bmHeight; } /* Combobox */ if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1) == 0) { dw_font_text_extents_get(handle, NULL, testtext, NULL, &thisheight); thiswidth = 150; extraheight = 4; if(thisheight < 18) thisheight = 18; } /* Ranged: Percent, Slider, Scrollbar */ else if(strnicmp(tmpbuf, PROGRESS_CLASS, strlen(PROGRESS_CLASS)+1) == 0 || strnicmp(tmpbuf, TRACKBAR_CLASS, strlen(TRACKBAR_CLASS)+1) == 0 || strnicmp(tmpbuf, SCROLLBARCLASSNAME, strlen(SCROLLBARCLASSNAME)+1) == 0) { if(strnicmp(tmpbuf, SCROLLBARCLASSNAME, strlen(SCROLLBARCLASSNAME)+1) == 0 && GetWindowLong(handle, GWL_STYLE) & SBS_VERT) { /* Vertical */ thiswidth = GetSystemMetrics(SM_CXVSCROLL); thisheight = 100; } else { /* Horizontal */ thiswidth = 100; thisheight = GetSystemMetrics(SM_CYHSCROLL); } } /* Spinbuttons */ else if(strnicmp(tmpbuf, UPDOWN_CLASS, strlen(UPDOWN_CLASS)+1) == 0) { dw_font_text_extents_get(handle, NULL, testtext, NULL, &thisheight); thiswidth = 50; extraheight = 6; } /* Entryfields and MLE */ else if(strnicmp(tmpbuf, EDITCLASSNAME, strlen(EDITCLASSNAME)+1) == 0) { LONG style = GetWindowLong(handle, GWL_STYLE); if((style & ES_MULTILINE)) { unsigned long bytes; int height, width; char *buf, *ptr; int basicwidth; if(style & ES_AUTOHSCROLL) thisheight = GetSystemMetrics(SM_CYHSCROLL) + 8; else thisheight = 8; basicwidth = thiswidth = GetSystemMetrics(SM_CXVSCROLL) + 8; dw_mle_get_size(handle, &bytes, NULL); ptr = buf = _alloca(bytes + 2); dw_mle_export(handle, buf, 0, (int)bytes); strcat(buf, "\n"); /* MLE */ while(ptr = strstr(buf, "\n")) { ptr[0] = 0; width = 0; if(strlen(buf)) dw_font_text_extents_get(handle, NULL, buf, &width, &height); else dw_font_text_extents_get(handle, NULL, testtext, NULL, &height); width += basicwidth; if(!(style & ES_AUTOHSCROLL) && width > _DW_SCROLLED_MAX_WIDTH) { thiswidth = _DW_SCROLLED_MAX_WIDTH; thisheight += height * (width / _DW_SCROLLED_MAX_WIDTH); } else { if(width > thiswidth) thiswidth = width > _DW_SCROLLED_MAX_WIDTH ? _DW_SCROLLED_MAX_WIDTH : width; } thisheight += height; buf = &ptr[1]; } if(thiswidth < _DW_SCROLLED_MIN_WIDTH) thiswidth = _DW_SCROLLED_MIN_WIDTH; if(thisheight < _DW_SCROLLED_MIN_HEIGHT) thisheight = _DW_SCROLLED_MIN_HEIGHT; if(thisheight > _DW_SCROLLED_MAX_HEIGHT) thisheight = _DW_SCROLLED_MAX_HEIGHT; } else { /* Entryfield */ dw_font_text_extents_get(handle, NULL, testtext, NULL, &thisheight); thiswidth = 150; extraheight = 6; } } /* Container */ else if(strnicmp(tmpbuf, WC_LISTVIEW, strlen(WC_LISTVIEW)+1)== 0) { DWORD result = ListView_ApproximateViewRect(handle, _DW_SCROLLED_MAX_WIDTH, _DW_SCROLLED_MAX_HEIGHT, -1); thiswidth = LOWORD(result); thisheight = HIWORD(result); if(thiswidth > _DW_SCROLLED_MAX_WIDTH) thiswidth = _DW_SCROLLED_MAX_WIDTH; if(thiswidth < _DW_SCROLLED_MIN_WIDTH) thiswidth = _DW_SCROLLED_MIN_WIDTH; if(thisheight < _DW_SCROLLED_MIN_HEIGHT) thisheight = _DW_SCROLLED_MIN_HEIGHT; if(thisheight > _DW_SCROLLED_MAX_HEIGHT) thisheight = _DW_SCROLLED_MAX_HEIGHT; } /* Tree */ else if(strnicmp(tmpbuf, WC_TREEVIEW, strlen(WC_TREEVIEW)+1)== 0) { thiswidth = _DW_SCROLLED_MAX_WIDTH; thisheight = _DW_SCROLLED_MAX_HEIGHT; } /* Buttons */ else if(strnicmp(tmpbuf, BUTTONCLASSNAME, strlen(BUTTONCLASSNAME)+1) == 0) { ULONG style = GetWindowLong(handle, GWL_STYLE); /* Bitmap buttons */ if(hbm) { extrawidth = 5; extraheight = 5; } /* Checkbox or radio button */ else if(style & BS_AUTOCHECKBOX || style & BS_AUTORADIOBUTTON) { extrawidth = 24; extraheight = 4; } /* Text buttons */ else { extrawidth = 8; extraheight = 8; } } else if(strnicmp(tmpbuf, StatusbarClassName, strlen(StatusbarClassName)+1) == 0) { extrawidth = 4; extraheight = 2; } /* Set the requested sizes */ if(width) *width = thiswidth + extrawidth; if(height) *height = thisheight + extraheight; } /* * Sets the font used by a specified window (widget) handle. * Parameters: * handle: The window (widget) handle. * fontname: Name and size of the font in the form "size.fontname" */ int API dw_window_set_font(HWND handle, char *fontname) { HFONT hfont, oldfont; ColorInfo *cinfo; char tmpbuf[100] = {0}; cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); GetClassName(handle, tmpbuf, 99); if ( strnicmp( tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1) == 0 ) { /* groupbox */ Box *thisbox = (Box *)GetWindowLongPtr( handle, GWLP_USERDATA ); if ( thisbox && thisbox->grouphwnd != (HWND)NULL ) { handle = thisbox->grouphwnd; } } /* This needs to be after we get the correct handle */ oldfont = (HFONT)SendMessage(handle, WM_GETFONT, 0, 0); hfont = _acquire_font(handle, fontname); if(hfont && fontname) { if(cinfo) { strcpy(cinfo->fontname, fontname); if(!oldfont) oldfont = cinfo->hfont; cinfo->hfont = hfont; } else { cinfo = calloc(1, sizeof(ColorInfo)); cinfo->fore = cinfo->back = -1; strncpy(cinfo->fontname, fontname, 127); cinfo->pOldProc = SubclassWindow(handle, _colorwndproc); SetWindowLongPtr(handle, GWLP_USERDATA, (LONG_PTR)cinfo); } } /* If we changed the font... */ if(hfont) { Item *item = _box_item(handle); SendMessage(handle, WM_SETFONT, (WPARAM)hfont, (LPARAM)TRUE); if(oldfont) DeleteObject(oldfont); /* Check to see if any of the sizes need to be recalculated */ if(item && (item->origwidth == -1 || item->origheight == -1)) { _control_size(handle, item->origwidth == -1 ? &item->width : NULL, item->origheight == -1 ? &item->height : NULL); /* Queue a redraw on the top-level window */ _dw_redraw(_toplevel_window(handle), TRUE); } return DW_ERROR_NONE; } return DW_ERROR_UNKNOWN; } /* Allows the user to choose a font using the system's font chooser dialog. * Parameters: * currfont: current font * Returns: * A malloced buffer with the selected font or NULL on error. */ char * API dw_font_choose(char *currfont) { CHOOSEFONT cf = { 0 }; LOGFONT lf = { 0 }; char *str = NULL; char *bold = ""; char *italic = ""; if(currfont && *currfont) lf = _get_logfont(NULL, currfont); cf.lStructSize = sizeof(cf); cf.Flags = CF_SCREENFONTS | CF_INITTOLOGFONTSTRUCT; cf.lpLogFont = &lf; if(ChooseFont(&cf)) { str = (char *)calloc( 101, 1 ); if ( str ) { int height; HDC hdc = GetDC(NULL); if ( lf.lfWeight > FW_MEDIUM ) bold = " Bold"; if ( lf.lfItalic ) italic = " Italic"; height = MulDiv(abs(lf.lfHeight), 72, GetDeviceCaps (hdc, LOGPIXELSY)); ReleaseDC(NULL, hdc); _snprintf( str, 100, "%d.%s%s%s", height, lf.lfFaceName, bold, italic ); } } return str; } /* * Gets the font used by a specified window (widget) handle. * Parameters: * handle: The window (widget) handle. * fontname: Name and size of the font in the form "size.fontname" */ char * API dw_window_get_font(HWND handle) { HFONT oldfont = NULL; char *str = NULL; char *bold = ""; char *italic = ""; LOGFONT lf = { 0 }; Box *thisbox; char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if ( strnicmp( tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1) == 0 ) { /* groupbox */ thisbox = (Box *)GetWindowLongPtr( handle, GWLP_USERDATA ); if ( thisbox && thisbox->grouphwnd != (HWND)NULL ) { handle = thisbox->grouphwnd; } } oldfont = (HFONT)SendMessage(handle, WM_GETFONT, 0, 0); if ( GetObject( oldfont, sizeof(lf), &lf ) ) { str = (char *)calloc( 100, 1 ); if ( str ) { int height; HDC hdc = GetDC(handle); if ( lf.lfWeight > FW_MEDIUM ) bold = " Bold"; if ( lf.lfItalic ) italic = " Italic"; height = MulDiv(abs(lf.lfHeight), 72, GetDeviceCaps (hdc, LOGPIXELSY)); ReleaseDC(handle, hdc); _snprintf( str, 100, "%d.%s%s%s", height, lf.lfFaceName, bold, italic ); } } if ( oldfont ) DeleteObject( oldfont ); return str; } /* * Sets the colors used by a specified window (widget) handle. * Parameters: * handle: The window (widget) handle. * fore: Foreground color in RGB format. * back: Background color in RGB format. */ int API dw_window_set_color(HWND handle, ULONG fore, ULONG back) { ColorInfo *cinfo; Box *thisbox; char tmpbuf[100] = {0}; cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, WC_LISTVIEW, strlen(WC_LISTVIEW))==0) { cinfo->fore = fore = _internal_color(fore); cinfo->back = back = _internal_color(back); ListView_SetTextColor(handle, RGB(DW_RED_VALUE(fore), DW_GREEN_VALUE(fore), DW_BLUE_VALUE(fore))); ListView_SetTextBkColor(handle, RGB(DW_RED_VALUE(back), DW_GREEN_VALUE(back), DW_BLUE_VALUE(back))); ListView_SetBkColor(handle, RGB(DW_RED_VALUE(back), DW_GREEN_VALUE(back), DW_BLUE_VALUE(back))); InvalidateRgn(handle, NULL, TRUE); return TRUE; } else if ( strnicmp( tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)) == 0 ) { /* groupbox */ thisbox = (Box *)GetWindowLongPtr( handle, GWLP_USERDATA ); if ( thisbox && thisbox->grouphwnd != (HWND)NULL ) { thisbox->cinfo.fore = fore; thisbox->cinfo.back = back; } } if(cinfo) { cinfo->fore = fore; cinfo->back = back; } else { cinfo = calloc(1, sizeof(ColorInfo)); cinfo->fore = fore; cinfo->back = back; cinfo->pOldProc = SubclassWindow(handle, _colorwndproc); SetWindowLongPtr(handle, GWLP_USERDATA, (LONG_PTR)cinfo); } InvalidateRgn(handle, NULL, TRUE); return TRUE; } /* * Sets the font used by a specified window (widget) handle. * Parameters: * handle: The window (widget) handle. * border: Size of the window border in pixels. */ int API dw_window_set_border(HWND handle, int border) { return 0; } /* * Captures the mouse input to this window. * Parameters: * handle: Handle to receive mouse input. */ void API dw_window_capture(HWND handle) { SetCapture(handle); } /* * Releases previous mouse capture. */ void API dw_window_release(void) { ReleaseCapture(); } /* * Changes the appearance of the mouse pointer. * Parameters: * handle: Handle to widget for which to change. * cursortype: ID of the pointer you want. */ void API dw_window_set_pointer(HWND handle, int pointertype) { HCURSOR cursor = pointertype < 65536 ? LoadCursor(NULL, MAKEINTRESOURCE(pointertype)) : (HCURSOR)pointertype; if(!pointertype) dw_window_set_data(handle, "_dw_cursor", 0); else { dw_window_set_data(handle, "_dw_cursor", (void *)cursor); SetCursor(cursor); } } /* * Create a new Window Frame. * Parameters: * owner: The Owner's window handle or HWND_DESKTOP. * title: The Window title. * flStyle: Style flags, see the DW reference. */ HWND API dw_window_new(HWND hwndOwner, char *title, ULONG flStyle) { HWND hwndframe; Box *newbox = calloc(sizeof(Box), 1); ULONG flStyleEx = 0; #ifdef AEROGLASS MARGINS mar = {-1}; if(_dw_composition && (flStyle & DW_FCF_COMPOSITED)) flStyleEx = WS_EX_LAYERED; #endif newbox->type = DW_VERT; newbox->vsize = newbox->hsize = SIZEEXPAND; newbox->cinfo.fore = newbox->cinfo.back = -1; if(!(flStyle & WS_CAPTION)) flStyle |= WS_POPUPWINDOW; if(flStyle & DW_FCF_TASKLIST || flStyle & WS_VSCROLL /* This is deprecated and should go away in version 3? */) { hwndframe = CreateWindowEx(flStyleEx, ClassName, title, (flStyle | WS_CLIPCHILDREN) & 0xffdf0000, CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hwndOwner, NULL, DWInstance, NULL); } else { flStyleEx |= WS_EX_TOOLWINDOW; hwndframe = CreateWindowEx(flStyleEx, ClassName, title, (flStyle | WS_CLIPCHILDREN) & 0xffff0000, CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hwndOwner, NULL, DWInstance, NULL); } SetWindowLongPtr(hwndframe, GWLP_USERDATA, (LONG_PTR)newbox); if(hwndOwner) SetParent(hwndframe, hwndOwner); #ifdef AEROGLASS /* Attempt to enable Aero glass background on the entire window */ if(_DwmExtendFrameIntoClientArea && _dw_composition && (flStyle & DW_FCF_COMPOSITED)) { SetLayeredWindowAttributes(hwndframe, _dw_transparencykey, 0, LWA_COLORKEY); _DwmExtendFrameIntoClientArea(hwndframe, &mar); } #endif return hwndframe; } /* * Create a new Box to be packed. * Parameters: * type: Either DW_VERT (vertical) or DW_HORZ (horizontal). * pad: Number of pixels to pad around the box. */ HWND API dw_box_new(int type, int pad) { Box *newbox = calloc(sizeof(Box), 1); HWND hwndframe; newbox->pad = pad; newbox->type = type; newbox->count = 0; newbox->grouphwnd = (HWND)NULL; newbox->cinfo.fore = newbox->cinfo.back = -1; hwndframe = CreateWindow(FRAMECLASSNAME, "", WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, NULL, DWInstance, NULL); newbox->cinfo.pOldProc = SubclassWindow(hwndframe, _colorwndproc); newbox->cinfo.fore = newbox->cinfo.back = -1; SetWindowLongPtr(hwndframe, GWLP_USERDATA, (LONG_PTR)newbox); return hwndframe; } /* * Create a new scroll Box to be packed. * Parameters: * type: Either DW_VERT (vertical) or DW_HORZ (horizontal). * pad: Number of pixels to pad around the box. */ HWND API dw_scrollbox_new(int type, int pad) { ColorInfo *cinfo = calloc(sizeof(ColorInfo), 1); HWND hwndframe, box = dw_box_new(type, pad); HWND tmpbox = dw_box_new(DW_VERT, 0); dw_box_pack_start(tmpbox, box, 1, 1, TRUE, TRUE, 0); cinfo->fore = cinfo->back = -1; hwndframe = CreateWindow(ScrollClassName, "", WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN | WS_VSCROLL | WS_HSCROLL, 0,0,0,0, DW_HWND_OBJECT, NULL, DWInstance, NULL); cinfo->buddy = box; cinfo->combo = tmpbox; SetParent(tmpbox, hwndframe); SetWindowLongPtr(hwndframe, GWLP_USERDATA, (LONG_PTR)cinfo); return hwndframe; } /* * Returns the position of the scrollbar in the scrollbox * Parameters: * handle: Handle to the scrollbox to be queried. * orient: The vertical or horizontal scrollbar. */ int API dw_scrollbox_get_pos( HWND handle, int orient ) { SCROLLINFO si; int bar = SB_HORZ; if(orient == DW_VERT) { bar = SB_VERT; } si.cbSize = sizeof(SCROLLINFO); si.fMask = SIF_POS; /* Get the current scroll positions */ if(!GetScrollInfo(handle, bar, &si)) { return -1; } return si.nPos; } /* * Gets the range for the scrollbar in the scrollbox. * Parameters: * handle: Handle to the scrollbox to be queried. * orient: The vertical or horizontal scrollbar. */ int API dw_scrollbox_get_range( HWND handle, int orient ) { SCROLLINFO si; int bar = SB_HORZ; if(orient == DW_VERT) { bar = SB_VERT; } si.cbSize = sizeof(SCROLLINFO); si.fMask = SIF_RANGE; /* Get the current scroll positions */ if(!GetScrollInfo(handle, bar, &si)) { return -1; } return si.nMax; } /* * Create a new Group Box to be packed. * Parameters: * type: Either DW_VERT (vertical) or DW_HORZ (horizontal). * pad: Number of pixels to pad around the box. * title: Text to be displayined in the group outline. */ HWND API dw_groupbox_new(int type, int pad, char *title) { Box *newbox = calloc(sizeof(Box), 1); HWND hwndframe; newbox->pad = pad; newbox->type = type; newbox->count = 0; newbox->cinfo.fore = newbox->cinfo.back = -1; hwndframe = CreateWindow(FRAMECLASSNAME, "", WS_VISIBLE | WS_CHILD, 0,0,0,0, DW_HWND_OBJECT, NULL, DWInstance, NULL); newbox->grouphwnd = CreateWindow(BUTTONCLASSNAME, title, WS_CHILD | BS_GROUPBOX | WS_VISIBLE | WS_CLIPCHILDREN, 0,0,0,0, hwndframe, NULL, DWInstance, NULL); SetWindowLongPtr(hwndframe, GWLP_USERDATA, (LONG_PTR)newbox); dw_window_set_font(hwndframe, DefaultFont); return hwndframe; } /* * Create a new MDI Frame to be packed. * Parameters: * id: An ID to be used with dw_window_from_id or 0L. */ HWND API dw_mdi_new(unsigned long id) { CLIENTCREATESTRUCT ccs; HWND hwndframe; ccs.hWindowMenu = NULL; ccs.idFirstChild = 0; hwndframe = CreateWindow("MDICLIENT", "", WS_VISIBLE | WS_CHILD | WS_CLIPSIBLINGS, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, &ccs); return hwndframe; } /* * Create a new HTML browser frame to be packed. * Parameters: * id: An ID to be used with dw_window_from_id or 0L. */ HWND API dw_html_new(unsigned long id) { #if (defined(BUILD_DLL) || defined(BUILD_HTML)) && !defined(__MINGW32__) return CreateWindow(BrowserClassName, "", WS_VISIBLE | WS_CHILD | WS_CLIPSIBLINGS, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); #else dw_debug("HTML widget not available; Support not enabled in this build.\n"); return 0; #endif } #if (defined(BUILD_DLL) || defined(BUILD_HTML)) && !defined(__MINGW32__) void _dw_html_action(HWND hwnd, int action); int _dw_html_raw(HWND hwnd, char *string); int _dw_html_url(HWND hwnd, char *url); #endif /* * Causes the embedded HTML widget to take action. * Parameters: * handle: Handle to the window. * action: One of the DW_HTML_* constants. */ void API dw_html_action(HWND handle, int action) { #if (defined(BUILD_DLL) || defined(BUILD_HTML)) && !defined(__MINGW32__) _dw_html_action(handle, action); #endif } /* * Render raw HTML code in the embedded HTML widget.. * Parameters: * handle: Handle to the window. * string: String buffer containt HTML code to * be rendered. * Returns: * DW_ERROR_NONE (0) on success. */ int API dw_html_raw(HWND handle, char *string) { #if (defined(BUILD_DLL) || defined(BUILD_HTML)) && !defined(__MINGW32__) return _dw_html_raw(handle, string); #else return DW_ERROR_GENERAL; #endif } /* * Render file or web page in the embedded HTML widget.. * Parameters: * handle: Handle to the window. * url: Universal Resource Locator of the web or * file object to be rendered. * Returns: * DW_ERROR_NONE (0) on success. */ int API dw_html_url(HWND handle, char *url) { #if (defined(BUILD_DLL) || defined(BUILD_HTML)) && !defined(__MINGW32__) return _dw_html_url(handle, url); #else return DW_ERROR_GENERAL; #endif } /* * Create a bitmap object to be packed. * Parameters: * id: An ID to be used with dw_window_from_id or 0L. */ HWND API dw_bitmap_new(ULONG id) { return CreateWindow(STATICCLASSNAME, "", SS_BITMAP | SS_CENTERIMAGE | WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); } /* * Create a notebook object to be packed. * Parameters: * id: An ID to be used for getting the resource from the * resource file. */ HWND API dw_notebook_new(ULONG id, int top) { ULONG flags = 0; HWND tmp; NotebookPage **array = calloc(256, sizeof(NotebookPage *)); if(!top) flags = TCS_BOTTOM; tmp = CreateWindow(WC_TABCONTROL, "", WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN | flags, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); dw_window_set_data(tmp, "_dw_array", (void *)array); dw_window_set_font(tmp, DefaultFont); return tmp; } /* * Create a menu object to be popped up. * Parameters: * id: An ID to be used for getting the resource from the * resource file. */ HMENUI API dw_menu_new(ULONG id) { return (HMENUI)CreatePopupMenu(); } /* * Create a menubar on a window. * Parameters: * location: Handle of a window frame to be attached to. */ HMENUI API dw_menubar_new(HWND location) { HMENUI tmp; MENUINFO mi; tmp = (HMENUI)CreateMenu(); mi.cbSize = sizeof(MENUINFO); mi.fMask = MIM_MENUDATA; mi.dwMenuData = (ULONG_PTR)1; SetMenuInfo( (HMENU)tmp, &mi ); dw_window_set_data(location, "_dw_menu", (void *)tmp); SetMenu(location, (HMENU)tmp); return location; } /* * Destroys a menu created with dw_menubar_new or dw_menu_new. * Parameters: * menu: Handle of a menu. */ void API dw_menu_destroy(HMENUI *menu) { if(menu) { HMENU mymenu = (HMENU)*menu; if(IsWindow((HWND)mymenu) && !IsMenu(mymenu)) mymenu = (HMENU)dw_window_get_data((HWND)mymenu, "_dw_menu"); if(IsMenu(mymenu)) DestroyMenu(mymenu); } } /* Internal function to make sure menu ID isn't in use */ int _menuid_allocated(int id) { SignalHandler *tmp = Root; while(tmp) { if(tmp->id == id) return TRUE; tmp = tmp->next; } return FALSE; } /* * Adds a menuitem or submenu to an existing menu. * Parameters: * menu: The handle to the existing menu. * title: The title text on the menu item to be added. * id: An ID to be used for message passing. * end: If TRUE memu is positioned at the end of the menu. * check: If TRUE menu is "check"able. * flags: Extended attributes to set on the menu. * submenu: Handle to an existing menu to be a submenu or NULL. */ HWND API dw_menu_append_item(HMENUI menux, char *title, ULONG id, ULONG flags, int end, int check, HMENUI submenu) { MENUITEMINFO mii; HMENU mymenu = (HMENU)menux; char buffer[31] = {0}; int is_checked, is_disabled; char *menutitle = title; /* * Check if this is a menubar; if so get the menu object * for the menubar */ if (IsWindow(menux) && !IsMenu(mymenu)) mymenu = (HMENU)dw_window_get_data(menux, "_dw_menu"); memset( &mii, 0, sizeof(mii) ); mii.cbSize = sizeof(MENUITEMINFO); mii.fMask = MIIM_ID | MIIM_SUBMENU | MIIM_TYPE | MIIM_STATE; /* Convert from OS/2 style accellerators to Win32 style */ if (title) { char *tmp = menutitle = _alloca(strlen(title)+1); strcpy(tmp, title); while(*tmp) { if(*tmp == '~') *tmp = '&'; tmp++; } } if (menutitle && *menutitle) { /* Code to autogenerate a menu ID if not specified or invalid * First pool is smaller for transient popup menus */ if(id == (ULONG)-1) { static ULONG tempid = 61000; tempid++; id = tempid; if(tempid > 65500) tempid = 61000; } /* Second pool is larger for more static windows */ else if(!id || id >= 30000) { static ULONG menuid = 30000; do { menuid++; if(menuid > 60000) menuid = 30000; } while(_menuid_allocated(menuid)); id = menuid; } mii.fType = MFT_STRING; } else mii.fType = MFT_SEPARATOR; /* * Handle flags */ is_checked = (flags & DW_MIS_CHECKED) ? 1 : 0; if ( is_checked ) mii.fState |= MFS_CHECKED; else mii.fState |= MFS_UNCHECKED; is_disabled = (flags & DW_MIS_DISABLED) ? 1 : 0; if ( is_disabled ) mii.fState |= MFS_DISABLED; else mii.fState |= MFS_ENABLED; mii.wID = id; if (IsMenu((HMENU)submenu)) mii.hSubMenu = (HMENU)submenu; else mii.hSubMenu = 0; mii.dwTypeData = menutitle; mii.cch = strlen(menutitle); InsertMenuItem(mymenu, 65535, TRUE, &mii); _snprintf(buffer, 30, "_dw_id%ld", id); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)mymenu ); _snprintf(buffer, 30, "_dw_checkable%ld", id); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)check ); _snprintf(buffer, 30, "_dw_ischecked%ld", id); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)is_checked ); _snprintf(buffer, 30, "_dw_isdisabled%ld", id); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)is_disabled ); if (submenu) { MENUINFO mi; mi.cbSize = sizeof(MENUINFO); mi.fMask = MIM_MENUDATA; mi.dwMenuData = (ULONG_PTR)mymenu; SetMenuInfo( (HMENU)submenu, &mi ); } if (IsWindow(menux) && !IsMenu((HMENU)menux)) DrawMenuBar(menux); return (HWND)id; } /* * Sets the state of a menu item check. * Deprecated: use dw_menu_item_set_state() * Parameters: * menu: The handle to the existing menu. * id: Menuitem id. * check: TRUE for checked FALSE for not checked. */ void API dw_menu_item_set_check(HMENUI menux, unsigned long id, int check) { MENUITEMINFO mii; HMENU mymenu = (HMENU)menux; char buffer[30]; if (IsWindow(menux) && !IsMenu(mymenu)) mymenu = (HMENU)dw_window_get_data(menux, "_dw_menu"); /* * Get the current state of the menu item in case it already has some other state set on it */ memset( &mii, 0, sizeof(mii) ); GetMenuItemInfo( mymenu, id, FALSE, &mii); mii.cbSize = sizeof(MENUITEMINFO); mii.fMask = MIIM_STATE | MIIM_CHECKMARKS; if (check) mii.fState |= MFS_CHECKED; else mii.fState |= MFS_UNCHECKED; SetMenuItemInfo( mymenu, id, FALSE, &mii ); /* * Keep our internal state consistent */ _snprintf( buffer, 30, "_dw_ischecked%ld", id ); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)check ); } /* * Sets the state of a menu item. * Parameters: * menu: The handle to the existing menu. * id: Menuitem id. * flags: DW_MIS_ENABLED/DW_MIS_DISABLED * DW_MIS_CHECKED/DW_MIS_UNCHECKED */ void API dw_menu_item_set_state( HMENUI menux, unsigned long id, unsigned long state) { MENUITEMINFO mii; HMENU mymenu = (HMENU)menux; char buffer1[31] = {0},buffer2[31] = {0}; int check; int disabled; if (IsWindow(menux) && !IsMenu(mymenu)) mymenu = (HMENU)dw_window_get_data(menux, "_dw_menu"); _snprintf( buffer1, 30, "_dw_ischecked%ld", id ); check = (int)dw_window_get_data( DW_HWND_OBJECT, buffer1 ); _snprintf( buffer2, 30, "_dw_isdisabled%ld", id ); disabled = (int)dw_window_get_data( DW_HWND_OBJECT, buffer2 ); memset( &mii, 0, sizeof(mii) ); mii.cbSize = sizeof(MENUITEMINFO); mii.fMask = MIIM_STATE | MIIM_CHECKMARKS; if ( (state & DW_MIS_CHECKED) || (state & DW_MIS_UNCHECKED) ) { /* * If we are changing state of "checked" base our setting on the passed flag... */ if ( state & DW_MIS_CHECKED ) { mii.fState |= MFS_CHECKED; check = 1; } else { mii.fState |= MFS_UNCHECKED; check = 0; } } else { /* * ...otherwise base our setting on the current "checked" state. */ if ( check ) { mii.fState |= MFS_CHECKED; } else { mii.fState |= MFS_UNCHECKED; } } if ( (state & DW_MIS_ENABLED) || (state & DW_MIS_DISABLED) ) { if ( state & DW_MIS_DISABLED ) { mii.fState |= MFS_DISABLED; disabled = 1; } else { mii.fState |= MFS_ENABLED; disabled = 0; } } else { /* * ...otherwise base our setting on the current "checked" state. */ if ( disabled ) { mii.fState |= MFS_DISABLED; } else { mii.fState |= MFS_ENABLED; } } SetMenuItemInfo( mymenu, id, FALSE, &mii ); /* * Keep our internal checked state consistent */ dw_window_set_data( DW_HWND_OBJECT, buffer1, (void *)check ); dw_window_set_data( DW_HWND_OBJECT, buffer2, (void *)disabled ); } /* * Deletes the menu item specified * Parameters: * menu: The handle to the menu in which the item was appended. * id: Menuitem id. * Returns: * DW_ERROR_NONE (0) on success or DW_ERROR_UNKNOWN on failure. */ int API dw_menu_delete_item(HMENUI menux, unsigned long id) { HMENU mymenu = (HMENU)menux; if ( IsWindow(menux) && !IsMenu(mymenu) ) mymenu = (HMENU)dw_window_get_data(menux, "_dw_menu"); if ( mymenu == 0 || DeleteMenu(mymenu, id, MF_BYCOMMAND) == 0 ) return DW_ERROR_UNKNOWN; /* If the ID was autogenerated it is safe to remove it */ if(id >= 30000) dw_signal_disconnect_by_window((HWND)id); /* Make sure the menu is redrawn if needed */ if( (HMENU)menux != mymenu ) DrawMenuBar(menux); return DW_ERROR_NONE; } /* * Pops up a context menu at given x and y coordinates. * Parameters: * menu: The handle the the existing menu. * parent: Handle to the window initiating the popup. * x: X coordinate. * y: Y coordinate. */ void API dw_menu_popup(HMENUI *menu, HWND parent, int x, int y) { if(menu) { HMENU mymenu = (HMENU)*menu; if(IsWindow(*menu) && !IsMenu(mymenu)) mymenu = (HMENU)dw_window_get_data(*menu, "_dw_menu"); popup = parent; TrackPopupMenu(mymenu, 0, x, y, 0, parent, NULL); PostMessage(DW_HWND_OBJECT, WM_USER+5, (LPARAM)mymenu, 0); } } /* * Create a container object to be packed. * Parameters: * id: An ID to be used for getting the resource from the * resource file. */ HWND API dw_container_new(ULONG id, int multi) { HWND tmp = CreateWindow(WC_LISTVIEW, "", WS_VISIBLE | WS_CHILD | (multi ? 0 : LVS_SINGLESEL) | LVS_REPORT | LVS_SHOWSELALWAYS | LVS_SHAREIMAGELISTS | WS_BORDER | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ContainerInfo *cinfo = (ContainerInfo *)calloc(1, sizeof(ContainerInfo)); if(!cinfo) { DestroyWindow(tmp); return NULL; } cinfo->cinfo.pOldProc = SubclassWindow(tmp, _containerwndproc); cinfo->cinfo.fore = cinfo->cinfo.back = -1; cinfo->odd = cinfo->even = DW_RGB_TRANSPARENT; SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); /* If we are running XP or higher... */ if(IS_XPPLUS) { /* Enable double buffering to prevent flicker */ ListView_SetExtendedListViewStyleEx(tmp, LVS_EX_DOUBLEBUFFER, LVS_EX_DOUBLEBUFFER); } return tmp; } /* * Create a tree object to be packed. * Parameters: * id: An ID to be used for getting the resource from the * resource file. */ HWND API dw_tree_new(ULONG id) { HWND tmp = CreateWindow(WC_TREEVIEW, "", WS_VISIBLE | WS_CHILD | TVS_HASLINES | TVS_SHOWSELALWAYS | TVS_HASBUTTONS | TVS_LINESATROOT | WS_BORDER | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ContainerInfo *cinfo = (ContainerInfo *)calloc(1, sizeof(ContainerInfo)); TreeView_SetItemHeight(tmp, 16); if(!cinfo) { DestroyWindow(tmp); return NULL; } cinfo->cinfo.pOldProc = SubclassWindow(tmp, _treewndproc); cinfo->cinfo.fore = cinfo->cinfo.back = -1; cinfo->odd = cinfo->even = DW_RGB_TRANSPARENT; SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); return tmp; } /* * Returns the current X and Y coordinates of the mouse pointer. * Parameters: * x: Pointer to variable to store X coordinate. * y: Pointer to variable to store Y coordinate. */ void API dw_pointer_query_pos(long *x, long *y) { POINT ptl; GetCursorPos(&ptl); if(x && y) { *x = ptl.x; *y = ptl.y; } } /* * Sets the X and Y coordinates of the mouse pointer. * Parameters: * x: X coordinate. * y: Y coordinate. */ void API dw_pointer_set_pos(long x, long y) { SetCursorPos(x, y); } /* * Create a new static text window (widget) to be packed. * Parameters: * text: The text to be display by the static text widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_text_new(char *text, ULONG id) { HWND tmp = CreateWindow(STATICCLASSNAME, text, SS_NOPREFIX | SS_NOTIFY | WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); #ifdef AEROGLASS ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); cinfo->back = cinfo->fore = -1; cinfo->pOldProc = SubclassWindow(tmp, _staticwndproc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); #endif dw_window_set_font(tmp, DefaultFont); dw_window_set_color(tmp, DW_CLR_DEFAULT, DW_RGB_TRANSPARENT); return tmp; } /* * Create a new status text window (widget) to be packed. * Parameters: * text: The text to be display by the static text widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_status_text_new(char *text, ULONG id) { HWND tmp = CreateWindow(StatusbarClassName, text, WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); dw_window_set_font(tmp, DefaultFont); return tmp; } /* * Create a new Multiline Editbox window (widget) to be packed. * Parameters: * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_mle_new(ULONG id) { HWND tmp = CreateWindowEx(WS_EX_CLIENTEDGE, EDITCLASSNAME, "", WS_VISIBLE | WS_BORDER | WS_VSCROLL | ES_MULTILINE | ES_WANTRETURN | WS_CHILD | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ContainerInfo *cinfo = (ContainerInfo *)calloc(1, sizeof(ContainerInfo)); if(!cinfo) { DestroyWindow(tmp); return NULL; } cinfo->cinfo.pOldProc = SubclassWindow(tmp, _treewndproc); cinfo->cinfo.fore = cinfo->cinfo.back = -1; cinfo->odd = cinfo->even = DW_RGB_TRANSPARENT; SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); return tmp; } /* * Create a new Entryfield window (widget) to be packed. * Parameters: * text: The default text to be in the entryfield widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_entryfield_new(char *text, ULONG id) { HWND tmp = CreateWindowEx(WS_EX_CLIENTEDGE, EDITCLASSNAME, text, ES_WANTRETURN | WS_CHILD | WS_BORDER | ES_AUTOHSCROLL | WS_VISIBLE | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); cinfo->back = cinfo->fore = -1; cinfo->pOldProc = SubclassWindow(tmp, _colorwndproc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); return tmp; } /* * Create a new Entryfield passwird window (widget) to be packed. * Parameters: * text: The default text to be in the entryfield widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_entryfield_password_new(char *text, ULONG id) { HWND tmp = CreateWindowEx(WS_EX_CLIENTEDGE, EDITCLASSNAME, text, ES_WANTRETURN | WS_CHILD | ES_PASSWORD | WS_BORDER | WS_VISIBLE | ES_AUTOHSCROLL | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); cinfo->back = cinfo->fore = -1; cinfo->pOldProc = SubclassWindow(tmp, _colorwndproc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); return tmp; } BOOL CALLBACK _subclass_child(HWND handle, LPARAM lp) { ColorInfo *cinfo = (ColorInfo *)lp; if(cinfo) { cinfo->buddy = handle; cinfo->pOldProc = SubclassWindow(handle, _colorwndproc); SetWindowLongPtr(handle, GWLP_USERDATA, (LONG_PTR)cinfo); } return FALSE; } /* * Create a new Combobox window (widget) to be packed. * Parameters: * text: The default text to be in the combpbox widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_combobox_new(char *text, ULONG id) { HWND tmp = CreateWindow(COMBOBOXCLASSNAME, text, WS_CHILD | CBS_DROPDOWN | WS_VSCROLL | WS_CLIPCHILDREN | CBS_AUTOHSCROLL | WS_VISIBLE, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ColorInfo *cinfo = (ColorInfo *)calloc(1, sizeof(ColorInfo)); ColorInfo *cinfo2 = (ColorInfo *)calloc(1, sizeof(ColorInfo)); if(!cinfo || !cinfo2) { if(cinfo) free(cinfo); if(cinfo2) free(cinfo2); DestroyWindow(tmp); return NULL; } cinfo2->fore = cinfo->fore = -1; cinfo2->back = cinfo->back = -1; cinfo2->combo = cinfo->combo = tmp; EnumChildWindows(tmp, _subclass_child, (LPARAM)cinfo2); cinfo->buddy = cinfo2->buddy; SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); SetWindowText(tmp, text); return tmp; } /* * Create a new button window (widget) to be packed. * Parameters: * text: The text to be display by the static text widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_button_new(char *text, ULONG id) { ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); HWND tmp = CreateWindow(BUTTONCLASSNAME, text, WS_CHILD | BS_PUSHBUTTON | WS_VISIBLE | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); cinfo->fore = cinfo->back = -1; cinfo->pOldProc = SubclassWindow(tmp, _BtProc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); return tmp; } /* * Create a new bitmap button window (widget) to be packed. * Parameters: * text: Bubble help text to be displayed. * id: An ID of a bitmap in the resource file. */ HWND API dw_bitmapbutton_new(char *text, ULONG id) { HWND tmp; ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); HBITMAP hbitmap = LoadBitmap(DWInstance, MAKEINTRESOURCE(id)); HICON icon = LoadImage(DWInstance, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, LR_SHARED); tmp = CreateWindow(BUTTONCLASSNAME, "", WS_CHILD | BS_PUSHBUTTON | WS_VISIBLE | WS_CLIPCHILDREN | (icon ? BS_ICON : BS_BITMAP), 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); cinfo->fore = cinfo->back = -1; cinfo->pOldProc = SubclassWindow(tmp, _BtProc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); _create_tooltip(tmp, text); if(icon) { SendMessage(tmp, BM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM) icon); } else if(hbitmap) { SendMessage(tmp, BM_SETIMAGE, (WPARAM) IMAGE_BITMAP, (LPARAM) hbitmap); } return tmp; } /* * Create a new bitmap button window (widget) to be packed from a file. * Parameters: * text: Bubble help text to be displayed. * id: An ID to be used with dw_window_from_id() or 0L. * filename: Name of the file, omit extention to have * DW pick the appropriate file extension. * (BMP or ICO on OS/2 or Windows, XPM on Unix) */ HWND API dw_bitmapbutton_new_from_file(char *text, unsigned long id, char *filename) { HWND tmp; ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); HBITMAP hbitmap = 0; HANDLE hicon = 0; int windowtype = 0; if (!cinfo) return 0; #ifdef GDIPLUS if((hicon = _dw_load_icon(filename))) windowtype = BS_ICON; else { hbitmap = _dw_load_bitmap(filename, NULL); windowtype = BS_BITMAP; } #else windowtype = _dw_get_image_handle(filename, &hicon, &hbitmap); #endif tmp = CreateWindow( BUTTONCLASSNAME, "", windowtype | WS_CHILD | BS_PUSHBUTTON | WS_CLIPCHILDREN | WS_VISIBLE, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); cinfo->fore = cinfo->back = -1; cinfo->pOldProc = SubclassWindow(tmp, _BtProc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); _create_tooltip(tmp, text); if (hicon) { SendMessage(tmp, BM_SETIMAGE,(WPARAM) IMAGE_ICON,(LPARAM) hicon); } else if (hbitmap) { SendMessage(tmp, BM_SETIMAGE,(WPARAM) IMAGE_BITMAP, (LPARAM) hbitmap); } return tmp; } /* * Create a new bitmap button window (widget) to be packed from data. * Parameters: * text: Bubble help text to be displayed. * id: An ID to be used with dw_window_from_id() or 0L. * data: The contents of the image * (BMP or ICO on OS/2 or Windows, XPM on Unix) * len: length of str */ HWND API dw_bitmapbutton_new_from_data(char *text, unsigned long id, char *data, int len) { HWND tmp; ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); HBITMAP hbitmap = 0; HANDLE hicon = 0; char *file; FILE *fp; int windowtype = BS_BITMAP; if (!cinfo) return 0; file = _tempnam( _dw_alternate_temp_dir, "dw" ); if ( file != NULL ) { fp = fopen( file, "wb" ); if ( fp != NULL ) { fwrite( data, 1, len, fp ); fclose( fp ); #ifdef GDIPLUS if((hicon = _dw_load_icon(file))) windowtype = BS_ICON; else hbitmap = _dw_load_bitmap(file, NULL); #else if ( len > 1 && data[0] == 'B' && data[1] == 'M' ) /* first 2 chars of data is BM, then its a BMP */ hbitmap = (HBITMAP)LoadImage( NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE ); else /* otherwise its assumed to be an ico */ { hicon = LoadImage( NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE ); windowtype = BS_ICON; } #endif } else { unlink( file ); free( file ); return 0; } unlink( file ); free( file ); } tmp = CreateWindow( BUTTONCLASSNAME, "", WS_CHILD | BS_PUSHBUTTON | windowtype | WS_CLIPCHILDREN | WS_VISIBLE, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL ); cinfo->fore = cinfo->back = -1; cinfo->pOldProc = SubclassWindow( tmp, _BtProc ); SetWindowLongPtr( tmp, GWLP_USERDATA, (LONG_PTR)cinfo ); _create_tooltip(tmp, text); if ( hicon ) { SendMessage( tmp, BM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM) hicon); } else if( hbitmap ) { SendMessage( tmp, BM_SETIMAGE, (WPARAM) IMAGE_BITMAP, (LPARAM) hbitmap); } return tmp; } /* * Create a new spinbutton window (widget) to be packed. * Parameters: * text: The text to be display by the static text widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_spinbutton_new(char *text, ULONG id) { HWND buddy = CreateWindowEx(WS_EX_CLIENTEDGE, EDITCLASSNAME, text, WS_CHILD | WS_BORDER | WS_VISIBLE | ES_NUMBER | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, NULL, DWInstance, NULL); HWND tmp = CreateWindowEx(WS_EX_CLIENTEDGE, UPDOWN_CLASS, NULL, WS_CHILD | UDS_ALIGNRIGHT | WS_BORDER | UDS_ARROWKEYS | UDS_SETBUDDYINT | UDS_WRAP | UDS_NOTHOUSANDS | WS_VISIBLE, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); SendMessage(tmp, UDM_SETRANGE32, (WPARAM)-65536,(LPARAM)65536); SendMessage(tmp, UDM_SETBUDDY, (WPARAM)buddy, 0); cinfo->back = cinfo->fore = -1; cinfo->buddy = tmp; cinfo->pOldProc = SubclassWindow(buddy, _colorwndproc); SetWindowLongPtr(buddy, GWLP_USERDATA, (LONG_PTR)cinfo); cinfo = calloc(1, sizeof(ColorInfo)); cinfo->buddy = buddy; /* The horrible spinbutton workaround isn't necessary * any more on Vista or 7... but still seems necessary * for XP, so only enable it if on XP or lower. */ if(!IS_VISTAPLUS) { cinfo->pOldProc = SubclassWindow(tmp, _spinnerwndproc); } SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(buddy, DefaultFont); return tmp; } /* * Create a new radiobutton window (widget) to be packed. * Parameters: * text: The text to be display by the static text widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_radiobutton_new(char *text, ULONG id) { HWND tmp = CreateWindow(BUTTONCLASSNAME, text, WS_CHILD | BS_AUTORADIOBUTTON | WS_CLIPCHILDREN | WS_VISIBLE, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); cinfo->fore = cinfo->back = -1; cinfo->pOldProc = SubclassWindow(tmp, _BtProc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); dw_window_set_color(tmp, DW_CLR_DEFAULT, DW_RGB_TRANSPARENT); return tmp; } /* * Create a new slider window (widget) to be packed. * Parameters: * vertical: TRUE or FALSE if slider is vertical. * increments: Number of increments available. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_slider_new(int vertical, int increments, ULONG id) { HWND tmp = CreateWindow(TRACKBAR_CLASS, "", WS_CHILD | WS_CLIPCHILDREN | WS_VISIBLE | (vertical ? TBS_VERT : TBS_HORZ), 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); cinfo->back = cinfo->fore = -1; cinfo->pOldProc = SubclassWindow(tmp, _colorwndproc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); SendMessage(tmp, TBM_SETRANGE, (WPARAM)FALSE, (LPARAM)MAKELONG(0, increments-1)); return tmp; } /* * Create a new scrollbar window (widget) to be packed. * Parameters: * vertical: TRUE or FALSE if scrollbar is vertical. * increments: Number of increments available. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_scrollbar_new(int vertical, ULONG id) { HWND tmp = CreateWindow(SCROLLBARCLASSNAME, "", WS_CHILD | WS_CLIPCHILDREN | WS_VISIBLE | (vertical ? SBS_VERT : SBS_HORZ), 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); cinfo->back = cinfo->fore = -1; cinfo->pOldProc = SubclassWindow(tmp, _colorwndproc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_data(tmp, "_dw_scrollbar", (void *)1); return tmp; } /* * Create a new percent bar window (widget) to be packed. * Parameters: * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_percent_new(ULONG id) { return CreateWindow(PROGRESS_CLASS, "", WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); } /* * Create a new checkbox window (widget) to be packed. * Parameters: * text: The text to be display by the static text widget. * id: An ID to be used with dw_window_from_id() or 0L. */ HWND API dw_checkbox_new(char *text, ULONG id) { ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); HWND tmp = CreateWindow(BUTTONCLASSNAME, text, WS_CHILD | BS_AUTOCHECKBOX | BS_TEXT | WS_CLIPCHILDREN | WS_VISIBLE, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); cinfo->pOldProc = SubclassWindow(tmp, _BtProc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_data(tmp, "_dw_checkbox", DW_INT_TO_POINTER(1)); dw_window_set_font(tmp, DefaultFont); dw_window_set_color(tmp, DW_CLR_DEFAULT, DW_RGB_TRANSPARENT); return tmp; } /* * Create a new listbox window (widget) to be packed. * Parameters: * id: An ID to be used with dw_window_from_id() or 0L. * multi: Multiple select TRUE or FALSE. */ HWND API dw_listbox_new(ULONG id, int multi) { HWND tmp = CreateWindowEx(WS_EX_CLIENTEDGE, LISTBOXCLASSNAME, "", WS_VISIBLE | LBS_NOINTEGRALHEIGHT | WS_CHILD | LBS_HASSTRINGS | LBS_NOTIFY | WS_BORDER | WS_CLIPCHILDREN | WS_VSCROLL | (multi ? LBS_MULTIPLESEL : 0) , 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ContainerInfo *cinfo = (ContainerInfo *)calloc(1, sizeof(ContainerInfo)); if(!cinfo) { DestroyWindow(tmp); return NULL; } cinfo->cinfo.fore = cinfo->cinfo.back = -1; cinfo->odd = cinfo->even = DW_RGB_TRANSPARENT; cinfo->cinfo.pOldProc = SubclassWindow(tmp, _containerwndproc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); return tmp; } /* * Sets the icon used for a given window. * Parameters: * handle: Handle to the window. * id: An ID to be used to specify the icon. */ void API dw_window_set_icon(HWND handle, HICN icon) { int iicon = (int)icon; HICON hicon = iicon < 65536 ? LoadIcon(DWInstance, MAKEINTRESOURCE(iicon)) : (HICON)icon; SendMessage(handle, WM_SETICON, (WPARAM) IMAGE_ICON, (LPARAM) hicon); } /* * Sets the bitmap used for a given static window. * Parameters: * handle: Handle to the window. * id: An ID to be used to specify the icon, * (pass 0 if you use the filename param) * filename: a path to a file (Bitmap on OS/2 or * Windows and a pixmap on Unix, pass * NULL if you use the id param) */ void API dw_window_set_bitmap(HWND handle, unsigned long id, char *filename) { HBITMAP hbitmap = 0; HBITMAP oldbitmap = (HBITMAP)SendMessage(handle, STM_GETIMAGE, IMAGE_BITMAP, 0); HANDLE icon = 0; HANDLE oldicon = (HICON)SendMessage(handle, STM_GETIMAGE, IMAGE_ICON, 0); if(id) { hbitmap = LoadImage(DWInstance, MAKEINTRESOURCE(id), IMAGE_BITMAP, 0, 0, LR_LOADMAP3DCOLORS | LR_SHARED); icon = LoadImage(DWInstance, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, LR_SHARED); } else if(filename) { #ifdef GDIPLUS hbitmap = _dw_load_bitmap(filename, NULL); #else _dw_get_image_handle(filename, &icon, &hbitmap); #endif if (icon == 0 && hbitmap == 0) return; } if(icon) { SendMessage(handle, BM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM) icon); SendMessage(handle, STM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM) icon); } else if(hbitmap) { SendMessage(handle, BM_SETIMAGE, (WPARAM) IMAGE_BITMAP, (LPARAM) hbitmap); SendMessage(handle, STM_SETIMAGE, (WPARAM) IMAGE_BITMAP, (LPARAM) hbitmap); } if(hbitmap && oldbitmap) DeleteObject(oldbitmap); else if(icon && oldicon) DeleteObject(oldicon); /* If we changed the bitmap... */ { Item *item = _box_item(handle); /* Check to see if any of the sizes need to be recalculated */ if(item && (item->origwidth == -1 || item->origheight == -1)) { _control_size(handle, item->origwidth == -1 ? &item->width : NULL, item->origheight == -1 ? &item->height : NULL); /* Queue a redraw on the top-level window */ _dw_redraw(_toplevel_window(handle), TRUE); } } } /* * Sets the bitmap used for a given static window from data. * Parameters: * handle: Handle to the window. * id: An ID to be used to specify the icon, * (pass 0 if you use the data param) * data: the image from meory * Bitmap on Windows and a pixmap on Unix, pass * NULL if you use the id param) * len: length of data */ void API dw_window_set_bitmap_from_data(HWND handle, unsigned long id, char *data, int len) { HBITMAP hbitmap=0; HBITMAP oldbitmap = (HBITMAP)SendMessage(handle, STM_GETIMAGE, IMAGE_BITMAP, 0); HICON icon=0; HICON oldicon = (HICON)SendMessage(handle, STM_GETIMAGE, IMAGE_ICON, 0); char *file; FILE *fp; if ( id ) { hbitmap = LoadBitmap( DWInstance, MAKEINTRESOURCE(id) ); icon = LoadImage( DWInstance, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, LR_SHARED ); } else if (data) { file = _tempnam( _dw_alternate_temp_dir, "dw" ); if ( file != NULL ) { fp = fopen( file, "wb" ); if ( fp != NULL ) { fwrite( data, 1, len, fp ); fclose( fp ); #ifdef GDIPLUS hbitmap = _dw_load_bitmap(file, NULL); #else if ( len > 1 && data[0] == 'B' && data[1] == 'M' ) /* first 2 chars of data is BM, then its a BMP */ hbitmap = (HBITMAP)LoadImage( NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE ); else /* otherwise its assumed to be an ico */ icon = LoadImage( NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE ); #endif } else { unlink( file ); free( file ); return; } unlink( file ); free( file ); } if (icon == 0 && hbitmap == 0) return; } if ( icon ) { SendMessage( handle, BM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM) icon ); SendMessage( handle, STM_SETIMAGE, (WPARAM) IMAGE_ICON, (LPARAM) icon ); } else if ( hbitmap ) { SendMessage( handle, BM_SETIMAGE, (WPARAM) IMAGE_BITMAP, (LPARAM) hbitmap ); SendMessage( handle, STM_SETIMAGE, (WPARAM) IMAGE_BITMAP, (LPARAM) hbitmap ); } if( hbitmap && oldbitmap ) DeleteObject( oldbitmap ); else if ( icon && oldicon ) DeleteObject( oldicon ); } /* * Sets the text used for a given window. * Parameters: * handle: Handle to the window. * text: The text associsated with a given window. */ void API dw_window_set_text(HWND handle, char *text) { Box *thisbox; char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); SetWindowText(handle, text); /* Combobox */ if ( strnicmp( tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1) == 0 ) SendMessage(handle, CB_SETEDITSEL, 0, MAKELPARAM(-1, 0)); else if ( strnicmp( tmpbuf, UPDOWN_CLASS, strlen(UPDOWN_CLASS)+1) == 0 ) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if( cinfo && cinfo->buddy ) SetWindowText( cinfo->buddy, text ); } else if ( strnicmp( tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1) == 0 ) { /* groupbox */ thisbox = (Box *)GetWindowLongPtr( handle, GWLP_USERDATA ); if ( thisbox && thisbox->grouphwnd != (HWND)NULL ) SetWindowText( thisbox->grouphwnd, text ); } /* If we changed the text... */ { Item *item = _box_item(handle); /* Check to see if any of the sizes need to be recalculated */ if(item && (item->origwidth == -1 || item->origheight == -1)) { _control_size(handle, item->origwidth == -1 ? &item->width : NULL, item->origheight == -1 ? &item->height : NULL); /* Queue a redraw on the top-level window */ _dw_redraw(_toplevel_window(handle), TRUE); } } } /* * Sets the text used for a given window's floating bubble help. * Parameters: * handle: Handle to the window (widget). * bubbletext: The text in the floating bubble tooltip. */ void API dw_window_set_tooltip(HWND handle, char *bubbletext) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if(cinfo && cinfo->buddy) _create_tooltip(cinfo->buddy, bubbletext); _create_tooltip(handle, bubbletext); } /* * Gets the text used for a given window. * Parameters: * handle: Handle to the window. * Returns: * text: The text associsated with a given window. */ char * API dw_window_get_text(HWND handle) { char tmpbuf[100] = {0}, *tempbuf; int len; GetClassName(handle, tmpbuf, 99); if ( strnicmp( tmpbuf, UPDOWN_CLASS, strlen(UPDOWN_CLASS)+1) == 0 ) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if( cinfo && cinfo->buddy ) handle = cinfo->buddy; else return NULL; } len = GetWindowTextLength(handle); tempbuf = calloc(1, len + 2); GetWindowText(handle, tempbuf, len + 1); return tempbuf; } /* * Disables given window (widget). * Parameters: * handle: Handle to the window. */ void API dw_window_disable(HWND handle) { if(handle < (HWND)65536) { char buffer[31] = {0}; HMENU mymenu; ULONG id = (ULONG)handle; _snprintf(buffer, 30, "_dw_id%ld", id); mymenu = (HMENU)dw_window_get_data(DW_HWND_OBJECT, buffer); if(mymenu && IsMenu(mymenu)) dw_menu_item_set_state((HMENUI)mymenu, id, DW_MIS_DISABLED); } else EnableWindow(handle, FALSE); } /* * Enables given window (widget). * Parameters: * handle: Handle to the window. */ void API dw_window_enable(HWND handle) { if(handle < (HWND)65536) { char buffer[31] = {0}; HMENU mymenu; ULONG id = (ULONG)handle; _snprintf(buffer, 30, "_dw_id%ld", id); mymenu = (HMENU)dw_window_get_data(DW_HWND_OBJECT, buffer); if(mymenu && IsMenu(mymenu)) dw_menu_item_set_state((HMENUI)mymenu, id, DW_MIS_ENABLED); } else EnableWindow(handle, TRUE); } static HWND _dw_wfid_hwnd = NULL; BOOL CALLBACK _wfid(HWND handle, LPARAM lParam) { if(GetWindowLong(handle, GWL_ID) == lParam) { _dw_wfid_hwnd = handle; return FALSE; } return TRUE; } /* * Gets the child window handle with specified ID. * Parameters: * handle: Handle to the parent window. * id: Integer ID of the child. */ HWND API dw_window_from_id(HWND handle, int id) { _dw_wfid_hwnd = NULL; EnumChildWindows(handle, _wfid, (LPARAM)id); return _dw_wfid_hwnd; } /* Internal box packing function called by the other 3 functions */ void _dw_box_pack(HWND box, HWND item, int index, int width, int height, int hsize, int vsize, int pad, char *funcname) { Box *thisbox = NULL; char tmpbuf[100] = {0}; /* * If you try and pack an item into itself VERY bad things can happen; like at least an * infinite loop on GTK! Lets be safe! */ if(box == item) { dw_messagebox(funcname, DW_MB_OK|DW_MB_ERROR, "Danger! Danger! Will Robinson; box and item are the same!"); return; } GetClassName(box, tmpbuf, 99); /* If we are in a scrolled box... extract the interal box */ if(strnicmp(tmpbuf, ScrollClassName, strlen(ScrollClassName)+1)==0) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(box, GWLP_USERDATA); if(cinfo) { box = cinfo->buddy; thisbox = (Box *)GetWindowLongPtr(box, GWLP_USERDATA); } } else //if(strnicmp(tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1)==0) thisbox = (Box *)GetWindowLongPtr(box, GWLP_USERDATA); if(thisbox) { int z, x = 0; Item *tmpitem, *thisitem = thisbox->items; /* Do some sanity bounds checking */ if(index < 0) index = 0; if(index > thisbox->count) index = thisbox->count; tmpitem = malloc(sizeof(Item)*(thisbox->count+1)); for(z=0;z<thisbox->count;z++) { if(z == index) x++; tmpitem[x] = thisitem[z]; x++; } GetClassName(item, tmpbuf, 99); if(vsize && !height) height = 1; if(hsize && !width) width = 1; if(strnicmp(tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1)==0) tmpitem[index].type = TYPEBOX; else { if(strnicmp(tmpbuf, "SysMonthCal32", 13)==0) { RECT rc; MonthCal_GetMinReqRect(item, &rc); width = 1 + rc.right - rc.left; height = 1 + rc.bottom - rc.top; tmpitem[index].type = TYPEITEM; } else { if ( width == 0 && hsize == FALSE ) dw_messagebox(funcname, DW_MB_OK|DW_MB_ERROR, "Width and expand Horizonal both unset for box: %x item: %x",box,item); if ( height == 0 && vsize == FALSE ) dw_messagebox(funcname, DW_MB_OK|DW_MB_ERROR, "Height and expand Vertical both unset for box: %x item: %x",box,item); tmpitem[index].type = TYPEITEM; } } tmpitem[index].hwnd = item; tmpitem[index].origwidth = tmpitem[index].width = width; tmpitem[index].origheight = tmpitem[index].height = height; tmpitem[index].pad = pad; tmpitem[index].hsize = hsize ? SIZEEXPAND : SIZESTATIC; tmpitem[index].vsize = vsize ? SIZEEXPAND : SIZESTATIC; /* If either of the parameters are -1 ... calculate the size */ if(width == -1 || height == -1) _control_size(item, width == -1 ? &tmpitem[index].width : NULL, height == -1 ? &tmpitem[index].height : NULL); thisbox->items = tmpitem; if(thisbox->count) free(thisitem); thisbox->count++; SetParent(item, box); if(strncmp(tmpbuf, UPDOWN_CLASS, strlen(UPDOWN_CLASS)+1)==0) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(item, GWLP_USERDATA); if(cinfo) { SetParent(cinfo->buddy, box); ShowWindow(cinfo->buddy, SW_SHOW); SendMessage(item, UDM_SETBUDDY, (WPARAM)cinfo->buddy, 0); } } /* Queue a redraw on the top-level window */ _dw_redraw(_toplevel_window(item), TRUE); } } /* * Pack windows (widgets) into a box at an arbitrary location. * Parameters: * box: Window handle of the box to be packed into. * item: Window handle of the item to be back. * index: 0 based index of packed items. * width: Width in pixels of the item or -1 to be self determined. * height: Height in pixels of the item or -1 to be self determined. * hsize: TRUE if the window (widget) should expand horizontally to fill space given. * vsize: TRUE if the window (widget) should expand vertically to fill space given. * pad: Number of pixels of padding around the item. */ void API dw_box_pack_at_index(HWND box, HWND item, int index, int width, int height, int hsize, int vsize, int pad) { _dw_box_pack(box, item, index, width, height, hsize, vsize, pad, "dw_box_pack_at_index()"); } /* * Pack windows (widgets) into a box from the start (or top). * Parameters: * box: Window handle of the box to be packed into. * item: Window handle of the item to be back. * width: Width in pixels of the item or -1 to be self determined. * height: Height in pixels of the item or -1 to be self determined. * hsize: TRUE if the window (widget) should expand horizontally to fill space given. * vsize: TRUE if the window (widget) should expand vertically to fill space given. * pad: Number of pixels of padding around the item. */ void API dw_box_pack_start(HWND box, HWND item, int width, int height, int hsize, int vsize, int pad) { /* 65536 is the table limit on GTK... * seems like a high enough value we will never hit it here either. */ _dw_box_pack(box, item, 65536, width, height, hsize, vsize, pad, "dw_box_pack_start()"); } /* * Pack windows (widgets) into a box from the end (or bottom). * Parameters: * box: Window handle of the box to be packed into. * item: Window handle of the item to be back. * width: Width in pixels of the item or -1 to be self determined. * height: Height in pixels of the item or -1 to be self determined. * hsize: TRUE if the window (widget) should expand horizontally to fill space given. * vsize: TRUE if the window (widget) should expand vertically to fill space given. * pad: Number of pixels of padding around the item. */ void API dw_box_pack_end(HWND box, HWND item, int width, int height, int hsize, int vsize, int pad) { _dw_box_pack(box, item, 0, width, height, hsize, vsize, pad, "dw_box_pack_end()"); } /* * The following is an attempt to dynamically size a window based on the size of its * children before realization. Only applicable when width or height is less than one. */ void _get_window_for_size(HWND handle, unsigned long *width, unsigned long *height) { Box *thisbox = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); if(thisbox) { int depth = 0; DWORD dwStyle = GetWindowLongPtr(handle, GWL_STYLE); DWORD dwExStyle = GetWindowLongPtr(handle, GWL_EXSTYLE); HMENU menu = GetMenu(handle) ; RECT rc = { 0 } ; /* Calculate space requirements */ _resize_box(thisbox, &depth, *width, *height, 1); rc.right = thisbox->minwidth; rc.bottom = thisbox->minheight; /* Take into account the window border and menu here */ AdjustWindowRectEx(&rc, dwStyle, menu ? TRUE : FALSE, dwExStyle); if ( *width < 1 ) *width = rc.right - rc.left; if ( *height < 1 ) *height = rc.bottom - rc.top; } } /* * Sets the size of a given window (widget). * Parameters: * handle: Window (widget) handle. * width: New width in pixels. * height: New height in pixels. */ void API dw_window_set_size(HWND handle, ULONG width, ULONG height) { /* Attempt to auto-size */ if ( width < 1 || height < 1 ) _get_window_for_size(handle, &width, &height); /* Finally set the size */ SetWindowPos(handle, (HWND)NULL, 0, 0, width, height, SWP_NOZORDER | SWP_NOMOVE); } /* * Gets the size the system thinks the widget should be. * Parameters: * handle: Window handle of the item to be back. * width: Width in pixels of the item or NULL if not needed. * height: Height in pixels of the item or NULL if not needed. */ void API dw_window_get_preferred_size(HWND handle, int *width, int *height) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, ClassName, strlen(ClassName)+1) == 0) { unsigned long thiswidth = 0, thisheight = 0; /* Get the size with the border */ _get_window_for_size(handle, &thiswidth, &thisheight); /* Return what was requested */ if(width) *width = (int)thiswidth; if(height) *height = (int)thisheight; } else if(strnicmp(tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1) == 0) { Box *thisbox = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); if(thisbox) { int depth = 0; /* Calculate space requirements */ _resize_box(thisbox, &depth, 0, 0, 1); /* Return what was requested */ if(width) *width = thisbox->minwidth; if(height) *height = thisbox->minheight; } } else _control_size(handle, width, height); } /* * Returns the width of the screen. */ int API dw_screen_width(void) { return GetSystemMetrics(SM_CXSCREEN); } /* * Returns the height of the screen. */ int API dw_screen_height(void) { return GetSystemMetrics(SM_CYSCREEN); } /* This should return the current color depth */ unsigned long API dw_color_depth_get(void) { int bpp; HDC hdc = GetDC(HWND_DESKTOP); bpp = GetDeviceCaps(hdc, BITSPIXEL); ReleaseDC(HWND_DESKTOP, hdc); return bpp; } /* * Sets the gravity of a given window (widget). * Gravity controls which corner of the screen and window the position is relative to. * Parameters: * handle: Window (widget) handle. * horz: DW_GRAV_LEFT (default), DW_GRAV_RIGHT or DW_GRAV_CENTER. * vert: DW_GRAV_TOP (default), DW_GRAV_BOTTOM or DW_GRAV_CENTER. */ void API dw_window_set_gravity(HWND handle, int horz, int vert) { dw_window_set_data(handle, "_dw_grav_horz", DW_INT_TO_POINTER(horz)); dw_window_set_data(handle, "_dw_grav_vert", DW_INT_TO_POINTER(vert)); } /* Convert the coordinates based on gravity */ void _handle_gravity(HWND handle, long *x, long *y, unsigned long width, unsigned long height) { int horz = DW_POINTER_TO_INT(dw_window_get_data(handle, "_dw_grav_horz")); int vert = DW_POINTER_TO_INT(dw_window_get_data(handle, "_dw_grav_vert")); /* Do any gravity calculations */ if(horz || vert) { long newx = *x, newy = *y; /* Handle horizontal center gravity */ if((horz & 0xf) == DW_GRAV_CENTER) newx += ((dw_screen_width() / 2) - (width / 2)); /* Handle right gravity */ else if((horz & 0xf) == DW_GRAV_RIGHT) newx = dw_screen_width() - width - *x; /* Handle vertical center gravity */ if((vert & 0xf) == DW_GRAV_CENTER) newy += ((dw_screen_height() / 2) - (height / 2)); else if((vert & 0xf) == DW_GRAV_BOTTOM) newy = dw_screen_height() - height - *y; /* Save the new values */ *x = newx; *y = newy; /* Adjust the values to avoid Taskbar if requested */ if((horz | vert) & DW_GRAV_OBSTACLES) { POINT pt = { 0, 0 }; HMONITOR mon = MonitorFromPoint(pt, MONITOR_DEFAULTTOPRIMARY); MONITORINFO mi; mi.cbSize = sizeof(MONITORINFO); GetMonitorInfo(mon, &mi); if(horz & DW_GRAV_OBSTACLES) { if((horz & 0xf) == DW_GRAV_LEFT) *x += (mi.rcWork.left - mi.rcMonitor.left); else if((horz & 0xf) == DW_GRAV_RIGHT) *x -= (mi.rcMonitor.right - mi.rcWork.right); } if(vert & DW_GRAV_OBSTACLES) { if((vert & 0xf) == DW_GRAV_TOP) *y += (mi.rcWork.top - mi.rcMonitor.top); else if((vert & 0xf) == DW_GRAV_BOTTOM) *y -= (mi.rcMonitor.bottom - mi.rcWork.bottom); } } } } /* * Sets the position of a given window (widget). * Parameters: * handle: Window (widget) handle. * x: X location from the bottom left. * y: Y location from the bottom left. */ void API dw_window_set_pos(HWND handle, long x, long y) { unsigned long width, height; RECT rect; GetClientRect(handle, &rect); /* Can't position an unsized window, so attempt to auto-size */ if((rect.bottom - rect.top) == 0 || (rect.right - rect.left) == 0) dw_window_set_size(handle, 0, 0); dw_window_get_pos_size(handle, NULL, NULL, &width, &height); _handle_gravity(handle, &x, &y, width, height); SetWindowPos(handle, (HWND)NULL, x, y, 0, 0, SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE); } /* * Sets the position and size of a given window (widget). * Parameters: * handle: Window (widget) handle. * x: X location from the bottom left. * y: Y location from the bottom left. * width: Width of the widget. * height: Height of the widget. */ void API dw_window_set_pos_size(HWND handle, long x, long y, ULONG width, ULONG height) { /* Attempt to auto-size */ if ( width < 1 || height < 1 ) _get_window_for_size(handle, &width, &height); _handle_gravity(handle, &x, &y, width, height); /* Finally set the size */ SetWindowPos(handle, (HWND)NULL, x, y, width, height, SWP_NOZORDER | SWP_NOACTIVATE); } /* * Gets the position and size of a given window (widget). * Parameters: * handle: Window (widget) handle. * x: X location from the bottom left. * y: Y location from the bottom left. * width: Width of the widget. * height: Height of the widget. */ void API dw_window_get_pos_size(HWND handle, long *x, long *y, ULONG *width, ULONG *height) { WINDOWPLACEMENT wp; wp.length = sizeof(WINDOWPLACEMENT); GetWindowPlacement(handle, &wp); if( wp.showCmd == SW_SHOWMAXIMIZED) { if(x) *x=0; if(y) *y=0; if(width) *width=dw_screen_width(); if(height) *height=dw_screen_height(); } else { if(x) *x = wp.rcNormalPosition.left; if(y) *y = wp.rcNormalPosition.top; if(width) *width = wp.rcNormalPosition.right - wp.rcNormalPosition.left; if(height) *height = wp.rcNormalPosition.bottom - wp.rcNormalPosition.top; } } /* * Sets the style of a given window (widget). * Parameters: * handle: Window (widget) handle. * width: New width in pixels. * height: New height in pixels. */ void API dw_window_set_style(HWND handle, ULONG style, ULONG mask) { ULONG tmp, currentstyle; ColorInfo *cinfo; char tmpbuf[100] = {0}; if(!handle) return; if(handle < (HWND)65536) { char buffer[31] = {0}; HMENU mymenu; ULONG id = (ULONG)handle; _snprintf(buffer, 30, "_dw_id%ld", id); mymenu = (HMENU)dw_window_get_data(DW_HWND_OBJECT, buffer); if(mymenu && IsMenu(mymenu)) dw_menu_item_set_state((HMENUI)mymenu, id, style & mask); return; } GetClassName(handle, tmpbuf, 99); currentstyle = GetWindowLong(handle, GWL_STYLE); cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); tmp = currentstyle | mask; tmp ^= mask; tmp |= style; if(strnicmp(tmpbuf, ClassName, strlen(ClassName)+1)==0) { tmp = tmp & 0xffff0000; #ifdef AEROGLASS if(mask & DW_FCF_COMPOSITED && _DwmExtendFrameIntoClientArea && _dw_composition) { DWORD styleex = GetWindowLongPtr(handle, GWL_EXSTYLE); if(style & DW_FCF_COMPOSITED) { MARGINS mar = {-1}; /* Attempt to enable Aero glass background on the entire window */ SetWindowLongPtr(handle, GWL_EXSTYLE, styleex | WS_EX_LAYERED); SetLayeredWindowAttributes(handle, _dw_transparencykey, 0, LWA_COLORKEY); _DwmExtendFrameIntoClientArea(handle, &mar); } else { MARGINS mar = {0}; /* Remove Aero Glass */ SetWindowLongPtr(handle, GWL_EXSTYLE, styleex & ~WS_EX_LAYERED); _DwmExtendFrameIntoClientArea(handle, &mar); } } #endif } else { /* We are using SS_NOPREFIX as a VCENTER flag */ if(tmp & SS_NOPREFIX) { if(cinfo) cinfo->vcenter = 1; else { cinfo = calloc(1, sizeof(ColorInfo)); cinfo->fore = cinfo->back = -1; cinfo->vcenter = 1; cinfo->pOldProc = SubclassWindow(handle, _colorwndproc); SetWindowLongPtr(handle, GWLP_USERDATA, (LONG_PTR)cinfo); } } else if(cinfo) cinfo->vcenter = 0; } SetWindowLong(handle, GWL_STYLE, tmp); } /* Finds the physical ID from the reference ID */ int _findnotebookid(NotebookPage **array, int pageid) { int z; for(z=0;z<256;z++) { if(array[z] && array[z]->realid == pageid) return z; } return -1; } /* * Adds a new page to specified notebook. * Parameters: * handle: Window (widget) handle. * flags: Any additional page creation flags. * front: If TRUE page is added at the beginning. */ unsigned long API dw_notebook_page_new(HWND handle, ULONG flags, int front) { NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); if(array) { int z, refid = -1; for(z=0;z<256;z++) { if(_findnotebookid(array, z) == -1) { refid = z; break; } } if(refid == -1) return -1; for(z=0;z<256;z++) { if(!array[z]) { array[z] = calloc(1, sizeof(NotebookPage)); array[z]->realid = refid; array[z]->item.mask = TCIF_TEXT; array[z]->item.iImage = -1; array[z]->item.pszText = ""; TabCtrl_InsertItem(handle, z, &(array[z]->item)); return refid; } } } return -1; } /* * Sets the text on the specified notebook tab. * Parameters: * handle: Notebook handle. * pageid: Page ID of the tab to set. * text: Pointer to the text to set. */ void API dw_notebook_page_set_text(HWND handle, ULONG pageidx, char *text) { NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); int pageid; if(!array) return; pageid = _findnotebookid(array, pageidx); if(pageid > -1 && array[pageid]) { array[pageid]->item.mask = TCIF_TEXT; array[pageid]->item.pszText = text; TabCtrl_SetItem(handle, pageid, &(array[pageid]->item)); _resize_notebook_page(handle, pageid); } } /* * Sets the text on the specified notebook tab status area. * Parameters: * handle: Notebook handle. * pageid: Page ID of the tab to set. * text: Pointer to the text to set. */ void API dw_notebook_page_set_status_text(HWND handle, ULONG pageid, char *text) { } /* * Packs the specified box into the notebook page. * Parameters: * handle: Handle to the notebook to be packed. * pageid: Page ID in the notebook which is being packed. * page: Box handle to be packed. */ void API dw_notebook_pack(HWND handle, ULONG pageidx, HWND page) { NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); int pageid; if(!array) return; pageid = _findnotebookid(array, pageidx); if(pageid > -1 && array[pageid]) { HWND tmpbox = dw_box_new(DW_VERT, 0); dw_box_pack_start(tmpbox, page, 0, 0, TRUE, TRUE, 0); if(array[pageid]->hwnd) dw_window_destroy(array[pageid]->hwnd); array[pageid]->hwnd = tmpbox; if(pageidx == dw_notebook_page_get(handle)) { ShowWindow(tmpbox, SW_HIDE); SetParent(tmpbox, handle); _resize_notebook_page(handle, pageid); } } } /* * Remove a page from a notebook. * Parameters: * handle: Handle to the notebook widget. * pageid: ID of the page to be destroyed. */ void API dw_notebook_page_destroy(HWND handle, unsigned int pageidx) { NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); int newid = -1, z, pageid; HWND pagehwnd = 0; if(!array) return; pageid = _findnotebookid(array, pageidx); if(pageid < 0) return; if(array[pageid]) { SetParent(array[pageid]->hwnd, DW_HWND_OBJECT); pagehwnd = array[pageid]->hwnd; free(array[pageid]); array[pageid] = NULL; } TabCtrl_DeleteItem(handle, pageid); /* Shift the pages over 1 */ for(z=pageid;z<255;z++) array[z] = array[z+1]; array[255] = NULL; for(z=0;z<256;z++) { if(array[z]) { newid = z; break; } } if(newid > -1) { SetParent(array[newid]->hwnd, handle); _resize_notebook_page(handle, newid); dw_notebook_page_set(handle, array[newid]->realid); } if(pagehwnd) dw_window_destroy(pagehwnd); } /* * Queries the currently visible page ID. * Parameters: * handle: Handle to the notebook widget. */ unsigned long API dw_notebook_page_get(HWND handle) { NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); int physid = TabCtrl_GetCurSel(handle); if(physid > -1 && physid < 256 && array && array[physid]) return array[physid]->realid; return -1; } /* * Sets the currently visible page ID. * Parameters: * handle: Handle to the notebook widget. * pageid: ID of the page to be made visible. */ void API dw_notebook_page_set(HWND handle, unsigned int pageidx) { NotebookPage **array = (NotebookPage **)dw_window_get_data(handle, "_dw_array"); int pageid; if(!array) return; pageid = _findnotebookid(array, pageidx); if(pageid > -1 && pageid < 256) { int oldpage = TabCtrl_GetCurSel(handle); if(oldpage > -1 && array && array[oldpage]) SetParent(array[oldpage]->hwnd, DW_HWND_OBJECT); TabCtrl_SetCurSel(handle, pageid); SetParent(array[pageid]->hwnd, handle); _resize_notebook_page(handle, pageid); } } /* * Appends the specified text to the listbox's (or combobox) entry list. * Parameters: * handle: Handle to the listbox to be appended to. * text: Text to append into listbox. */ void API dw_listbox_append(HWND handle, char *text) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) SendMessage(handle, CB_ADDSTRING, 0, (LPARAM)text); else SendMessage(handle, LB_ADDSTRING, 0, (LPARAM)text); } /* * Appends the specified text items to the listbox's (or combobox) entry list. * Parameters: * handle: Handle to the listbox to be appended to. * text: Text strings to append into listbox. * count: Number of text strings to append */ void API dw_listbox_list_append(HWND handle, char **text, int count) { char tmpbuf[100] = {0}; int listbox_type; int i; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) listbox_type = CB_ADDSTRING; else listbox_type = LB_ADDSTRING; for(i=0;i<count;i++) SendMessage(handle,(WPARAM)listbox_type,0,(LPARAM)text[i]); } /* * Inserts the specified text to the listbox's (or combobox) entry list. * Parameters: * handle: Handle to the listbox to be appended to. * text: Text to append into listbox. * pos: 0 based position to insert text */ void API dw_listbox_insert(HWND handle, char *text, int pos) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) SendMessage(handle, CB_INSERTSTRING, pos, (LPARAM)text); else SendMessage(handle, LB_INSERTSTRING, pos, (LPARAM)text); } /* * Clears the listbox's (or combobox) list of all entries. * Parameters: * handle: Handle to the listbox to be cleared. */ void API dw_listbox_clear(HWND handle) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) { char *buf = dw_window_get_text(handle); SendMessage(handle, CB_RESETCONTENT, 0L, 0L); if(buf) { dw_window_set_text(handle, buf); free(buf); } } else SendMessage(handle, LB_RESETCONTENT, 0L, 0L); } /* * Sets the text of a given listbox entry. * Parameters: * handle: Handle to the listbox to be queried. * index: Index into the list to be queried. * buffer: Buffer where text will be copied. */ void API dw_listbox_set_text(HWND handle, unsigned int index, char *buffer) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) { SendMessage(handle, CB_DELETESTRING, (WPARAM)index, 0); SendMessage(handle, CB_INSERTSTRING, (WPARAM)index, (LPARAM)buffer); } else { unsigned int sel = (unsigned int)SendMessage(handle, LB_GETCURSEL, 0, 0); SendMessage(handle, LB_DELETESTRING, (WPARAM)index, 0); SendMessage(handle, LB_INSERTSTRING, (WPARAM)index, (LPARAM)buffer); SendMessage(handle, LB_SETCURSEL, (WPARAM)sel, 0); SendMessage(handle, LB_SETSEL, (WPARAM)TRUE, (LPARAM)sel); } } /* * Copies the given index item's text into buffer. * Parameters: * handle: Handle to the listbox to be queried. * index: Index into the list to be queried. * buffer: Buffer where text will be copied. * length: Length of the buffer (including NULL). */ void API dw_listbox_get_text(HWND handle, unsigned int index, char *buffer, unsigned int length) { char tmpbuf[100] = {0}; int len; if(!buffer || !length) return; buffer[0] = 0; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) { len = (int)SendMessage(handle, CB_GETLBTEXTLEN, (WPARAM)index, 0); if(len < length && len != CB_ERR) SendMessage(handle, CB_GETLBTEXT, (WPARAM)index, (LPARAM)buffer); } else { len = (int)SendMessage(handle, LB_GETTEXTLEN, (WPARAM)index, 0); if(len < length && len != LB_ERR) SendMessage(handle, LB_GETTEXT, (WPARAM)index, (LPARAM)buffer); } } /* * Returns the index to the item in the list currently selected. * Parameters: * handle: Handle to the listbox to be queried. */ int API dw_listbox_selected(HWND handle) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) return (unsigned int)SendMessage(handle, CB_GETCURSEL, 0, 0); return (unsigned int)SendMessage(handle, LB_GETCURSEL, 0, 0); } /* * Returns the index to the current selected item or -1 when done. * Parameters: * handle: Handle to the listbox to be queried. * where: Either the previous return or -1 to restart. */ int API dw_listbox_selected_multi(HWND handle, int where) { int *array, count, z; char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); /* This doesn't work on comboboxes */ if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) return -1; count = (int)SendMessage(handle, LB_GETSELCOUNT, 0, 0); if(count > 0) { array = malloc(sizeof(int)*count); SendMessage(handle, LB_GETSELITEMS, (WPARAM)count, (LPARAM)array); if(where == -1) { int ret = array[0]; free(array); return ret; } for(z=0;z<count;z++) { if(array[z] == where && (z+1) < count) { int ret = array[z+1]; free(array); return ret; } } free(array); } return -1; } /* * Sets the selection state of a given index. * Parameters: * handle: Handle to the listbox to be set. * index: Item index. * state: TRUE if selected FALSE if unselected. */ void API dw_listbox_select(HWND handle, int index, int state) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) SendMessage(handle, CB_SETCURSEL, (WPARAM)index, 0); else { SendMessage(handle, LB_SETCURSEL, (WPARAM)index, 0); SendMessage(handle, LB_SETSEL, (WPARAM)state, (LPARAM)index); } _wndproc(handle, WM_COMMAND, (WPARAM)(LBN_SELCHANGE << 16), (LPARAM)handle); } /* * Deletes the item with given index from the list. * Parameters: * handle: Handle to the listbox to be set. * index: Item index. */ void API dw_listbox_delete(HWND handle, int index) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) SendMessage(handle, CB_DELETESTRING, (WPARAM)index, 0); else SendMessage(handle, LB_DELETESTRING, (WPARAM)index, 0); } /* * Returns the listbox's item count. * Parameters: * handle: Handle to the listbox to be cleared. */ int API dw_listbox_count(HWND handle) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) return (int)SendMessage(handle, CB_GETCOUNT,0L, 0L); return (int)SendMessage(handle, LB_GETCOUNT,0L, 0L); } /* * Sets the topmost item in the viewport. * Parameters: * handle: Handle to the listbox to be cleared. * top: Index to the top item. */ void API dw_listbox_set_top(HWND handle, int top) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); /* This doesn't work on comboboxes */ if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) return; SendMessage(handle, LB_SETTOPINDEX, (WPARAM)top, 0); } /* * Adds text to an MLE box and returns the current point. * Parameters: * handle: Handle to the MLE to be queried. * buffer: Text buffer to be imported. * startpoint: Point to start entering text. */ unsigned int API dw_mle_import(HWND handle, char *buffer, int startpoint) { int textlen, len = GetWindowTextLength(handle); char *tmpbuf; if(startpoint < 0) startpoint = 0; if(!buffer || (textlen = strlen(buffer)) < 1) return startpoint; tmpbuf = calloc(1, len + textlen + startpoint + 2); if(len) { char *dest, *start; int copylen = len - startpoint; GetWindowText(handle, tmpbuf, len+1); dest = &tmpbuf[startpoint+textlen]; start = &tmpbuf[startpoint]; if(copylen > 0) memcpy(dest, start, copylen); } memcpy(&tmpbuf[startpoint], buffer, textlen); SetWindowText(handle, tmpbuf); free(tmpbuf); return (startpoint + textlen); } /* * Grabs text from an MLE box. * Parameters: * handle: Handle to the MLE to be queried. * buffer: Text buffer to be exported. MUST allow for trailing nul character. * startpoint: Point to start grabbing text. * length: Amount of text to be grabbed. */ void API dw_mle_export(HWND handle, char *buffer, int startpoint, int length) { int max, len = GetWindowTextLength(handle); char *tmpbuf = calloc(1, len+2); if(len) GetWindowText(handle, tmpbuf, len+1); buffer[0] = 0; if(startpoint < len) { max = MIN(length, len - startpoint); memcpy(buffer, &tmpbuf[startpoint], max); buffer[max] = '\0'; } free(tmpbuf); } /* * Obtains information about an MLE box. * Parameters: * handle: Handle to the MLE to be queried. * bytes: A pointer to a variable to return the total bytes. * lines: A pointer to a variable to return the number of lines. */ void API dw_mle_get_size(HWND handle, unsigned long *bytes, unsigned long *lines) { if(bytes) *bytes = GetWindowTextLength(handle); if(lines) *lines = (unsigned long)SendMessage(handle, EM_GETLINECOUNT, 0, 0); } /* * Deletes text from an MLE box. * Parameters: * handle: Handle to the MLE to be deleted from. * startpoint: Point to start deleting text. * length: Amount of text to be deleted. */ void API dw_mle_delete(HWND handle, int startpoint, int length) { int len = GetWindowTextLength(handle); char *tmpbuf = calloc(1, len+2); GetWindowText(handle, tmpbuf, len+1); if(startpoint + length < len) { strcpy(&tmpbuf[startpoint], &tmpbuf[startpoint+length]); SetWindowText(handle, tmpbuf); } free(tmpbuf); } /* * Clears all text from an MLE box. * Parameters: * handle: Handle to the MLE to be cleared. */ void API dw_mle_clear(HWND handle) { SetWindowText(handle, ""); } /* * Sets the visible line of an MLE box. * Parameters: * handle: Handle to the MLE. * line: Line to be visible. */ void API dw_mle_set_visible(HWND handle, int line) { int point = (int)SendMessage(handle, EM_LINEINDEX, (WPARAM)line, 0); dw_mle_set_cursor(handle, point); } /* * Sets the editablity of an MLE box. * Parameters: * handle: Handle to the MLE. * state: TRUE if it can be edited, FALSE for readonly. */ void API dw_mle_set_editable(HWND handle, int state) { SendMessage(handle, EM_SETREADONLY, (WPARAM)(state ? FALSE : TRUE), 0); } /* * Sets the word wrap state of an MLE box. * Parameters: * handle: Handle to the MLE. * state: TRUE if it wraps, FALSE if it doesn't. */ void API dw_mle_set_word_wrap(HWND handle, int state) { /* If ES_AUTOHSCROLL is not set and there is no * horizontal scrollbar it word wraps. */ if(state) dw_window_set_style(handle, 0, ES_AUTOHSCROLL); else dw_window_set_style(handle, ES_AUTOHSCROLL, ES_AUTOHSCROLL); } /* * Sets the current cursor position of an MLE box. * Parameters: * handle: Handle to the MLE to be positioned. * point: Point to position cursor. */ void API dw_mle_set_cursor(HWND handle, int point) { SendMessage(handle, EM_SETSEL, 0, MAKELONG(point,point)); SendMessage(handle, EM_SCROLLCARET, 0, 0); } /* * Finds text in an MLE box. * Parameters: * handle: Handle to the MLE to be cleared. * text: Text to search for. * point: Start point of search. * flags: Search specific flags. */ int API dw_mle_search(HWND handle, char *text, int point, unsigned long flags) { int len = GetWindowTextLength(handle); char *tmpbuf = calloc(1, len+2); int z, textlen, retval = 0; GetWindowText(handle, tmpbuf, len+1); textlen = strlen(text); if(flags & DW_MLE_CASESENSITIVE) { for(z=point;z<(len-textlen) && !retval;z++) { if(strncmp(&tmpbuf[z], text, textlen) == 0) retval = z + textlen; } } else { for(z=point;z<(len-textlen) && !retval;z++) { if(strnicmp(&tmpbuf[z], text, textlen) == 0) retval = z + textlen; } } if(retval) { SendMessage(handle, EM_SETSEL, (WPARAM)retval - textlen, (LPARAM)retval); SendMessage(handle, EM_SCROLLCARET, 0, 0); } free(tmpbuf); return retval; } /* * Stops redrawing of an MLE box. * Parameters: * handle: Handle to the MLE to freeze. */ void API dw_mle_freeze(HWND handle) { } /* * Resumes redrawing of an MLE box. * Parameters: * handle: Handle to the MLE to thaw. */ void API dw_mle_thaw(HWND handle) { } /* * Sets the percent bar position. * Parameters: * handle: Handle to the percent bar to be set. * position: Position of the percent bar withing the range. */ void API dw_percent_set_pos(HWND handle, unsigned int position) { if(position == DW_PERCENT_INDETERMINATE) { /* If our common controls supports it... */ if((dwComctlVer >= PACKVERSION(6,0))) { /* Enable the style on the control */ SetWindowLong(handle, GWL_STYLE, GetWindowLong(handle, GWL_STYLE) | PBS_MARQUEE); /* Start the bar going */ SendMessage(handle, PBM_SETMARQUEE, 1, 100); } else SendMessage(handle, PBM_SETPOS, 0, 0); } else { if((dwComctlVer >= PACKVERSION(6,0))) { unsigned long style = GetWindowLong(handle, GWL_STYLE); if(style & PBS_MARQUEE) { /* Stop the bar */ SendMessage(handle, PBM_SETMARQUEE, 0, 0); /* Disable the style on the control */ SetWindowLong(handle, GWL_STYLE, style & ~PBS_MARQUEE); } } /* Otherwise just set the position */ SendMessage(handle, PBM_SETPOS, (WPARAM)position, 0); } } /* * Returns the position of the slider. * Parameters: * handle: Handle to the slider to be queried. */ unsigned int API dw_slider_get_pos(HWND handle) { int max = (int)SendMessage(handle, TBM_GETRANGEMAX, 0, 0); ULONG currentstyle = GetWindowLong(handle, GWL_STYLE); if(currentstyle & TBS_VERT) return max - (unsigned int)SendMessage(handle, TBM_GETPOS, 0, 0); return (unsigned int)SendMessage(handle, TBM_GETPOS, 0, 0); } /* * Sets the slider position. * Parameters: * handle: Handle to the slider to be set. * position: Position of the slider withing the range. */ void API dw_slider_set_pos(HWND handle, unsigned int position) { int max = (int)SendMessage(handle, TBM_GETRANGEMAX, 0, 0); ULONG currentstyle = GetWindowLong(handle, GWL_STYLE); if(currentstyle & TBS_VERT) SendMessage(handle, TBM_SETPOS, (WPARAM)TRUE, (LPARAM)max - position); else SendMessage(handle, TBM_SETPOS, (WPARAM)TRUE, (LPARAM)position); } /* * Returns the position of the scrollbar. * Parameters: * handle: Handle to the scrollbar to be queried. */ unsigned int API dw_scrollbar_get_pos(HWND handle) { return (unsigned int)SendMessage(handle, SBM_GETPOS, 0, 0); } /* * Sets the scrollbar position. * Parameters: * handle: Handle to the scrollbar to be set. * position: Position of the scrollbar withing the range. */ void API dw_scrollbar_set_pos(HWND handle, unsigned int position) { dw_window_set_data(handle, "_dw_scrollbar_value", (void *)position); SendMessage(handle, SBM_SETPOS, (WPARAM)position, (LPARAM)TRUE); } /* * Sets the scrollbar range. * Parameters: * handle: Handle to the scrollbar to be set. * range: Maximum range value. * visible: Visible area relative to the range. */ void API dw_scrollbar_set_range(HWND handle, unsigned int range, unsigned int visible) { SCROLLINFO si; si.cbSize = sizeof(SCROLLINFO); si.fMask = SIF_RANGE | SIF_PAGE; si.nMin = 0; si.nMax = range - 1; si.nPage = visible; SendMessage(handle, SBM_SETSCROLLINFO, (WPARAM)TRUE, (LPARAM)&si); } /* * Sets the spinbutton value. * Parameters: * handle: Handle to the spinbutton to be set. * position: Current value of the spinbutton. */ void API dw_spinbutton_set_pos(HWND handle, long position) { char tmpbuf[101] = {0}; ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); _snprintf(tmpbuf, 100, "%ld", position); if(cinfo && cinfo->buddy) SetWindowText(cinfo->buddy, tmpbuf); SendMessage(handle, UDM_SETPOS32, 0, (LPARAM)position); } /* * Sets the spinbutton limits. * Parameters: * handle: Handle to the spinbutton to be set. * position: Current value of the spinbutton. * position: Current value of the spinbutton. */ void API dw_spinbutton_set_limits(HWND handle, long upper, long lower) { SendMessage(handle, UDM_SETRANGE32, (WPARAM)lower,(LPARAM)upper); } /* * Sets the entryfield character limit. * Parameters: * handle: Handle to the spinbutton to be set. * limit: Number of characters the entryfield will take. */ void API dw_entryfield_set_limit(HWND handle, ULONG limit) { SendMessage(handle, EM_SETLIMITTEXT, (WPARAM)limit, 0); } /* * Returns the current value of the spinbutton. * Parameters: * handle: Handle to the spinbutton to be queried. */ long API dw_spinbutton_get_pos(HWND handle) { return (long)SendMessage(handle, UDM_GETPOS32, 0, 0); } /* * Returns the state of the checkbox. * Parameters: * handle: Handle to the checkbox to be queried. */ int API dw_checkbox_get(HWND handle) { if(SendMessage(handle, BM_GETCHECK, 0, 0) == BST_CHECKED) return (in_checkbox_handler ? FALSE : TRUE); return (in_checkbox_handler ? TRUE : FALSE); } /* This function unchecks all radiobuttons on a box */ BOOL CALLBACK _uncheck_radios(HWND handle, LPARAM lParam) { char tmpbuf[100] = {0}; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, BUTTONCLASSNAME, strlen(BUTTONCLASSNAME)+1)==0) { if(!dw_window_get_data(handle, "_dw_checkbox")) SendMessage(handle, BM_SETCHECK, 0, 0); } return TRUE; } /* * Sets the state of the checkbox. * Parameters: * handle: Handle to the checkbox to be queried. * value: TRUE for checked, FALSE for unchecked. */ void API dw_checkbox_set(HWND handle, int value) { if(!dw_window_get_data(handle, "_dw_checkbox")) { HWND parent = GetParent(handle); if(parent) EnumChildWindows(parent, _uncheck_radios, 0); } SendMessage(handle, BM_SETCHECK, (WPARAM)value, 0); } /* * Inserts an item into a tree window (widget) after another item. * Parameters: * handle: Handle to the tree to be inserted. * item: Handle to the item to be positioned after. * title: The text title of the entry. * icon: Handle to coresponding icon. * parent: Parent handle or 0 if root. * itemdata: Item specific data. */ HTREEITEM API dw_tree_insert_after(HWND handle, HTREEITEM item, char *title, HICN icon, HTREEITEM parent, void *itemdata) { TVITEM tvi; TVINSERTSTRUCT tvins; HTREEITEM hti; void **ptrs= malloc(sizeof(void *) * 2); ptrs[0] = title; ptrs[1] = itemdata; tvi.mask = TVIF_TEXT | TVIF_IMAGE | TVIF_SELECTEDIMAGE | TVIF_PARAM; tvi.pszText = title; tvi.lParam = (LONG)ptrs; tvi.cchTextMax = strlen(title); tvi.iSelectedImage = tvi.iImage = _lookup_icon(handle, (HICON)icon, 1); tvins.item = tvi; tvins.hParent = parent; tvins.hInsertAfter = item ? item : TVI_FIRST; hti = TreeView_InsertItem(handle, &tvins); return hti; } /* * Inserts an item into a tree window (widget). * Parameters: * handle: Handle to the tree to be inserted. * title: The text title of the entry. * icon: Handle to coresponding icon. * parent: Parent handle or 0 if root. * itemdata: Item specific data. */ HTREEITEM API dw_tree_insert(HWND handle, char *title, HICN icon, HTREEITEM parent, void *itemdata) { TVITEM tvi; TVINSERTSTRUCT tvins; HTREEITEM hti; void **ptrs= malloc(sizeof(void *) * 2); ptrs[0] = title; ptrs[1] = itemdata; tvi.mask = TVIF_TEXT | TVIF_IMAGE | TVIF_SELECTEDIMAGE | TVIF_PARAM; tvi.pszText = title; tvi.lParam = (LONG)ptrs; tvi.cchTextMax = strlen(title); tvi.iSelectedImage = tvi.iImage = _lookup_icon(handle, (HICON)icon, 1); tvins.item = tvi; tvins.hParent = parent; tvins.hInsertAfter = TVI_LAST; hti = TreeView_InsertItem(handle, &tvins); return hti; } /* * Sets the text and icon of an item in a tree window (widget). * Parameters: * handle: Handle to the tree containing the item. * item: Handle of the item to be modified. * title: The text title of the entry. * icon: Handle to coresponding icon. */ void API dw_tree_item_change(HWND handle, HTREEITEM item, char *title, HICN icon) { TVITEM tvi; void **ptrs; tvi.mask = TVIF_HANDLE; tvi.hItem = item; if(TreeView_GetItem(handle, &tvi)) { ptrs = (void **)tvi.lParam; ptrs[0] = title; tvi.mask = TVIF_TEXT | TVIF_IMAGE | TVIF_SELECTEDIMAGE; tvi.pszText = title; tvi.cchTextMax = strlen(title); tvi.iSelectedImage = tvi.iImage = _lookup_icon(handle, (HICON)icon, 1); tvi.hItem = (HTREEITEM)item; TreeView_SetItem(handle, &tvi); } } /* * Sets the item data of a tree item. * Parameters: * handle: Handle to the tree containing the item. * item: Handle of the item to be modified. * itemdata: User defined data to be associated with item. */ void API dw_tree_item_set_data(HWND handle, HTREEITEM item, void *itemdata) { TVITEM tvi; void **ptrs; tvi.mask = TVIF_HANDLE; tvi.hItem = item; if(TreeView_GetItem(handle, &tvi)) { ptrs = (void **)tvi.lParam; ptrs[1] = itemdata; } } /* * Gets the item data of a tree item. * Parameters: * handle: Handle to the tree containing the item. * item: Handle of the item to be modified. */ void * API dw_tree_item_get_data(HWND handle, HTREEITEM item) { TVITEM tvi; void **ptrs; tvi.mask = TVIF_HANDLE | TVIF_PARAM; tvi.hItem = item; if(TreeView_GetItem(handle, &tvi)) { ptrs = (void **)tvi.lParam; return ptrs[1]; } return NULL; } /* * Gets the text an item in a tree window (widget). * Parameters: * handle: Handle to the tree containing the item. * item: Handle of the item to be modified. */ char * API dw_tree_get_title(HWND handle, HTREEITEM item) { TVITEM tvi; tvi.mask = TVIF_HANDLE; tvi.hItem = item; if(TreeView_GetItem(handle, &tvi)) return tvi.pszText; return NULL; } /* * Gets the text an item in a tree window (widget). * Parameters: * handle: Handle to the tree containing the item. * item: Handle of the item to be modified. */ HTREEITEM API dw_tree_get_parent(HWND handle, HTREEITEM item) { return TreeView_GetParent(handle, item); } /* * Sets this item as the active selection. * Parameters: * handle: Handle to the tree window (widget) to be selected. * item: Handle to the item to be selected. */ void API dw_tree_item_select(HWND handle, HTREEITEM item) { dw_window_set_data(handle, "_dw_select_item", (void *)1); TreeView_SelectItem(handle, item); dw_window_set_data(handle, "_dw_select_item", (void *)0); } /* Delete all tree subitems */ void _dw_tree_item_delete_recursive(HWND handle, HTREEITEM node) { HTREEITEM hti; hti = TreeView_GetChild(handle, node); while(hti) { HTREEITEM lastitem = hti; hti = TreeView_GetNextSibling(handle, hti); dw_tree_item_delete(handle, lastitem); } } /* * Removes all nodes from a tree. * Parameters: * handle: Handle to the window (widget) to be cleared. */ void API dw_tree_clear(HWND handle) { HTREEITEM hti = TreeView_GetRoot(handle); dw_window_set_data(handle, "_dw_select_item", (void *)1); while(hti) { HTREEITEM lastitem = hti; _dw_tree_item_delete_recursive(handle, hti); hti = TreeView_GetNextSibling(handle, hti); dw_tree_item_delete(handle, lastitem); } dw_window_set_data(handle, "_dw_select_item", (void *)0); } /* * Expands a node on a tree. * Parameters: * handle: Handle to the tree window (widget). * item: Handle to node to be expanded. */ void API dw_tree_item_expand(HWND handle, HTREEITEM item) { TreeView_Expand(handle, item, TVE_EXPAND); } /* * Collapses a node on a tree. * Parameters: * handle: Handle to the tree window (widget). * item: Handle to node to be collapsed. */ void API dw_tree_item_collapse(HWND handle, HTREEITEM item) { TreeView_Expand(handle, item, TVE_COLLAPSE); } /* * Removes a node from a tree. * Parameters: * handle: Handle to the window (widget) to be cleared. * item: Handle to node to be deleted. */ void API dw_tree_item_delete(HWND handle, HTREEITEM item) { TVITEM tvi; void **ptrs=NULL; if(item == TVI_ROOT || !item) return; tvi.mask = TVIF_HANDLE; tvi.hItem = item; if(TreeView_GetItem(handle, &tvi)) ptrs = (void **)tvi.lParam; _dw_tree_item_delete_recursive(handle, item); TreeView_DeleteItem(handle, item); if(ptrs) free(ptrs); } /* * Sets up the container columns. * Parameters: * handle: Handle to the container to be configured. * flags: An array of unsigned longs with column flags. * titles: An array of strings with column text titles. * count: The number of columns (this should match the arrays). * separator: The column number that contains the main separator. * (only used on OS/2 but must be >= 0 on all) */ int API dw_container_setup(HWND handle, unsigned long *flags, char **titles, int count, int separator) { ContainerInfo *cinfo = (ContainerInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); int z, l = 0; unsigned long *tempflags = calloc(sizeof(unsigned long), count + 2); LVCOLUMN lvc; if(separator == -1) { tempflags[0] = DW_CFA_RESERVED; l = 1; } memcpy(&tempflags[l], flags, sizeof(unsigned long) * count); tempflags[count + l] = 0; cinfo->flags = tempflags; cinfo->columns = count + l; for(z=0;z<count;z++) { if(titles[z]) { lvc.mask = LVCF_TEXT | LVCF_WIDTH | LVCF_SUBITEM | LVCF_FMT; lvc.pszText = titles[z]; lvc.cchTextMax = strlen(titles[z]); if(flags[z] & DW_CFA_RIGHT) lvc.fmt = LVCFMT_RIGHT; else if(flags[z] & DW_CFA_CENTER) lvc.fmt = LVCFMT_CENTER; else lvc.fmt = LVCFMT_LEFT; lvc.cx = 75; lvc.iSubItem = count; SendMessage(handle, LVM_INSERTCOLUMN, (WPARAM)z + l, (LPARAM)&lvc); } } ListView_SetExtendedListViewStyle(handle, LVS_EX_FULLROWSELECT | LVS_EX_SUBITEMIMAGES); return DW_ERROR_NONE; } /* * Sets up the filesystem columns, note: filesystem always has an icon/filename field. * Parameters: * handle: Handle to the container to be configured. * flags: An array of unsigned longs with column flags. * titles: An array of strings with column text titles. * count: The number of columns (this should match the arrays). */ int API dw_filesystem_setup(HWND handle, unsigned long *flags, char **titles, int count) { LV_COLUMN lvc; lvc.mask = LVCF_TEXT | LVCF_WIDTH | LVCF_SUBITEM; lvc.pszText = "Filename"; lvc.cchTextMax = 8; lvc.fmt = 0; if(!count) lvc.cx = 300; else lvc.cx = 150; lvc.iSubItem = count; SendMessage(handle, LVM_INSERTCOLUMN, (WPARAM)0, (LPARAM)&lvc); dw_container_setup(handle, flags, titles, count, -1); return DW_ERROR_NONE; } /* * Obtains an icon from a module (or header in GTK). * Parameters: * module: Handle to module (DLL) in OS/2 and Windows. * id: A unsigned long id int the resources on OS/2 and * Windows, on GTK this is converted to a pointer * to an embedded XPM. */ HICN API dw_icon_load(unsigned long module, unsigned long id) { return (HICN)LoadIcon(DWInstance, MAKEINTRESOURCE(id)); } /* * Obtains an icon from a file. * Parameters: * filename: Name of the file, omit extention to have * DW pick the appropriate file extension. * (ICO on OS/2 or Windows, XPM on Unix) */ HICN API dw_icon_load_from_file(char *filename) { #ifdef GDIPLUS return _dw_load_icon(filename); #else char *file = malloc(strlen(filename) + 5); HANDLE icon; if(!file) return 0; strcpy(file, filename); /* check if we can read from this file (it exists and read permission) */ if(access(file, 04) != 0) { /* Try with .bmp extention */ strcat(file, ".ico"); if(access(file, 04) != 0) { free(file); return 0; } } icon = LoadImage(NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE); free(file); return (HICN)icon; #endif } /* * Obtains an icon from data * Parameters: * data: Source of icon data * DW pick the appropriate file extension. * (ICO on OS/2 or Windows, XPM on Unix) */ HICN API dw_icon_load_from_data(char *data, int len) { HANDLE icon = 0; char *file; FILE *fp; if ( !data ) return 0; file = _tempnam( _dw_alternate_temp_dir, "dw" ); if ( file != NULL ) { fp = fopen( file, "wb" ); if ( fp != NULL ) { fwrite( data, 1, len, fp ); fclose( fp ); #ifdef GDIPLUS icon = _dw_load_icon(file); #else icon = LoadImage( NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE ); #endif } else { unlink( file ); free( file ); return 0; } unlink( file ); free( file ); } return (HICN)icon; } /* * Frees a loaded resource in OS/2 and Windows. * Parameters: * handle: Handle to icon returned by dw_icon_load(). */ void API dw_icon_free(HICN handle) { DestroyIcon((HICON)handle); } /* * Allocates memory used to populate a container. * Parameters: * handle: Handle to the container window (widget). * rowcount: The number of items to be populated. */ void * API dw_container_alloc(HWND handle, int rowcount) { LV_ITEM lvi; int z, item; lvi.mask = LVIF_DI_SETITEM | LVIF_TEXT | LVIF_IMAGE; lvi.iSubItem = 0; /* Insert at the end */ lvi.iItem = 1000000; lvi.pszText = ""; lvi.cchTextMax = 1; lvi.iImage = -1; ShowWindow(handle, SW_HIDE); item = ListView_InsertItem(handle, &lvi); for(z=1;z<rowcount;z++) ListView_InsertItem(handle, &lvi); dw_window_set_data(handle, "_dw_insertitem", (void *)item); return (void *)handle; } /* Finds a icon in the table, otherwise it adds it to the table * and returns the index in the table. */ int _lookup_icon(HWND handle, HICON hicon, int type) { int z; static HWND lasthwnd = NULL; HIMAGELIST himl; /* We can't add an invalid handle */ if(!hicon) return -1; if(!hSmall || !hLarge) { hSmall = ImageList_Create(16, 16, ILC_COLOR16 | ILC_MASK, ICON_INDEX_LIMIT, 0); hLarge = ImageList_Create(32, 32, ILC_COLOR16 | ILC_MASK, ICON_INDEX_LIMIT, 0); } for(z=0;z<ICON_INDEX_LIMIT;z++) { if(!lookup[z]) { lookup[z] = hicon; ImageList_AddIcon(hSmall, hicon); ImageList_AddIcon(hLarge, hicon); if(type) { himl = TreeView_SetImageList(handle, hSmall, TVSIL_NORMAL); } else { himl = ListView_SetImageList(handle, hSmall, LVSIL_SMALL); himl = ListView_SetImageList(handle, hLarge, LVSIL_NORMAL); } lasthwnd = handle; return z; } if(hicon == lookup[z]) { if(lasthwnd != handle) { if(type) { himl = TreeView_SetImageList(handle, hSmall, TVSIL_NORMAL); } else { himl = ListView_SetImageList(handle, hSmall, LVSIL_SMALL); himl = ListView_SetImageList(handle, hLarge, LVSIL_NORMAL); } lasthwnd = handle; } return z; } } return -1; } /* * Sets an item in specified row and column to the given data. * Parameters: * handle: Handle to the container window (widget). * pointer: Pointer to the allocated memory in dw_container_alloc(). * column: Zero based column of data being set. * row: Zero based row of data being set. * data: Pointer to the data to be added. */ void API dw_filesystem_set_file(HWND handle, void *pointer, int row, char *filename, HICN icon) { LV_ITEM lvi; int item = 0; if(pointer) { item = (int)dw_window_get_data(handle, "_dw_insertitem"); } lvi.iItem = row + item; lvi.iSubItem = 0; lvi.mask = LVIF_DI_SETITEM | LVIF_IMAGE | LVIF_TEXT; lvi.pszText = filename; lvi.cchTextMax = strlen(filename); lvi.iImage = _lookup_icon(handle, (HICON)icon, 0); ListView_SetItem(handle, &lvi); } /* * Sets an item in specified row and column to the given data. * Parameters: * handle: Handle to the container window (widget). * pointer: Pointer to the allocated memory in dw_container_alloc(). * column: Zero based column of data being set. * row: Zero based row of data being set. * data: Pointer to the data to be added. */ void API dw_filesystem_set_item(HWND handle, void *pointer, int column, int row, void *data) { dw_container_set_item(handle, pointer, column + 1, row, data); } /* * Sets an item in specified row and column to the given data. * Parameters: * handle: Handle to the container window (widget). * pointer: Pointer to the allocated memory in dw_container_alloc(). * column: Zero based column of data being set. * row: Zero based row of data being set. * data: Pointer to the data to be added. */ void API dw_container_set_item(HWND handle, void *pointer, int column, int row, void *data) { ContainerInfo *cinfo = (ContainerInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); ULONG *flags; LV_ITEM lvi; char textbuffer[101] = {0}; int item = 0; if(pointer) { item = (int)dw_window_get_data(handle, "_dw_insertitem"); } if(!cinfo || !cinfo->flags) return; flags = cinfo->flags; lvi.mask = LVIF_DI_SETITEM | LVIF_TEXT; lvi.iItem = row + item; lvi.iSubItem = column; lvi.pszText = textbuffer; lvi.cchTextMax = 0; if(flags[column] & DW_CFA_BITMAPORICON) { lvi.mask = LVIF_DI_SETITEM | LVIF_IMAGE; lvi.pszText = NULL; if(data) { HICON hicon = *((HICON *)data); lvi.iImage = _lookup_icon(handle, hicon, 0); } else lvi.iImage = -1; } else if(flags[column] & DW_CFA_STRING && data) { char *tmp = *((char **)data); if(!tmp) tmp = ""; lvi.pszText = tmp; lvi.cchTextMax = strlen(tmp); } else if(flags[column] & DW_CFA_ULONG && data) { ULONG tmp = *((ULONG *)data); _snprintf(textbuffer, 100, "%lu", tmp); lvi.cchTextMax = strlen(textbuffer); } else if(flags[column] & DW_CFA_DATE && data) { struct tm curtm; CDATE cdate = *((CDATE *)data); memset(&curtm, 0, sizeof(struct tm)); /* Safety check... zero dates are crashing * Visual Studio 2008. -Brian */ if(cdate.year > 1900 && cdate.year < 2100) { curtm.tm_mday = (cdate.day >= 0 && cdate.day < 32) ? cdate.day : 1; curtm.tm_mon = (cdate.month > 0 && cdate.month < 13) ? cdate.month - 1 : 0; curtm.tm_year = cdate.year - 1900; strftime(textbuffer, 100, "%x", &curtm); } lvi.cchTextMax = strlen(textbuffer); } else if(flags[column] & DW_CFA_TIME && data) { struct tm curtm; CTIME ctime = *((CTIME *)data); curtm.tm_hour = (ctime.hours >= 0 && ctime.hours < 24) ? ctime.hours : 0; curtm.tm_min = (ctime.minutes >= 0 && ctime.minutes < 60) ? ctime.minutes : 0; curtm.tm_sec = (ctime.seconds >= 0 && ctime.seconds < 60) ? ctime.seconds : 0; strftime(textbuffer, 100, "%X", &curtm); lvi.cchTextMax = strlen(textbuffer); } ListView_SetItem(handle, &lvi); } /* * Changes an existing item in specified row and column to the given data. * Parameters: * handle: Handle to the container window (widget). * column: Zero based column of data being set. * row: Zero based row of data being set. * data: Pointer to the data to be added. */ void API dw_container_change_item(HWND handle, int column, int row, void *data) { dw_container_set_item(handle, NULL, column, row, data); } /* * Changes an existing item in specified row and column to the given data. * Parameters: * handle: Handle to the container window (widget). * column: Zero based column of data being set. * row: Zero based row of data being set. * data: Pointer to the data to be added. */ void API dw_filesystem_change_item(HWND handle, int column, int row, void *data) { dw_filesystem_set_item(handle, NULL, column, row, data); } /* * Changes an item in specified row and column to the given data. * Parameters: * handle: Handle to the container window (widget). * pointer: Pointer to the allocated memory in dw_container_alloc(). * column: Zero based column of data being set. * row: Zero based row of data being set. * data: Pointer to the data to be added. */ void API dw_filesystem_change_file(HWND handle, int row, char *filename, HICN icon) { dw_filesystem_set_file(handle, NULL, row, filename, icon); } /* * Gets column type for a container column * Parameters: * handle: Handle to the container window (widget). * column: Zero based column. */ int API dw_container_get_column_type(HWND handle, int column) { ContainerInfo *cinfo = (ContainerInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); ULONG *flags; int rc; if(!cinfo || !cinfo->flags) return 0; flags = cinfo->flags; if(flags[column] & DW_CFA_BITMAPORICON) rc = DW_CFA_BITMAPORICON; else if(flags[column] & DW_CFA_STRING) rc = DW_CFA_STRING; else if(flags[column] & DW_CFA_ULONG) rc = DW_CFA_ULONG; else if(flags[column] & DW_CFA_DATE) rc = DW_CFA_DATE; else if(flags[column] & DW_CFA_TIME) rc = DW_CFA_TIME; else rc = 0; return rc; } /* * Gets column type for a filesystem container column * Parameters: * handle: Handle to the container window (widget). * column: Zero based column. */ int API dw_filesystem_get_column_type(HWND handle, int column) { return dw_container_get_column_type( handle, column + 1 ); } /* * Sets the alternating row colors for container window (widget) handle. * Parameters: * handle: The window (widget) handle. * oddcolor: Odd row background color in DW_RGB format or a default color index. * evencolor: Even row background color in DW_RGB format or a default color index. * DW_RGB_TRANSPARENT will disable coloring rows. * DW_CLR_DEFAULT will use the system default alternating row colors. */ void API dw_container_set_stripe(HWND handle, unsigned long oddcolor, unsigned long evencolor) { ContainerInfo *cinfo = (ContainerInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); unsigned long temp = _internal_color(oddcolor); COLORREF even, odd = RGB(DW_RED_VALUE(temp), DW_GREEN_VALUE(temp), DW_BLUE_VALUE(temp)); temp = _internal_color(evencolor); even = RGB(DW_RED_VALUE(temp), DW_GREEN_VALUE(temp), DW_BLUE_VALUE(temp)); /* Drop out on error */ if(!cinfo) return; /* Create new brushes or remove if transparent */ if(oddcolor != DW_RGB_TRANSPARENT) cinfo->odd = (oddcolor == DW_CLR_DEFAULT ? RGB(230, 230, 230) : odd); else cinfo->odd = oddcolor; if(evencolor != DW_RGB_TRANSPARENT) cinfo->even = (evencolor == DW_CLR_DEFAULT ? DW_RGB_TRANSPARENT : even); else cinfo->even = evencolor; } /* * Sets the width of a column in the container. * Parameters: * handle: Handle to window (widget) of container. * column: Zero based column of width being set. * width: Width of column in pixels. */ void API dw_container_set_column_width(HWND handle, int column, int width) { ListView_SetColumnWidth(handle, column, width); } /* Internal version that handles both types */ void _dw_container_set_row_title(HWND handle, void *pointer, int row, char *title) { LV_ITEM lvi; int item = 0; if(pointer) { item = (int)dw_window_get_data(handle, "_dw_insertitem"); } lvi.iItem = row + item; lvi.iSubItem = 0; lvi.mask = LVIF_PARAM; lvi.lParam = (LPARAM)title; if(!ListView_SetItem(handle, &lvi) && lvi.lParam) lvi.lParam = 0; } /* * Sets the title of a row in the container. * Parameters: * pointer: Pointer to the allocated memory in dw_container_alloc(). * row: Zero based row of data being set. * title: String title of the item. */ void API dw_container_set_row_title(void *pointer, int row, char *title) { _dw_container_set_row_title(pointer, pointer, row, title); } /* * Changes the title of a row already inserted in the container. * Parameters: * handle: Handle to the container window (widget). * row: Zero based row of data being set. * title: String title of the item. */ void API dw_container_change_row_title(HWND handle, int row, char *title) { _dw_container_set_row_title(handle, NULL, row, title); } /* * Sets the title of a row in the container. * Parameters: * handle: Handle to the container window (widget). * pointer: Pointer to the allocated memory in dw_container_alloc(). * rowcount: The number of rows to be inserted. */ void API dw_container_insert(HWND handle, void *pointer, int rowcount) { ShowWindow(handle, SW_SHOW); } /* * Removes all rows from a container. * Parameters: * handle: Handle to the window (widget) to be cleared. * redraw: TRUE to cause the container to redraw immediately. */ void API dw_container_clear(HWND handle, int redraw) { ListView_DeleteAllItems(handle); } /* * Removes the first x rows from a container. * Parameters: * handle: Handle to the window (widget) to be deleted from. * rowcount: The number of rows to be deleted. */ void API dw_container_delete(HWND handle, int rowcount) { int z, _index = (int)dw_window_get_data(handle, "_dw_index"); for(z=0;z<rowcount;z++) { ListView_DeleteItem(handle, 0); } if(rowcount > _index) dw_window_set_data(handle, "_dw_index", 0); else dw_window_set_data(handle, "_dw_index", (void *)(_index - rowcount)); } /* * Scrolls container up or down. * Parameters: * handle: Handle to the window (widget) to be scrolled. * direction: DW_SCROLL_UP, DW_SCROLL_DOWN, DW_SCROLL_TOP or * DW_SCROLL_BOTTOM. (rows is ignored for last two) * rows: The number of rows to be scrolled. */ void API dw_container_scroll(HWND handle, int direction, long rows) { switch(direction) { case DW_SCROLL_TOP: ListView_Scroll(handle, 0, -10000000); break; case DW_SCROLL_BOTTOM: ListView_Scroll(handle, 0, 10000000); break; } } /* * Starts a new query of a container. * Parameters: * handle: Handle to the window (widget) to be queried. * flags: If this parameter is DW_CRA_SELECTED it will only * return items that are currently selected. Otherwise * it will return all records in the container. */ char * API dw_container_query_start(HWND handle, unsigned long flags) { LV_ITEM lvi; int _index = ListView_GetNextItem(handle, -1, flags); if(_index == -1) return NULL; memset(&lvi, 0, sizeof(LV_ITEM)); lvi.iItem = _index; lvi.mask = LVIF_PARAM; ListView_GetItem(handle, &lvi); dw_window_set_data(handle, "_dw_index", (void *)_index); return (char *)lvi.lParam; } /* * Continues an existing query of a container. * Parameters: * handle: Handle to the window (widget) to be queried. * flags: If this parameter is DW_CRA_SELECTED it will only * return items that are currently selected. Otherwise * it will return all records in the container. */ char * API dw_container_query_next(HWND handle, unsigned long flags) { LV_ITEM lvi; int _index = (int)dw_window_get_data(handle, "_dw_index"); _index = ListView_GetNextItem(handle, _index, flags); if(_index == -1) return NULL; memset(&lvi, 0, sizeof(LV_ITEM)); lvi.iItem = _index; lvi.mask = LVIF_PARAM; ListView_GetItem(handle, &lvi); dw_window_set_data(handle, "_dw_index", (void *)_index); return (char *)lvi.lParam; } /* * Cursors the item with the text speficied, and scrolls to that item. * Parameters: * handle: Handle to the window (widget) to be queried. * text: Text usually returned by dw_container_query(). */ void API dw_container_cursor(HWND handle, char *text) { int index = ListView_GetNextItem(handle, -1, LVNI_ALL); int textcomp = DW_POINTER_TO_INT(dw_window_get_data(handle, "_dw_textcomp")); while ( index != -1 ) { LV_ITEM lvi; memset(&lvi, 0, sizeof(LV_ITEM)); lvi.iItem = index; lvi.mask = LVIF_PARAM; ListView_GetItem( handle, &lvi ); if ( (textcomp && lvi.lParam && strcmp( (char *)lvi.lParam, text ) == 0) || (!textcomp && (char *)lvi.lParam == text) ) { unsigned long width, height; ListView_SetItemState( handle, index, LVIS_FOCUSED | LVIS_SELECTED, LVIS_FOCUSED | LVIS_SELECTED ); dw_window_get_pos_size( handle, NULL, NULL, &width, &height); if(width < 10 || height < 10) dw_window_set_data( handle, "_dw_cursor", DW_INT_TO_POINTER(index) ); ListView_EnsureVisible( handle, index, TRUE ); return; } index = ListView_GetNextItem( handle, index, LVNI_ALL ); } } /* * Deletes the item with the text speficied. * Parameters: * handle: Handle to the window (widget). * text: Text usually returned by dw_container_query(). */ void API dw_container_delete_row(HWND handle, char *text) { int index = ListView_GetNextItem(handle, -1, LVNI_ALL); int textcomp = DW_POINTER_TO_INT(dw_window_get_data(handle, "_dw_textcomp")); while(index != -1) { LV_ITEM lvi; memset(&lvi, 0, sizeof(LV_ITEM)); lvi.iItem = index; lvi.mask = LVIF_PARAM; ListView_GetItem(handle, &lvi); if ( (textcomp && lvi.lParam && strcmp( (char *)lvi.lParam, text ) == 0) || (!textcomp && (char *)lvi.lParam == text) ) { int _index = (int)dw_window_get_data(handle, "_dw_index"); if(index < _index) dw_window_set_data(handle, "_dw_index", (void *)(_index - 1)); ListView_DeleteItem(handle, index); return; } index = ListView_GetNextItem(handle, index, LVNI_ALL); } } /* * Optimizes the column widths so that all data is visible. * Parameters: * handle: Handle to the window (widget) to be optimized. */ void API dw_container_optimize(HWND handle) { ContainerInfo *cinfo = (ContainerInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if(cinfo && cinfo->columns == 1) { ListView_SetColumnWidth(handle, 0, LVSCW_AUTOSIZE); } else if(cinfo && cinfo->columns > 1) { int z, index; ULONG *flags = cinfo->flags, *columns = calloc(sizeof(ULONG), cinfo->columns); char *text = malloc(1024); /* Initialize with sizes of column labels */ for(z=0;z<cinfo->columns;z++) { if(flags[z] & DW_CFA_BITMAPORICON) columns[z] = 5; else { LVCOLUMN lvc; lvc.mask = LVCF_TEXT; lvc.cchTextMax = 1023; lvc.pszText = text; if(ListView_GetColumn(handle, z, &lvc)) columns[z] = ListView_GetStringWidth(handle, lvc.pszText); if(flags[z] & DW_CFA_RESERVED) columns[z] += 20; } } index = ListView_GetNextItem(handle, -1, LVNI_ALL); /* Query all the item texts */ while(index != -1) { for(z=0;z<cinfo->columns;z++) { int width; ListView_GetItemText(handle, index, z, text, 1023); width = ListView_GetStringWidth(handle, text); /* Figure extra space for the icon for the first column */ if(z == 0) width += 20; if(width > columns[z]) columns[z] = width; } index = ListView_GetNextItem(handle, index, LVNI_ALL); } /* Set the new sizes... Microsoft says we need to add * padding to the calculated sized but does not give * a value. Trial and error shows that 16 works for us. */ for(z=0;z<cinfo->columns;z++) ListView_SetColumnWidth(handle, z, columns[z] + 16); free(columns); free(text); } } /* * Inserts an icon into the taskbar. * Parameters: * handle: Window handle that will handle taskbar icon messages. * icon: Icon handle to display in the taskbar. * bubbletext: Text to show when the mouse is above the icon. */ void API dw_taskbar_insert(HWND handle, HICN icon, char *bubbletext) { NOTIFYICONDATA tnid; tnid.cbSize = sizeof(NOTIFYICONDATA); tnid.hWnd = handle; tnid.uID = (UINT)icon; tnid.uFlags = NIF_MESSAGE | NIF_ICON | NIF_TIP; tnid.uCallbackMessage = WM_USER+2; tnid.hIcon = (HICON)icon; if(bubbletext) strncpy(tnid.szTip, bubbletext, sizeof(tnid.szTip)); else tnid.szTip[0] = 0; Shell_NotifyIcon(NIM_ADD, &tnid); } /* * Deletes an icon from the taskbar. * Parameters: * handle: Window handle that was used with dw_taskbar_insert(). * icon: Icon handle that was used with dw_taskbar_insert(). */ void API dw_taskbar_delete(HWND handle, HICN icon) { NOTIFYICONDATA tnid; tnid.cbSize = sizeof(NOTIFYICONDATA); tnid.hWnd = handle; tnid.uID = (UINT)icon; Shell_NotifyIcon(NIM_DELETE, &tnid); } /* * Creates a rendering context widget (window) to be packed. * Parameters: * id: An id to be used with dw_window_from_id. * Returns: * A handle to the widget or NULL on failure. */ HWND API dw_render_new(unsigned long id) { Box *newbox = calloc(sizeof(Box), 1); HWND tmp = CreateWindow(ObjectClassName, "", WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); newbox->pad = 0; newbox->type = 0; newbox->count = 0; newbox->grouphwnd = (HWND)NULL; newbox->cinfo.pOldProc = SubclassWindow(tmp, _rendwndproc); newbox->cinfo.fore = newbox->cinfo.back = -1; SetWindowLongPtr( tmp, GWLP_USERDATA, (LONG_PTR)newbox ); return tmp; } /* Sets the current foreground drawing color. * Parameters: * red: red value. * green: green value. * blue: blue value. */ void API dw_color_foreground_set(unsigned long value) { HPEN hPen = TlsGetValue(_hPen); HBRUSH hBrush = TlsGetValue(_hBrush); COLORREF foreground; value = _internal_color(value); foreground = RGB(DW_RED_VALUE(value), DW_GREEN_VALUE(value), DW_BLUE_VALUE(value)); DeleteObject(hPen); DeleteObject(hBrush); TlsSetValue(_foreground, (LPVOID)foreground); TlsSetValue(_hPen, CreatePen(PS_SOLID, 1, foreground)); TlsSetValue(_hBrush, CreateSolidBrush(foreground)); } /* Sets the current background drawing color. * Parameters: * red: red value. * green: green value. * blue: blue value. */ void API dw_color_background_set(unsigned long value) { COLORREF background; value = _internal_color(value); background = RGB(DW_RED_VALUE(value), DW_GREEN_VALUE(value), DW_BLUE_VALUE(value)); if(value == DW_RGB_TRANSPARENT) TlsSetValue(_background, (LPVOID)DW_RGB_TRANSPARENT); else TlsSetValue(_background, (LPVOID)background); } /* Allows the user to choose a color using the system's color chooser dialog. * Parameters: * value: current color * Returns: * The selected color or the current color if cancelled. */ unsigned long API dw_color_choose(unsigned long value) { CHOOSECOLOR cc; unsigned long newcolor; COLORREF acrCustClr[16] = {0}; value = _internal_color(value); if(value == DW_RGB_TRANSPARENT) newcolor = DW_RGB_TRANSPARENT; else newcolor = RGB(DW_RED_VALUE(value), DW_GREEN_VALUE(value), DW_BLUE_VALUE(value)); ZeroMemory(&cc, sizeof(CHOOSECOLOR)); cc.lStructSize = sizeof(CHOOSECOLOR); cc.rgbResult = newcolor; cc.hwndOwner = HWND_DESKTOP; cc.lpCustColors = (LPDWORD)acrCustClr; cc.Flags = CC_FULLOPEN | CC_RGBINIT; if (ChooseColor(&cc) == TRUE) newcolor = DW_RGB(DW_RED_VALUE(cc.rgbResult), DW_GREEN_VALUE(cc.rgbResult), DW_BLUE_VALUE(cc.rgbResult)); return newcolor; } /* Draw a point on a window (preferably a render window). * Parameters: * handle: Handle to the window. * pixmap: Handle to the pixmap. (choose only one of these) * x: X coordinate. * y: Y coordinate. */ void API dw_draw_point(HWND handle, HPIXMAP pixmap, int x, int y) { HDC hdcPaint; if(handle) hdcPaint = GetDC(handle); else if(pixmap) hdcPaint = pixmap->hdc; else return; SetPixel(hdcPaint, x, y, (COLORREF)TlsGetValue(_foreground)); if(!pixmap) ReleaseDC(handle, hdcPaint); } /* Draw a line on a window (preferably a render window). * Parameters: * handle: Handle to the window. * pixmap: Handle to the pixmap. (choose only one of these) * x1: First X coordinate. * y1: First Y coordinate. * x2: Second X coordinate. * y2: Second Y coordinate. */ void API dw_draw_line(HWND handle, HPIXMAP pixmap, int x1, int y1, int x2, int y2) { HDC hdcPaint; HPEN oldPen; if(handle) hdcPaint = GetDC(handle); else if(pixmap) hdcPaint = pixmap->hdc; else return; oldPen = SelectObject(hdcPaint, TlsGetValue(_hPen)); MoveToEx(hdcPaint, x1, y1, NULL); LineTo(hdcPaint, x2, y2); SelectObject(hdcPaint, oldPen); /* For some reason Win98 (at least) fails * to draw the last pixel. So I do it myself. */ SetPixel(hdcPaint, x2, y2, (COLORREF)TlsGetValue(_foreground)); if(!pixmap) ReleaseDC(handle, hdcPaint); } /* Draw a closed polygon on a window (preferably a render window). * Parameters: * handle: Handle to the window. * pixmap: Handle to the pixmap. (choose only one of these) * flags: DW_DRAW_FILL (1) to fill the polygon or DW_DRAW_DEFAULT (0). * number of points * x[]: X coordinates. * y[]: Y coordinates. */ void API dw_draw_polygon(HWND handle, HPIXMAP pixmap, int flags, int npoints, int *x, int *y) { HDC hdcPaint; HBRUSH oldBrush; HPEN oldPen; POINT *points = NULL; int i; if ( handle ) hdcPaint = GetDC( handle ); else if ( pixmap ) hdcPaint = pixmap->hdc; else return; if ( npoints ) { /* * Allocate enough space for the number of points supplied plus 1. * Under windows, unless the first and last points are the same * the polygon won't be closed */ points = (POINT *)malloc( (npoints+1) * sizeof(POINT) ); /* * should check for NULL pointer return! */ for ( i = 0 ; i < npoints ; i++ ) { points[i].x = x[i]; points[i].y = y[i]; } if ( !( points[0].x == points[npoints-1].x && points[0].y == points[npoints-1].y ) ) { /* set the last point to be the same as the first point... */ points[npoints].x = points[0].x; points[npoints].y = points[0].y; /* ... and increment the number of points */ npoints++; } } else return; oldBrush = SelectObject( hdcPaint, TlsGetValue(_hBrush) ); oldPen = SelectObject( hdcPaint, TlsGetValue(_hPen) ); if ( flags & DW_DRAW_FILL ) Polygon( hdcPaint, points, npoints ); else Polyline( hdcPaint, points, npoints ); SelectObject( hdcPaint, oldBrush ); SelectObject( hdcPaint, oldPen ); if ( !pixmap ) ReleaseDC( handle, hdcPaint ); free(points); } /* Draw a rectangle on a window (preferably a render window). * Parameters: * handle: Handle to the window. * pixmap: Handle to the pixmap. (choose only one of these) * flags: DW_DRAW_FILL (1) to fill the box or DW_DRAW_DEFAULT (0). * x: X coordinate. * y: Y coordinate. * width: Width of rectangle. * height: Height of rectangle. */ void API dw_draw_rect(HWND handle, HPIXMAP pixmap, int flags, int x, int y, int width, int height) { HDC hdcPaint; RECT Rect; if(handle) hdcPaint = GetDC(handle); else if(pixmap) hdcPaint = pixmap->hdc; else return; SetRect(&Rect, x, y, x + width , y + height ); if(flags & DW_DRAW_FILL) FillRect(hdcPaint, &Rect, TlsGetValue(_hBrush)); else FrameRect(hdcPaint, &Rect, TlsGetValue(_hBrush)); if(!pixmap) ReleaseDC(handle, hdcPaint); } /* Draw an arc on a window (preferably a render window). * Parameters: * handle: Handle to the window. * pixmap: Handle to the pixmap. (choose only one of these) * flags: DW_DRAW_FILL (1) to fill the arc or DW_DRAW_DEFAULT (0). * DW_DRAW_FULL will draw a complete circle/elipse. * xorigin: X coordinate of center of arc. * yorigin: Y coordinate of center of arc. * x1: X coordinate of first segment of arc. * y1: Y coordinate of first segment of arc. * x2: X coordinate of second segment of arc. * y2: Y coordinate of second segment of arc. */ void API dw_draw_arc(HWND handle, HPIXMAP pixmap, int flags, int xorigin, int yorigin, int x1, int y1, int x2, int y2) { HDC hdcPaint; HBRUSH oldBrush; HPEN oldPen; double dx = xorigin - x1; double dy = yorigin - y1; double r = sqrt(dx*dx + dy*dy); if(handle) hdcPaint = GetDC(handle); else if(pixmap) hdcPaint = pixmap->hdc; else return; if(flags & DW_DRAW_FILL) oldBrush = SelectObject( hdcPaint, TlsGetValue(_hBrush) ); else oldBrush = SelectObject( hdcPaint, GetStockObject(HOLLOW_BRUSH) ); oldPen = SelectObject( hdcPaint, TlsGetValue(_hPen) ); if(flags & DW_DRAW_FULL) Ellipse(hdcPaint, x1, y1, x2, y2); else Arc(hdcPaint, xorigin-r, yorigin-r, xorigin+r, yorigin+r, x2, y2, x1, y1); SelectObject( hdcPaint, oldBrush ); SelectObject( hdcPaint, oldPen ); if(!pixmap) ReleaseDC(handle, hdcPaint); } /* Draw text on a window (preferably a render window). * Parameters: * handle: Handle to the window. * pixmap: Handle to the pixmap. (choose only one of these) * x: X coordinate. * y: Y coordinate. * text: Text to be displayed. */ void API dw_draw_text(HWND handle, HPIXMAP pixmap, int x, int y, char *text) { HDC hdc; int mustdelete = 0; HFONT hFont = 0, oldFont = 0; ColorInfo *cinfo = NULL; COLORREF background; if(handle) hdc = GetDC(handle); else if(pixmap) hdc = pixmap->hdc; else return; if(handle) cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); else if(pixmap->font) hFont = pixmap->font; else if(pixmap->handle) cinfo = (ColorInfo *)GetWindowLongPtr(pixmap->handle, GWLP_USERDATA); if(cinfo) { hFont = _acquire_font(handle, cinfo->fontname); mustdelete = 1; } background = (COLORREF)TlsGetValue(_background); if(hFont) oldFont = SelectObject(hdc, hFont); SetTextColor(hdc, (COLORREF)TlsGetValue(_foreground)); if(background == DW_RGB_TRANSPARENT) SetBkMode(hdc, TRANSPARENT); else { SetBkMode(hdc, OPAQUE); SetBkColor(hdc, background); } TextOut(hdc, x, y, text, strlen(text)); if(oldFont) SelectObject(hdc, oldFont); if(mustdelete) DeleteObject(hFont); if(!pixmap) ReleaseDC(handle, hdc); } /* Query the width and height of a text string. * Parameters: * handle: Handle to the window. * pixmap: Handle to the pixmap. (choose only one of these) * text: Text to be queried. * width: Pointer to a variable to be filled in with the width. * height Pointer to a variable to be filled in with the height. */ void API dw_font_text_extents_get(HWND handle, HPIXMAP pixmap, char *text, int *width, int *height) { HDC hdc; int mustdelete = 0; HFONT hFont = NULL, oldFont; SIZE sz; if(handle) hdc = GetDC(handle); else if(pixmap) hdc = pixmap->hdc; else return; if(pixmap && pixmap->font) { hFont = pixmap->font; } else { ColorInfo *cinfo; if(handle) cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); else cinfo = (ColorInfo *)GetWindowLongPtr(pixmap->handle, GWLP_USERDATA); if(cinfo) { hFont = _acquire_font(handle, cinfo->fontname); mustdelete = 1; } } oldFont = SelectObject(hdc, hFont); GetTextExtentPoint32(hdc, text, strlen(text), &sz); if(width) *width = sz.cx; if(height) *height = sz.cy; SelectObject(hdc, oldFont); if(mustdelete) DeleteObject(hFont); if(!pixmap) ReleaseDC(handle, hdc); } /* Call this after drawing to the screen to make sure * anything you have drawn is visible. */ void API dw_flush(void) { } /* * Creates a pixmap with given parameters. * Parameters: * handle: Window handle the pixmap is associated with. * width: Width of the pixmap in pixels. * height: Height of the pixmap in pixels. * depth: Color depth of the pixmap. * Returns: * A handle to a pixmap or NULL on failure. */ HPIXMAP API dw_pixmap_new(HWND handle, unsigned long width, unsigned long height, int depth) { HPIXMAP pixmap; HDC hdc; if (!(pixmap = calloc(1,sizeof(struct _hpixmap)))) return NULL; hdc = GetDC(handle); pixmap->width = width; pixmap->height = height; pixmap->handle = handle; pixmap->hbm = CreateCompatibleBitmap(hdc, width, height); pixmap->hdc = CreateCompatibleDC(hdc); pixmap->transcolor = DW_RGB_TRANSPARENT; SelectObject(pixmap->hdc, pixmap->hbm); ReleaseDC(handle, hdc); return pixmap; } #ifndef GDIPLUS /* Read the file bitmap header ourselves... * apparently we can't check the depth once loaded... * since it seems to normalize it to our screen depth. */ unsigned long _read_bitmap_header(char *file) { BITMAPFILEHEADER header; BITMAPINFO *info; FILE *fp; int infosize; int depth = 0; /* Try opening the file; use "rb" mode to read this *binary* file. */ if((fp = fopen(file, "rb")) == NULL) return 0; /* Read the file header and any following bitmap information... */ if(fread(&header, sizeof(BITMAPFILEHEADER), 1, fp) < 1) { /* Couldn't read the file header */ fclose(fp); return 0; } if(header.bfType != 'MB') /* Check for BM reversed... */ { /* Not a bitmap file */ fclose(fp); return 0; } infosize = header.bfOffBits - sizeof(BITMAPFILEHEADER); if((info = (BITMAPINFO *)calloc(infosize, 1)) == NULL) { /* Couldn't allocate memory for bitmap info */ fclose(fp); return 0; } if(fread(info, 1, infosize, fp) == infosize) { /* Read the bitmap header */ depth = info->bmiHeader.biBitCount; } free(info); fclose(fp); return depth; } #endif /* * Creates a pixmap from a file. * Parameters: * handle: Window handle the pixmap is associated with. * filename: Name of the file, omit extention to have * DW pick the appropriate file extension. * (BMP on OS/2 or Windows, XPM on Unix) * Returns: * A handle to a pixmap or NULL on failure. */ HPIXMAP API dw_pixmap_new_from_file(HWND handle, char *filename) { HPIXMAP pixmap; BITMAP bm; HDC hdc; #ifndef GDIPLUS char *file; #endif if (!filename || !(pixmap = calloc(1,sizeof(struct _hpixmap)))) return NULL; #ifdef GDIPLUS pixmap->hbm = _dw_load_bitmap(filename, &pixmap->depth); #else file = _alloca(strlen(filename) + 5); strcpy(file, filename); /* check if we can read from this file (it exists and read permission) */ if(access(file, 04) != 0) { /* Try with .bmp extention */ strcat(file, ".bmp"); if(access(file, 04) != 0) { free(pixmap); free(file); return NULL; } } pixmap->hbm = (HBITMAP)LoadImage(NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE); pixmap->depth = _read_bitmap_header(file); #endif pixmap->handle = handle; if ( !pixmap->hbm ) { free(pixmap); return NULL; } hdc = GetDC(handle); pixmap->hdc = CreateCompatibleDC( hdc ); GetObject( pixmap->hbm, sizeof(bm), &bm ); pixmap->width = bm.bmWidth; pixmap->height = bm.bmHeight; SelectObject( pixmap->hdc, pixmap->hbm ); ReleaseDC( handle, hdc ); pixmap->transcolor = DW_RGB_TRANSPARENT; return pixmap; } /* * Creates a pixmap from memory. * Parameters: * handle: Window handle the pixmap is associated with. * data: Source of the image data * (BMP on OS/2 or Windows, XPM on Unix) * le: length of data * Returns: * A handle to a pixmap or NULL on failure. */ HPIXMAP API dw_pixmap_new_from_data(HWND handle, char *data, int len) { HPIXMAP pixmap; BITMAP bm; HDC hdc; char *file; FILE *fp; if ( !(pixmap = calloc(1,sizeof(struct _hpixmap))) ) { return NULL; } hdc = GetDC(handle); pixmap->handle = handle; file = _tempnam( _dw_alternate_temp_dir, "dw" ); if ( file != NULL ) { fp = fopen( file, "wb" ); if ( fp != NULL ) { fwrite( data, 1, len, fp ); fclose( fp ); #ifdef GDIPLUS pixmap->hbm = _dw_load_bitmap(file, NULL); #else pixmap->hbm = (HBITMAP)LoadImage( NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE ); pixmap->depth = _read_bitmap_header(file); #endif } else { unlink( file ); free( file ); free( pixmap ); return NULL; } unlink( file ); free( file ); } if ( !pixmap->hbm ) { free( pixmap ); ReleaseDC( handle, hdc ); return NULL; } pixmap->hdc = CreateCompatibleDC( hdc ); GetObject( pixmap->hbm, sizeof(bm), &bm ); pixmap->width = bm.bmWidth; pixmap->height = bm.bmHeight; SelectObject( pixmap->hdc, pixmap->hbm ); ReleaseDC( handle, hdc ); pixmap->transcolor = DW_RGB_TRANSPARENT; return pixmap; } /* * Creates a bitmap mask for rendering bitmaps with transparent backgrounds */ void API dw_pixmap_set_transparent_color( HPIXMAP pixmap, ULONG color ) { if ( pixmap && pixmap->depth < 32) { pixmap->transcolor = _internal_color(color); } } /* * Creates a pixmap from internal resource graphic specified by id. * Parameters: * handle: Window handle the pixmap is associated with. * id: Resource ID associated with requested pixmap. * Returns: * A handle to a pixmap or NULL on failure. */ HPIXMAP API dw_pixmap_grab(HWND handle, ULONG id) { HPIXMAP pixmap; BITMAP bm; HDC hdc; if (!(pixmap = calloc(1,sizeof(struct _hpixmap)))) return NULL; hdc = GetDC(handle); pixmap->hbm = LoadBitmap(DWInstance, MAKEINTRESOURCE(id)); pixmap->hdc = CreateCompatibleDC(hdc); GetObject(pixmap->hbm, sizeof(BITMAP), (void *)&bm); pixmap->width = bm.bmWidth; pixmap->height = bm.bmHeight; pixmap->depth = bm.bmBitsPixel; SelectObject(pixmap->hdc, pixmap->hbm); ReleaseDC(handle, hdc); pixmap->transcolor = DW_RGB_TRANSPARENT; return pixmap; } /* * Sets the font used by a specified pixmap. * Normally the pixmap font is obtained from the associated window handle. * However this can be used to override that, or for pixmaps with no window. * Parameters: * pixmap: Handle to a pixmap returned by dw_pixmap_new() or * passed to the application via a callback. * fontname: Name and size of the font in the form "size.fontname" * Returns: * DW_ERROR_NONE on success and DW_ERROR_GENERAL on failure. */ int API dw_pixmap_set_font(HPIXMAP pixmap, char *fontname) { if(pixmap) { HFONT hfont = _acquire_font2(pixmap->hdc, fontname); if(hfont) { HFONT oldfont = pixmap->font; pixmap->font = hfont; if(oldfont) DeleteObject(oldfont); return DW_ERROR_NONE; } } return DW_ERROR_GENERAL; } /* * Destroys an allocated pixmap. * Parameters: * pixmap: Handle to a pixmap returned by * dw_pixmap_new.. */ void API dw_pixmap_destroy(HPIXMAP pixmap) { if(pixmap) { DeleteDC(pixmap->hdc); DeleteObject(pixmap->hbm); if(pixmap->font) DeleteObject(pixmap->font); free(pixmap); } } /* * Copies from one item to another. * Parameters: * dest: Destination window handle. * destp: Destination pixmap. (choose only one). * xdest: X coordinate of destination. * ydest: Y coordinate of destination. * width: Width of area to copy. * height: Height of area to copy. * src: Source window handle. * srcp: Source pixmap. (choose only one). * xsrc: X coordinate of source. * ysrc: Y coordinate of source. */ void API dw_pixmap_bitblt(HWND dest, HPIXMAP destp, int xdest, int ydest, int width, int height, HWND src, HPIXMAP srcp, int xsrc, int ysrc) { dw_pixmap_stretch_bitblt(dest, destp, xdest, ydest, width, height, src, srcp, xsrc, ysrc, -1, -1); } /* * Copies from one surface to another allowing for stretching. * Parameters: * dest: Destination window handle. * destp: Destination pixmap. (choose only one). * xdest: X coordinate of destination. * ydest: Y coordinate of destination. * width: Width of the target area. * height: Height of the target area. * src: Source window handle. * srcp: Source pixmap. (choose only one). * xsrc: X coordinate of source. * ysrc: Y coordinate of source. * srcwidth: Width of area to copy. * srcheight: Height of area to copy. * Returns: * DW_ERROR_NONE on success and DW_ERROR_GENERAL on failure. */ int API dw_pixmap_stretch_bitblt(HWND dest, HPIXMAP destp, int xdest, int ydest, int width, int height, HWND src, HPIXMAP srcp, int xsrc, int ysrc, int srcwidth, int srcheight) { HDC hdcdest; HDC hdcsrc; static BLENDFUNCTION bf = { AC_SRC_OVER, 0, 0xFF, AC_SRC_ALPHA }; int swidth = srcwidth, sheight = srcheight; /* Do some sanity checks */ if ( dest ) hdcdest = GetDC( dest ); else if ( destp ) hdcdest = destp->hdc; else return DW_ERROR_GENERAL; if ( src ) hdcsrc = GetDC( src ); else if ( srcp ) hdcsrc = srcp->hdc; else return DW_ERROR_GENERAL; if((srcheight == -1 || srcwidth == -1) && srcheight != srcwidth) return DW_ERROR_GENERAL; if(srcheight == -1 && srcwidth == -1) { swidth = width; sheight = height; } /* If it is a 32bpp bitmap (with alpha) use AlphaBlend unless it fails */ if ( srcp && srcp->depth == 32 && AlphaBlend( hdcdest, xdest, ydest, width, height, hdcsrc, xsrc, ysrc, swidth, sheight, bf ) ) { /* Don't do anything */ } /* Otherwise perform special bitblt with manual transparency */ else if ( srcp && srcp->transcolor != DW_RGB_TRANSPARENT ) { TransparentBlt( hdcdest, xdest, ydest, width, height, hdcsrc, xsrc, ysrc, swidth, sheight, RGB( DW_RED_VALUE(srcp->transcolor), DW_GREEN_VALUE(srcp->transcolor), DW_BLUE_VALUE(srcp->transcolor)) ); } else { /* Finally fall back to the classic BitBlt */ if( srcwidth == -1 && srcheight == -1) BitBlt( hdcdest, xdest, ydest, width, height, hdcsrc, xsrc, ysrc, SRCCOPY ); else StretchBlt( hdcdest, xdest, ydest, width, height, hdcsrc, xsrc, ysrc, swidth, sheight, SRCCOPY ); } if ( !destp ) ReleaseDC( dest, hdcdest ); if ( !srcp ) ReleaseDC( src, hdcsrc ); return DW_ERROR_NONE; } /* Run Beep() in a separate thread so it doesn't block */ void _beepthread(void *data) { int *info = (int *)data; if(data) { Beep(info[0], info[1]); free(data); } } /* * Emits a beep. * Parameters: * freq: Frequency. * dur: Duration. */ void API dw_beep(int freq, int dur) { int *info = malloc(sizeof(int) * 2); if(info) { info[0] = freq; info[1] = dur; _beginthread(_beepthread, 100, (void *)info); } } /* Open a shared library and return a handle. * Parameters: * name: Base name of the shared library. * handle: Pointer to a module handle, * will be filled in with the handle. */ int API dw_module_load(char *name, HMOD *handle) { if(!handle) return DW_ERROR_UNKNOWN; *handle = LoadLibrary(name); return (NULL == *handle); } /* Queries the address of a symbol within open handle. * Parameters: * handle: Module handle returned by dw_module_load() * name: Name of the symbol you want the address of. * func: A pointer to a function pointer, to obtain * the address. */ int API dw_module_symbol(HMOD handle, char *name, void**func) { if(!func || !name) return DW_ERROR_UNKNOWN; if(0 == strlen(name)) return DW_ERROR_UNKNOWN; *func = (void*)GetProcAddress(handle, name); return (NULL == *func); } /* Frees the shared library previously opened. * Parameters: * handle: Module handle returned by dw_module_load() */ int API dw_module_close(HMOD handle) { return FreeLibrary(handle); } /* * Returns the handle to an unnamed mutex semaphore. */ HMTX API dw_mutex_new(void) { return (HMTX)CreateMutex(NULL, FALSE, NULL); } /* * Closes a semaphore created by dw_mutex_new(). * Parameters: * mutex: The handle to the mutex returned by dw_mutex_new(). */ void API dw_mutex_close(HMTX mutex) { CloseHandle((HANDLE)mutex); } /* * Tries to gain access to the semaphore, if it can't it blocks. * Parameters: * mutex: The handle to the mutex returned by dw_mutex_new(). */ void API dw_mutex_lock(HMTX mutex) { if(_dwtid == dw_thread_id()) { int rc = WaitForSingleObject((HANDLE)mutex, 0); while(rc == WAIT_TIMEOUT) { dw_main_sleep(1); rc = WaitForSingleObject((HANDLE)mutex, 0); } } else WaitForSingleObject((HANDLE)mutex, INFINITE); } /* * Tries to gain access to the semaphore. * Parameters: * mutex: The handle to the mutex returned by dw_mutex_new(). * Returns: * DW_ERROR_NONE on success, DW_ERROR_TIMEOUT if it is already locked. */ int API dw_mutex_trylock(HMTX mutex) { if(WaitForSingleObject((HANDLE)mutex, 0) == WAIT_OBJECT_0) return DW_ERROR_NONE; return DW_ERROR_TIMEOUT; } /* * Reliquishes the access to the semaphore. * Parameters: * mutex: The handle to the mutex returned by dw_mutex_new(). */ void API dw_mutex_unlock(HMTX mutex) { ReleaseMutex((HANDLE)mutex); } /* * Returns the handle to an unnamed event semaphore. */ HEV API dw_event_new(void) { return CreateEvent(NULL, TRUE, FALSE, NULL); } /* * Resets a semaphore created by dw_event_new(). * Parameters: * eve: The handle to the event returned by dw_event_new(). */ int API dw_event_reset(HEV eve) { if(ResetEvent(eve)) return DW_ERROR_NONE; return DW_ERROR_GENERAL; } /* * Posts a semaphore created by dw_event_new(). Causing all threads * waiting on this event in dw_event_wait to continue. * Parameters: * eve: The handle to the event returned by dw_event_new(). */ int API dw_event_post(HEV eve) { if(SetEvent(eve)) return DW_ERROR_NONE; return DW_ERROR_GENERAL; } /* * Waits on a semaphore created by dw_event_new(), until the * event gets posted or until the timeout expires. * Parameters: * eve: The handle to the event returned by dw_event_new(). */ int API dw_event_wait(HEV eve, unsigned long timeout) { int rc; rc = WaitForSingleObject(eve, timeout != -1 ? timeout : INFINITE); if(rc == WAIT_OBJECT_0) return DW_ERROR_NONE; if(rc == WAIT_TIMEOUT) return DW_ERROR_TIMEOUT; if(rc == WAIT_ABANDONED) return DW_ERROR_INTERRUPT; return DW_ERROR_GENERAL; } /* * Closes a semaphore created by dw_event_new(). * Parameters: * eve: The handle to the event returned by dw_event_new(). */ int API dw_event_close(HEV *eve) { if(eve && CloseHandle(*eve)) return DW_ERROR_NONE; return DW_ERROR_GENERAL; } /* Create a named event semaphore which can be * opened from other processes. * Parameters: * eve: Pointer to an event handle to receive handle. * name: Name given to semaphore which can be opened * by other processes. */ HEV API dw_named_event_new(char *name) { SECURITY_ATTRIBUTES sa; sa.nLength = sizeof( SECURITY_ATTRIBUTES); sa.lpSecurityDescriptor = &_dwsd; sa.bInheritHandle = FALSE; return CreateEvent(&sa, TRUE, FALSE, name); } /* Destroy this semaphore. * Parameters: * eve: Handle to the semaphore obtained by * a create call. */ HEV API dw_named_event_get(char *name) { return OpenEvent(EVENT_ALL_ACCESS, FALSE, name); } /* Resets the event semaphore so threads who call wait * on this semaphore will block. * Parameters: * eve: Handle to the semaphore obtained by * an open or create call. */ int API dw_named_event_reset(HEV eve) { if(ResetEvent(eve)) return DW_ERROR_NONE; return DW_ERROR_GENERAL; } /* Sets the posted state of an event semaphore, any threads * waiting on the semaphore will no longer block. * Parameters: * eve: Handle to the semaphore obtained by * an open or create call. */ int API dw_named_event_post(HEV eve) { if(SetEvent(eve)) return DW_ERROR_NONE; return DW_ERROR_GENERAL; } /* Waits on the specified semaphore until it becomes * posted, or returns immediately if it already is posted. * Parameters: * eve: Handle to the semaphore obtained by * an open or create call. * timeout: Number of milliseconds before timing out * or -1 if indefinite. */ int API dw_named_event_wait(HEV eve, unsigned long timeout) { int rc; rc = WaitForSingleObject(eve, timeout != -1 ? timeout : INFINITE); if(rc == WAIT_OBJECT_0) return DW_ERROR_NONE; if(rc == WAIT_TIMEOUT) return DW_ERROR_TIMEOUT; if(rc == WAIT_ABANDONED) return DW_ERROR_INTERRUPT; return DW_ERROR_GENERAL; } /* Release this semaphore, if there are no more open * handles on this semaphore the semaphore will be destroyed. * Parameters: * eve: Handle to the semaphore obtained by * an open or create call. */ int API dw_named_event_close(HEV eve) { if(CloseHandle(eve)) return DW_ERROR_NONE; return DW_ERROR_GENERAL; } /* * Allocates a shared memory region with a name. * Parameters: * handle: A pointer to receive a SHM identifier. * dest: A pointer to a pointer to receive the memory address. * size: Size in bytes of the shared memory region to allocate. * name: A string pointer to a unique memory name. */ HSHM API dw_named_memory_new(void **dest, int size, char *name) { SECURITY_ATTRIBUTES sa; HSHM handle; sa.nLength = sizeof(SECURITY_ATTRIBUTES); sa.lpSecurityDescriptor = &_dwsd; sa.bInheritHandle = FALSE; handle = CreateFileMapping((HANDLE)0xFFFFFFFF, &sa, PAGE_READWRITE, 0, size, name); if(!handle) return 0; *dest = MapViewOfFile(handle, FILE_MAP_ALL_ACCESS, 0, 0, 0); if(!*dest) { CloseHandle(handle); return 0; } return handle; } /* * Aquires shared memory region with a name. * Parameters: * dest: A pointer to a pointer to receive the memory address. * size: Size in bytes of the shared memory region to requested. * name: A string pointer to a unique memory name. */ HSHM API dw_named_memory_get(void **dest, int size, char *name) { HSHM handle = OpenFileMapping(FILE_MAP_ALL_ACCESS, FALSE, name); if(!handle) return 0; *dest = MapViewOfFile(handle, FILE_MAP_ALL_ACCESS, 0, 0, 0); if(!*dest) { CloseHandle(handle); return 0; } return handle; } /* * Frees a shared memory region previously allocated. * Parameters: * handle: Handle obtained from DB_named_memory_allocate. * ptr: The memory address aquired with DB_named_memory_allocate. */ int API dw_named_memory_free(HSHM handle, void *ptr) { UnmapViewOfFile(ptr); CloseHandle(handle); return 0; } /* * Encapsulate thread creation on Win32. */ void _dwthreadstart(void *data) { void (* threadfunc)(void *) = NULL; void **tmp = (void **)data; HPEN hPen; HBRUSH hBrush; _init_thread(); threadfunc = (void (*)(void *))tmp[0]; threadfunc(tmp[1]); free(tmp); if((hPen = TlsGetValue(_hPen))) DeleteObject(hPen); if((hBrush = TlsGetValue(_hBrush))) DeleteObject(hBrush); } /* * Creates a new thread with a starting point of func. * Parameters: * func: Function which will be run in the new thread. * data: Parameter(s) passed to the function. * stack: Stack size of new thread (OS/2 and Windows only). */ DWTID API dw_thread_new(void *func, void *data, int stack) { #if defined(__CYGWIN__) return 0; #else void **tmp = malloc(sizeof(void *) * 2); tmp[0] = func; tmp[1] = data; return (DWTID)_beginthread((void(*)(void *))_dwthreadstart, stack, tmp); #endif } /* * Ends execution of current thread immediately. */ void API dw_thread_end(void) { #if !defined(__CYGWIN__) _endthread(); #endif } /* * Returns the current thread's ID. */ DWTID API dw_thread_id(void) { #if defined(__CYGWIN__) return 0; #else return (DWTID)GetCurrentThreadId(); #endif } /* * Cleanly terminates a DW session, should be signal handler safe. * Parameters: * exitcode: Exit code reported to the operating system. */ void API dw_exit(int exitcode) { OleUninitialize(); #ifdef AEROGLASS /* Free any in use libraries */ FreeLibrary(hdwm); FreeLibrary(huxtheme); #endif exit(exitcode); } /* * Creates a splitbar window (widget) with given parameters. * Parameters: * type: Value can be DW_VERT or DW_HORZ. * topleft: Handle to the window to be top or left. * bottomright: Handle to the window to be bottom or right. * Returns: * A handle to a splitbar window or NULL on failure. */ HWND API dw_splitbar_new(int type, HWND topleft, HWND bottomright, unsigned long id) { HWND tmp = CreateWindow(SplitbarClassName, "", WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); if(tmp) { HWND tmpbox = dw_box_new(DW_VERT, 0); float *percent = (float *)malloc(sizeof(float)); dw_box_pack_start(tmpbox, topleft, 1, 1, TRUE, TRUE, 0); SetParent(tmpbox, tmp); dw_window_set_data(tmp, "_dw_topleft", (void *)tmpbox); tmpbox = dw_box_new(DW_VERT, 0); dw_box_pack_start(tmpbox, bottomright, 1, 1, TRUE, TRUE, 0); SetParent(tmpbox, tmp); dw_window_set_data(tmp, "_dw_bottomright", (void *)tmpbox); *percent = 50.0; dw_window_set_data(tmp, "_dw_percent", (void *)percent); dw_window_set_data(tmp, "_dw_type", (void *)type); } return tmp; } /* * Sets the position of a splitbar (pecentage). * Parameters: * handle: The handle to the splitbar returned by dw_splitbar_new(). */ void API dw_splitbar_set(HWND handle, float percent) { float *mypercent = (float *)dw_window_get_data(handle, "_dw_percent"); int type = (int)dw_window_get_data(handle, "_dw_type"); unsigned long width, height; if(mypercent) *mypercent = percent; dw_window_get_pos_size(handle, NULL, NULL, &width, &height); if(width > 0 && height > 0) _handle_splitbar_resize(handle, percent, type, width, height); } /* * Gets the position of a splitbar (pecentage). * Parameters: * handle: The handle to the splitbar returned by dw_splitbar_new(). */ float API dw_splitbar_get(HWND handle) { float *percent = (float *)dw_window_get_data(handle, "_dw_percent"); if(percent) return *percent; return 0.0; } /* * Creates a calendar window (widget) with given parameters. * Parameters: * type: Value can be DW_VERT or DW_HORZ. * topleft: Handle to the window to be top or left. * bottomright: Handle to the window to be bottom or right. * Classname: SysMonthCal32 * Returns: * A handle to a calendar window or NULL on failure. */ HWND API dw_calendar_new(unsigned long id) { RECT rc; MONTHDAYSTATE mds[3]; HWND tmp = CreateWindowEx(WS_EX_CLIENTEDGE, MONTHCAL_CLASS, "", WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN | MCS_DAYSTATE, 0,0,0,0, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); if ( tmp ) { // Get the size required to show an entire month. MonthCal_GetMinReqRect(tmp, &rc); // Resize the control now that the size values have been obtained. SetWindowPos(tmp, NULL, 0, 0, rc.right, rc.bottom, SWP_NOZORDER | SWP_NOMOVE); mds[0] = mds[1] = mds[2] = (MONTHDAYSTATE)0; MonthCal_SetDayState(tmp,3,mds); return tmp; } else return NULL; } /* * Sets the current date of a calendar * Parameters: * handle: The handle to the calendar returned by dw_calendar_new(). * year: The year to set the date to * month: The month to set the date to * day: The day to set the date to */ void API dw_calendar_set_date(HWND handle, unsigned int year, unsigned int month, unsigned int day) { MONTHDAYSTATE mds[3]; SYSTEMTIME date; date.wYear = year; date.wMonth = month; date.wDay = day; if ( MonthCal_SetCurSel( handle, &date ) ) { } else { } mds[0] = mds[1] = mds[2] = (MONTHDAYSTATE)0; MonthCal_SetDayState(handle,3,mds); } /* * Gets the date from the calendar * Parameters: * handle: The handle to the calendar returned by dw_calendar_new(). * year: Pointer to the year to get the date to * month: Pointer to the month to get the date to * day: Pointer to the day to get the date to */ void API dw_calendar_get_date(HWND handle, unsigned int *year, unsigned int *month, unsigned int *day) { SYSTEMTIME date; if ( MonthCal_GetCurSel( handle, &date ) ) { *year = date.wYear; *month = date.wMonth; *day = date.wDay; } else { *year = *month = *day = 0; } } /* * Sets the default focus item for a window/dialog. * Parameters: * window: Toplevel window or dialog. * defaultitem: Handle to the dialog item to be default. */ void API dw_window_default(HWND window, HWND defaultitem) { Box *thisbox = (Box *)GetWindowLongPtr(window, GWLP_USERDATA); if(thisbox) thisbox->defaultitem = defaultitem; } /* * Sets window to click the default dialog item when an ENTER is pressed. * Parameters: * window: Window (widget) to look for the ENTER press. * next: Window (widget) to move to next (or click) */ void API dw_window_click_default(HWND window, HWND next) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(window, GWLP_USERDATA); if (cinfo) { cinfo->clickdefault = next; } } /* * Gets the contents of the default clipboard as text. * Parameters: * None. * Returns: * Pointer to an allocated string of text or NULL if clipboard empty or contents could not * be converted to text. */ char * API dw_clipboard_get_text(void) { HANDLE handle; char *tmp, *ret = NULL; if ( !OpenClipboard( NULL ) ) return ret; if ( ( handle = GetClipboardData( CF_TEXT) ) == NULL ) { CloseClipboard(); return ret; } if ( (tmp = GlobalLock(handle)) && strlen(tmp) ) { ret = strdup(tmp); GlobalUnlock(handle); } CloseClipboard(); return ret; } /* * Sets the contents of the default clipboard to the supplied text. * Parameters: * Text. */ void API dw_clipboard_set_text( char *str, int len ) { HGLOBAL ptr1; LPTSTR ptr2; if ( !OpenClipboard( NULL ) ) return; ptr1 = GlobalAlloc( GMEM_MOVEABLE|GMEM_DDESHARE, (len + 1) * sizeof(TCHAR) ); if ( !ptr1 ) return; ptr2 = GlobalLock( ptr1 ); memcpy( (char *)ptr2, str, len + 1); GlobalUnlock( ptr1 ); EmptyClipboard(); SetClipboardData( CF_TEXT, ptr1 ); CloseClipboard(); GlobalFree( ptr1 ); return; } /* * Returns some information about the current operating environment. * Parameters: * env: Pointer to a DWEnv struct. */ void API dw_environment_query(DWEnv *env) { if(!env) return; /* Get the Windows version. */ env->MajorVersion = (DWORD)(LOBYTE(LOWORD(dwVersion))); env->MinorVersion = (DWORD)(HIBYTE(LOWORD(dwVersion))); /* Get the build number for Windows NT/Windows 2000. */ env->MinorBuild = 0; if (dwVersion < 0x80000000) { if(env->MajorVersion == 5 && env->MinorVersion == 0) strcpy(env->osName, "Windows 2000"); else if(env->MajorVersion == 5 && env->MinorVersion > 0) strcpy(env->osName, "Windows XP"); else if(env->MajorVersion == 6 && env->MinorVersion == 0) strcpy(env->osName, "Windows Vista"); else if(env->MajorVersion == 6 && env->MinorVersion > 0) strcpy(env->osName, "Windows 7"); else strcpy(env->osName, "Windows NT"); env->MajorBuild = (DWORD)(HIWORD(dwVersion)); } else { strcpy(env->osName, "Windows 95/98/ME"); env->MajorBuild = 0; } strcpy(env->buildDate, __DATE__); strcpy(env->buildTime, __TIME__); env->DWMajorVersion = DW_MAJOR_VERSION; env->DWMinorVersion = DW_MINOR_VERSION; #ifdef VER_REV env->DWSubVersion = VER_REV; #else env->DWSubVersion = DW_SUB_VERSION; #endif } /* Helper to make sure all /s are \s */ void _to_dos(char *dst, char *src) { int x = 0; while(src[x]) { if(src[x] == '/') dst[x] = '\\'; else dst[x] = src[x]; x++; } dst[x] = 0; } /* * Opens a file dialog and queries user selection. * Parameters: * title: Title bar text for dialog. * defpath: The default path of the open dialog. * ext: Default file extention. * flags: DW_FILE_OPEN or DW_FILE_SAVE or DW_DIRECTORY_OPEN. * Returns: * NULL on error. A malloced buffer containing * the file path on success. * */ char * API dw_file_browse(char *title, char *defpath, char *ext, int flags) { OPENFILENAME of; char filenamebuf[1001] = {0}; char filterbuf[1001] = {0}; int rc; if ( flags == DW_DIRECTORY_OPEN ) { /* If we aren't building a DLL, use the more simple browser */ #ifndef BUILD_DLL BROWSEINFO bi; TCHAR szDir[MAX_PATH]; LPITEMIDLIST pidl; LPMALLOC pMalloc; if (SUCCEEDED(SHGetMalloc(&pMalloc))) { ZeroMemory(&bi,sizeof(bi)); bi.hwndOwner = NULL; bi.pszDisplayName = 0; bi.pidlRoot = 0; bi.lpszTitle = title; bi.ulFlags = BIF_RETURNONLYFSDIRS | BIF_STATUSTEXT; bi.lpfn = NULL; /*BrowseCallbackProc*/ pidl = SHBrowseForFolder(&bi); if (pidl) { if (SHGetPathFromIDList(pidl,szDir)) { strncpy(filenamebuf,szDir,1000); } // In C++: pMalloc->Free(pidl); pMalloc->Release(); pMalloc->lpVtbl->Free(pMalloc,pidl); pMalloc->lpVtbl->Release(pMalloc); return strdup(filenamebuf); } } #else if ( XBrowseForFolder( NULL, (LPCTSTR)defpath, -1, (LPCTSTR)title, (LPTSTR)filenamebuf, 1000, FALSE ) ) { return strdup( filenamebuf ); } #endif } else { DWORD att = defpath ? GetFileAttributes(defpath) : INVALID_FILE_ATTRIBUTES; if (ext) { /* * The following mess is because sprintf() trunates at first \0 * and format of filter is eg: "c files (*.c)\0*.c\0All Files\0*.*\0\0" */ int len; char *ptr = filterbuf; memset( filterbuf, 0, sizeof(filterbuf) ); len = sprintf( ptr, "%s Files (*.%s)", ext, ext ); ptr = ptr + len + 1; // past first \0 len = sprintf( ptr, "*.%s", ext ); ptr = ptr + len + 1; // past next \0 len = sprintf( ptr, "All Files" ); ptr = ptr + len + 1; // past next \0 len = sprintf( ptr, "*.*" ); } memset( &of, 0, sizeof(OPENFILENAME) ); of.lStructSize = sizeof(OPENFILENAME); of.hwndOwner = HWND_DESKTOP; of.hInstance = DWInstance; of.lpstrTitle = title; of.lpstrInitialDir = "."; if(att != INVALID_FILE_ATTRIBUTES && (att & FILE_ATTRIBUTE_DIRECTORY)) of.lpstrInitialDir = defpath; else if(defpath) _to_dos(filenamebuf, defpath); of.lpstrFile = filenamebuf; of.lpstrFilter = filterbuf; of.nFilterIndex = 1; of.nMaxFile = 1000; /*of.lpstrDefExt = ext;*/ of.Flags = OFN_NOCHANGEDIR; if (flags & DW_FILE_SAVE) { of.Flags |= OFN_OVERWRITEPROMPT; rc = GetSaveFileName(&of); } else { of.Flags |= OFN_FILEMUSTEXIST; rc = GetOpenFileName(&of); } if (rc) return strdup(of.lpstrFile); } return NULL; } /* * Execute and external program in a seperate session. * Parameters: * program: Program name with optional path. * type: Either DW_EXEC_CON or DW_EXEC_GUI. * params: An array of pointers to string arguements. * Returns: * -1 on error. */ int API dw_exec(char *program, int type, char **params) { char **newparams; int retcode, count = 0, z; while(params[count]) { count++; } newparams = (char **)malloc(sizeof(char *) * (count+1)); for(z=0;z<count;z++) { newparams[z] = malloc(strlen(params[z])+3); strcpy(newparams[z], "\""); strcat(newparams[z], params[z]); strcat(newparams[z], "\""); } newparams[count] = NULL; retcode = _spawnvp(P_NOWAIT, program, (const char * const *)newparams); for(z=0;z<count;z++) { free(newparams[z]); } free(newparams); return retcode; } /* * Loads a web browser pointed at the given URL. * Parameters: * url: Uniform resource locator. */ int API dw_browse(char *url) { char *browseurl = url; int retcode; if(strlen(url) > 7 && strncmp(url, "file://", 7) == 0) { int len, z; browseurl = &url[7]; len = strlen(browseurl); for(z=0;z<len;z++) { if(browseurl[z] == '|') browseurl[z] = ':'; if(browseurl[z] == '/') browseurl[z] = '\\'; } } retcode = (int)ShellExecute(NULL, "open", browseurl, NULL, NULL, SW_SHOWNORMAL); if(retcode<33 && retcode != 2) return DW_ERROR_UNKNOWN; return DW_ERROR_NONE; } typedef struct _dwprint { PRINTDLG pd; DOCINFO di; int (*drawfunc)(HPRINT, HPIXMAP, int, void *); void *drawdata; unsigned long flags; } DWPrint; /* * Creates a new print object. * Parameters: * jobname: Name of the print job to show in the queue. * flags: Flags to initially configure the print object. * pages: Number of pages to print. * drawfunc: The pointer to the function to be used as the callback. * drawdata: User data to be passed to the handler function. * Returns: * A handle to the print object or NULL on failure. */ HPRINT API dw_print_new(char *jobname, unsigned long flags, unsigned int pages, void *drawfunc, void *drawdata) { DWPrint *print; if(!drawfunc || !(print = calloc(1, sizeof(DWPrint)))) return NULL; print->drawfunc = drawfunc; print->drawdata = drawdata; print->pd.lStructSize = sizeof(PRINTDLG); print->pd.hwndOwner = HWND_DESKTOP; print->pd.Flags = PD_USEDEVMODECOPIESANDCOLLATE | PD_RETURNDC; print->pd.nCopies = 1; print->pd.nFromPage = 1; print->pd.nToPage = pages; print->pd.nMinPage = 1; print->pd.nMaxPage = pages; if(!PrintDlg(&(print->pd))) { free(print); return NULL; } print->di.cbSize = sizeof(DOCINFO); print->di.lpszDocName = jobname ? jobname : "Dynamic Windows Print Job"; return print; } /* * Runs the print job, causing the draw page callbacks to fire. * Parameters: * print: Handle to the print object returned by dw_print_new(). * flags: Flags to run the print job. * Returns: * DW_ERROR_UNKNOWN on error or DW_ERROR_NONE on success. */ int API dw_print_run(HPRINT print, unsigned long flags) { DWPrint *p = print; HPIXMAP pixmap; int x, result = DW_ERROR_UNKNOWN; if(!p) return result; if (!(pixmap = calloc(1,sizeof(struct _hpixmap)))) return result; pixmap->width = GetDeviceCaps(p->pd.hDC, HORZRES); pixmap->height = GetDeviceCaps(p->pd.hDC, VERTRES); pixmap->hbm = CreateCompatibleBitmap(p->pd.hDC, pixmap->width, pixmap->height); pixmap->hdc = p->pd.hDC; pixmap->transcolor = DW_RGB_TRANSPARENT; SelectObject(pixmap->hdc, pixmap->hbm); /* Start the job */ StartDoc(p->pd.hDC, &(p->di)); /* Cycle through each page */ for(x=p->pd.nFromPage-1; x<p->pd.nToPage && p->drawfunc; x++) { StartPage(p->pd.hDC); p->drawfunc(print, pixmap, x, p->drawdata); EndPage(p->pd.hDC); } if(p->drawfunc) { result = DW_ERROR_NONE; EndDoc(p->pd.hDC); } else AbortDoc(p->pd.hDC); /* Free memory */ dw_pixmap_destroy(pixmap); free(p); return result; } /* * Cancels the print job, typically called from a draw page callback. * Parameters: * print: Handle to the print object returned by dw_print_new(). */ void API dw_print_cancel(HPRINT print) { DWPrint *p = print; if(p) p->drawfunc = NULL; } /* * Returns a pointer to a static buffer which containes the * current user directory. Or the root directory (C:\ on * OS/2 and Windows). */ char * API dw_user_dir(void) { static char _user_dir[1024] = ""; if(!_user_dir[0]) { HANDLE hToken = 0; /* Use the Windows API to get the user's profile directory */ if(OpenProcessToken(GetCurrentProcess(), TOKEN_QUERY, &hToken)) { DWORD BufSize = 1024; GetUserProfileDirectory(hToken, _user_dir, &BufSize); CloseHandle(hToken); } /* If it fails set it to the root directory */ if(!_user_dir[0]) { strcpy(_user_dir, "C:\\"); } } return _user_dir; } /* * Returns a pointer to a static buffer which containes the * private application data directory. */ char * API dw_app_dir(void) { return _dw_exec_dir; } /* * Call a function from the window (widget)'s context. * Parameters: * handle: Window handle of the widget. * function: Function pointer to be called. * data: Pointer to the data to be passed to the function. */ void API dw_window_function(HWND handle, void *function, void *data) { SendMessage(handle, WM_USER, (WPARAM)function, (LPARAM)data); } /* Functions for managing the user data lists that are associated with * a given window handle. Used in dw_window_set_data() and * dw_window_get_data(). */ UserData *_find_userdata(UserData **root, char *varname) { UserData *tmp = *root; while(tmp) { if(stricmp(tmp->varname, varname) == 0) return tmp; tmp = tmp->next; } return NULL; } int _new_userdata(UserData **root, char *varname, void *data) { UserData *new = _find_userdata(root, varname); if(new) { new->data = data; return TRUE; } else { new = malloc(sizeof(UserData)); if(new) { new->varname = strdup(varname); new->data = data; new->next = NULL; if (!*root) *root = new; else { UserData *prev = *root, *tmp = prev->next; while(tmp) { prev = tmp; tmp = tmp->next; } prev->next = new; } return TRUE; } } return FALSE; } int _remove_userdata(UserData **root, char *varname, int all) { UserData *prev = NULL, *tmp = *root; while(tmp) { if(all || stricmp(tmp->varname, varname) == 0) { if(!prev) { *root = tmp->next; free(tmp->varname); free(tmp); if(!all) return 0; tmp = *root; } else { /* If all is true we should * never get here. */ prev->next = tmp->next; free(tmp->varname); free(tmp); return 0; } } else { prev = tmp; tmp = tmp->next; } } return 0; } /* * Add a named user data item to a window handle. * Parameters: * window: Window handle of signal to be called back. * dataname: A string pointer identifying which signal to be hooked. * data: User data to be passed to the handler function. */ void API dw_window_set_data(HWND window, char *dataname, void *data) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(window, GWLP_USERDATA); if(!cinfo) { if(!dataname) return; cinfo = calloc(1, sizeof(ColorInfo)); cinfo->fore = cinfo->back = -1; SetWindowLongPtr(window, GWLP_USERDATA, (LONG_PTR)cinfo); } if(cinfo) { if(data) _new_userdata(&(cinfo->root), dataname, data); else { if(dataname) _remove_userdata(&(cinfo->root), dataname, FALSE); else _remove_userdata(&(cinfo->root), NULL, TRUE); } } } /* * Gets a named user data item to a window handle. * Parameters: * window: Window handle of signal to be called back. * dataname: A string pointer identifying which signal to be hooked. * data: User data to be passed to the handler function. */ void * API dw_window_get_data(HWND window, char *dataname) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(window, GWLP_USERDATA); if(cinfo && cinfo->root && dataname) { UserData *ud = _find_userdata(&(cinfo->root), dataname); if(ud) return ud->data; } return NULL; } /* * Add a callback to a timer event. * Parameters: * interval: Milliseconds to delay between calls. * sigfunc: The pointer to the function to be used as the callback. * data: User data to be passed to the handler function. * Returns: * Timer ID for use with dw_timer_disconnect(), 0 on error. */ int API dw_timer_connect(int interval, void *sigfunc, void *data) { if(sigfunc) { int timerid = SetTimer(NULL, 0, interval, _TimerProc); if(timerid) { _new_signal(WM_TIMER, NULL, timerid, sigfunc, data); return timerid; } } return 0; } /* * Removes timer callback. * Parameters: * id: Timer ID returned by dw_timer_connect(). */ void API dw_timer_disconnect(int id) { SignalHandler *prev = NULL, *tmp = Root; /* 0 is an invalid timer ID */ if(!id) return; KillTimer(NULL, id); while(tmp) { if(tmp->id == id) { if(prev) { prev->next = tmp->next; free(tmp); tmp = prev->next; } else { Root = tmp->next; free(tmp); tmp = Root; } } else { prev = tmp; tmp = tmp->next; } } } /* * Add a callback to a window event. * Parameters: * window: Window handle of signal to be called back. * signame: A string pointer identifying which signal to be hooked. * sigfunc: The pointer to the function to be used as the callback. * data: User data to be passed to the handler function. */ void API dw_signal_connect(HWND window, char *signame, void *sigfunc, void *data) { ULONG message = 0, id = 0; if (window && signame && sigfunc) { if (stricmp(signame, DW_SIGNAL_SET_FOCUS) == 0) window = _normalize_handle(window); if ((message = _findsigmessage(signame)) != 0) { /* Handle special case of the menu item */ if (message == WM_COMMAND && window < (HWND)65536) { char buffer[16]; HWND owner; _snprintf(buffer, 15, "_dw_id%d", (int)window); owner = (HWND)dw_window_get_data(DW_HWND_OBJECT, buffer); /* Make sure there are no dupes from popups */ dw_signal_disconnect_by_window(window); if (owner) { id = (ULONG)window; window = owner; } } _new_signal(message, window, id, sigfunc, data); } } } /* * Removes callbacks for a given window with given name. * Parameters: * window: Window handle of callback to be removed. */ void API dw_signal_disconnect_by_name(HWND window, char *signame) { SignalHandler *prev = NULL, *tmp = Root; ULONG message; if(!window || !signame || (message = _findsigmessage(signame)) == 0) return; while(tmp) { if(((window < (HWND)65536 && (int)window == tmp->id) || tmp->window == window) && tmp->message == message) { if(prev) { prev->next = tmp->next; free(tmp); tmp = prev->next; } else { Root = tmp->next; free(tmp); tmp = Root; } } else { prev = tmp; tmp = tmp->next; } } } /* * Removes all callbacks for a given window. * Parameters: * window: Window handle of callback to be removed. */ void API dw_signal_disconnect_by_window(HWND window) { SignalHandler *prev = NULL, *tmp = Root; while(tmp) { if((window < (HWND)65536 && (int)window == tmp->id) || tmp->window == window) { if(prev) { prev->next = tmp->next; free(tmp); tmp = prev->next; } else { Root = tmp->next; free(tmp); tmp = Root; } } else { prev = tmp; tmp = tmp->next; } } } /* * Removes all callbacks for a given window with specified data. * Parameters: * window: Window handle of callback to be removed. * data: Pointer to the data to be compared against. */ void API dw_signal_disconnect_by_data(HWND window, void *data) { SignalHandler *prev = NULL, *tmp = Root; while(tmp) { if(((window < (HWND)65536 && (int)window == tmp->id) || tmp->window == window) && tmp->data == data) { if(prev) { prev->next = tmp->next; free(tmp); tmp = prev->next; } else { Root = tmp->next; free(tmp); tmp = Root; } } else { prev = tmp; tmp = tmp->next; } } }