Mercurial > dwindows
view win/dw.c @ 752:cf447811d322
Converted tabs to spaces.
author | bsmith@81767d24-ef19-dc11-ae90-00e081727c95 |
---|---|
date | Thu, 17 Mar 2011 04:48:06 +0000 |
parents | 67f2e890b9df |
children | d26bfc4cd1f0 |
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-2005 Mark Hessling <m.hessling@qut.edu.au> * */ #define _WIN32_IE 0x0500 #define WINVER 0x500 #include <windows.h> #include <windowsx.h> #include <commctrl.h> #include <shlwapi.h> #include <shlobj.h> #include <stdlib.h> #include <string.h> #include <stdio.h> #include <process.h> #include <time.h> #include "dw.h" #include "XBrowseForFolder.h" /* * MinGW (as at 3.2.3) doesn't have MIM_MENUDATA * so #define it here */ #if !defined( MIM_MENUDATA ) # define MIM_MENUDATA 0x00000008 #endif HWND popup = (HWND)NULL, hwndBubble = (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_IE5PLUS (dwComctlVer >= PACKVERSION(5,80)) #define IS_WINNTOR95 (((LOBYTE(LOWORD(dwVersion))) < 5) && (HIBYTE(LOWORD(dwVersion)) < 10)) #ifndef MIN #define MIN(a, b) (((a) < (b)) ? (a) : (b)) #endif static BOOL (WINAPI* MyGetMenuInfo)(HMENU, LPCMENUINFO) = 0; static BOOL (WINAPI* MySetMenuInfo)(HMENU, LPCMENUINFO) = 0; FILE *dbgfp = NULL; 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) #define THREAD_LIMIT 128 COLORREF _foreground[THREAD_LIMIT]; COLORREF _background[THREAD_LIMIT]; HPEN _hPen[THREAD_LIMIT]; HBRUSH _hBrush[THREAD_LIMIT]; char *_clipboard_contents[THREAD_LIMIT]; int _PointerOnWnd[THREAD_LIMIT]; 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]; static int screenx, screeny; LRESULT CALLBACK _browserWindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam); 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); 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 } }; static void _dw_log( char *format, ... ) { va_list args; va_start(args, format); if ( dbgfp != NULL ) { vfprintf( dbgfp, format, args ); fflush( dbgfp ); } va_end(args); } #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 /* This should return true for WinNT/2K/XP and false on Win9x */ int IsWinNT(void) { static int isnt = -1; if(isnt == -1) { if (GetVersion() < 0x80000000) isnt = 1; else isnt = 0; } return isnt; } void DrawTransparentBitmap(HDC hdc, HDC hdcSrc, HBITMAP hBitmap, int xStart, int yStart, COLORREF cTransparentColor) { BITMAP bm; COLORREF cColor; HBITMAP bmAndBack, bmAndObject, bmAndMem, bmSave; HBITMAP bmBackOld, bmObjectOld, bmMemOld, bmSaveOld; HDC hdcMem, hdcBack, hdcObject, hdcTemp, hdcSave; POINT ptSize; #if 0 hdcTemp = CreateCompatibleDC(hdc); SelectObject(hdcTemp, hBitmap); // Select the bitmap #else hdcTemp = hdcSrc; #endif GetObject(hBitmap, sizeof(BITMAP), (LPSTR)&bm); ptSize.x = bm.bmWidth; // Get width of bitmap ptSize.y = bm.bmHeight; // Get height of bitmap DPtoLP(hdcTemp, &ptSize, 1); // Convert from device // to logical points // Create some DCs to hold temporary data. hdcBack = CreateCompatibleDC(hdc); hdcObject = CreateCompatibleDC(hdc); hdcMem = CreateCompatibleDC(hdc); hdcSave = CreateCompatibleDC(hdc); // Create a bitmap for each DC. DCs are required for a number of // GDI functions. // Monochrome DC bmAndBack = CreateBitmap(ptSize.x, ptSize.y, 1, 1, NULL); // Monochrome DC bmAndObject = CreateBitmap(ptSize.x, ptSize.y, 1, 1, NULL); bmAndMem = CreateCompatibleBitmap(hdc, ptSize.x, ptSize.y); bmSave = CreateCompatibleBitmap(hdc, ptSize.x, ptSize.y); // Each DC must select a bitmap object to store pixel data. bmBackOld = (HBITMAP)SelectObject(hdcBack, bmAndBack); bmObjectOld = (HBITMAP)SelectObject(hdcObject, bmAndObject); bmMemOld = (HBITMAP)SelectObject(hdcMem, bmAndMem); bmSaveOld = (HBITMAP)SelectObject(hdcSave, bmSave); // Set proper mapping mode. SetMapMode(hdcTemp, GetMapMode(hdc)); // Save the bitmap sent here, because it will be overwritten. BitBlt(hdcSave, 0, 0, ptSize.x, ptSize.y, hdcTemp, 0, 0, SRCCOPY); // Set the background color of the source DC to the color. // contained in the parts of the bitmap that should be transparent cColor = SetBkColor(hdcTemp, cTransparentColor); // Create the object mask for the bitmap by performing a BitBlt // from the source bitmap to a monochrome bitmap. BitBlt(hdcObject, 0, 0, ptSize.x, ptSize.y, hdcTemp, 0, 0, SRCCOPY); // Set the background color of the source DC back to the original // color. SetBkColor(hdcTemp, cColor); // Create the inverse of the object mask. BitBlt(hdcBack, 0, 0, ptSize.x, ptSize.y, hdcObject, 0, 0, NOTSRCCOPY); // Copy the background of the main DC to the destination. BitBlt(hdcMem, 0, 0, ptSize.x, ptSize.y, hdc, xStart, yStart, SRCCOPY); // Mask out the places where the bitmap will be placed. BitBlt(hdcMem, 0, 0, ptSize.x, ptSize.y, hdcObject, 0, 0, SRCAND); // Mask out the transparent colored pixels on the bitmap. BitBlt(hdcTemp, 0, 0, ptSize.x, ptSize.y, hdcBack, 0, 0, SRCAND); // XOR the bitmap with the background on the destination DC. BitBlt(hdcMem, 0, 0, ptSize.x, ptSize.y, hdcTemp, 0, 0, SRCPAINT); // Copy the destination to the screen. BitBlt(hdc, xStart, yStart, ptSize.x, ptSize.y, hdcMem, 0, 0, SRCCOPY); // Place the original bitmap back into the bitmap sent here. BitBlt(hdcTemp, 0, 0, ptSize.x, ptSize.y, hdcSave, 0, 0, SRCCOPY); // Delete the memory bitmaps. DeleteObject(SelectObject(hdcBack, bmBackOld)); DeleteObject(SelectObject(hdcObject, bmObjectOld)); DeleteObject(SelectObject(hdcMem, bmMemOld)); DeleteObject(SelectObject(hdcSave, bmSaveOld)); // Delete the memory DCs. DeleteDC(hdcMem); DeleteDC(hdcBack); DeleteDC(hdcObject); DeleteDC(hdcSave); DeleteDC(hdcTemp); } 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; } /* 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]; 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); } } dw_signal_disconnect_by_window(handle); if(thiscinfo) { SubclassWindow(handle, 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) { if (!IS_WINNTOR95 ) { int i, count = GetMenuItemCount(menu); for(i=0;i<count;i++) { MENUITEMINFO mii; mii.cbSize = sizeof(MENUITEMINFO); mii.fMask = MIIM_SUBMENU; if ( GetMenuItemInfo( menu, i, TRUE, &mii ) && 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]; 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] = ""; 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] = ""; 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; } } } } } } 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] = ""; 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; } } } } } } 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]; if(!handle) return; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, ClassName, strlen(ClassName))!=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))) { lastbox = box; } if(lastbox) return lastbox; return handle; } /* 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); } } /* ResetWindow: * Resizes window to the exact same size to trigger * recalculation of frame. */ void _ResetWindow(HWND hwndFrame) { RECT rcl; GetWindowRect(hwndFrame, &rcl); SetWindowPos(hwndFrame, HWND_TOP, 0, 0, rcl.right - rcl.left, rcl.bottom - rcl.top - 1, SWP_NOMOVE | SWP_NOZORDER); SetWindowPos(hwndFrame, HWND_TOP, 0, 0, rcl.right - rcl.left, rcl.bottom - rcl.top, SWP_NOMOVE | SWP_NOZORDER); } /* This function calculates how much space the widgets and boxes require * and does expansion as necessary. */ int _resize_box(Box *thisbox, int *depth, int x, int y, int *usedx, int *usedy, int pass, int *usedpadx, int *usedpady) { int z, currentx = 0, currenty = 0; int uymax = 0, uxmax = 0; int upymax = 0, upxmax = 0; /* Used for the SIZEEXPAND */ int nux = *usedx, nuy = *usedy; int nupx = *usedpadx, nupy = *usedpady; (*usedx) += (thisbox->pad * 2); (*usedy) += (thisbox->pad * 2); if(thisbox->grouphwnd) { char *text = dw_window_get_text(thisbox->grouphwnd); thisbox->grouppady = 0; if(text) { dw_font_text_extents_get(thisbox->grouphwnd, 0, text, NULL, &thisbox->grouppady); dw_free(text); } if(thisbox->grouppady) thisbox->grouppady += 3; else thisbox->grouppady = 6; thisbox->grouppadx = 6; (*usedx) += thisbox->grouppadx; (*usedpadx) += thisbox->grouppadx; (*usedy) += thisbox->grouppady; (*usedpady) += thisbox->grouppady; } for(z=0;z<thisbox->count;z++) { if(thisbox->items[z].type == TYPEBOX) { int initialx, initialy; Box *tmp = (Box *)GetWindowLongPtr(thisbox->items[z].hwnd, GWLP_USERDATA); initialx = x - (*usedx); initialy = y - (*usedy); if(tmp) { int newx, newy; int nux = *usedx, nuy = *usedy; int upx = *usedpadx + (tmp->pad*2), upy = *usedpady + (tmp->pad*2); /* On the second pass we know how big the box needs to be and how * much space we have, so we can calculate a ratio for the new box. */ if(pass == 2) { int deep = *depth + 1; _resize_box(tmp, &deep, x, y, &nux, &nuy, 1, &upx, &upy); tmp->upx = upx - *usedpadx; tmp->upy = upy - *usedpady; newx = x - nux; newy = y - nuy; tmp->width = thisbox->items[z].width = initialx - newx; tmp->height = thisbox->items[z].height = initialy - newy; tmp->parentxratio = thisbox->xratio; tmp->parentyratio = thisbox->yratio; tmp->parentpad = tmp->pad; /* Just in case */ tmp->xratio = thisbox->xratio; tmp->yratio = thisbox->yratio; if(thisbox->type == DW_VERT) { int tmppad = (thisbox->items[z].pad*2)+(tmp->pad*2)+tmp->grouppady; if((thisbox->items[z].width - tmppad)!=0) tmp->xratio = ((float)((thisbox->items[z].width * thisbox->xratio)-tmppad))/((float)(thisbox->items[z].width-tmppad)); } else { if((thisbox->items[z].width-tmp->upx)!=0) tmp->xratio = ((float)((thisbox->items[z].width * thisbox->xratio)-tmp->upx))/((float)(thisbox->items[z].width-tmp->upx)); } if(thisbox->type == DW_HORZ) { int tmppad = (thisbox->items[z].pad*2)+(tmp->pad*2)+tmp->grouppadx; if((thisbox->items[z].height-tmppad)!=0) tmp->yratio = ((float)((thisbox->items[z].height * thisbox->yratio)-tmppad))/((float)(thisbox->items[z].height-tmppad)); } else { if((thisbox->items[z].height-tmp->upy)!=0) tmp->yratio = ((float)((thisbox->items[z].height * thisbox->yratio)-tmp->upy))/((float)(thisbox->items[z].height-tmp->upy)); } nux = *usedx; nuy = *usedy; upx = *usedpadx + (tmp->pad*2); upy = *usedpady + (tmp->pad*2); } (*depth)++; _resize_box(tmp, depth, x, y, &nux, &nuy, pass, &upx, &upy); (*depth)--; newx = x - nux; newy = y - nuy; tmp->minwidth = thisbox->items[z].width = initialx - newx; tmp->minheight = thisbox->items[z].height = initialy - newy; } } if(pass > 1 && *depth > 0) { if(thisbox->type == DW_VERT) { int tmppad = (thisbox->items[z].pad*2)+(thisbox->parentpad*2)+thisbox->grouppadx; if((thisbox->minwidth-tmppad) == 0) thisbox->items[z].xratio = 1.0; else thisbox->items[z].xratio = ((float)((thisbox->width * thisbox->parentxratio)-tmppad))/((float)(thisbox->minwidth-tmppad)); } else { if(thisbox->minwidth-thisbox->upx == 0) thisbox->items[z].xratio = 1.0; else thisbox->items[z].xratio = ((float)((thisbox->width * thisbox->parentxratio)-thisbox->upx))/((float)(thisbox->minwidth-thisbox->upx)); } if(thisbox->type == DW_HORZ) { int tmppad = (thisbox->items[z].pad*2)+(thisbox->parentpad*2)+thisbox->grouppady; if((thisbox->minheight-tmppad) == 0) thisbox->items[z].yratio = 1.0; else thisbox->items[z].yratio = ((float)((thisbox->height * thisbox->parentyratio)-tmppad))/((float)(thisbox->minheight-tmppad)); } else { if(thisbox->minheight-thisbox->upy == 0) thisbox->items[z].yratio = 1.0; else thisbox->items[z].yratio = ((float)((thisbox->height * thisbox->parentyratio)-thisbox->upy))/((float)(thisbox->minheight-thisbox->upy)); } if(thisbox->items[z].type == TYPEBOX) { Box *tmp = (Box *)GetWindowLongPtr(thisbox->items[z].hwnd, GWLP_USERDATA); if(tmp) { tmp->parentxratio = thisbox->items[z].xratio; tmp->parentyratio = thisbox->items[z].yratio; } } } else { thisbox->items[z].xratio = thisbox->xratio; thisbox->items[z].yratio = thisbox->yratio; } if(thisbox->type == DW_VERT) { int itemwidth = (thisbox->items[z].pad*2) + thisbox->items[z].width; if(itemwidth > uxmax) uxmax = itemwidth; if(thisbox->items[z].hsize != SIZEEXPAND) { if(itemwidth > upxmax) upxmax = itemwidth; } else { if(thisbox->items[z].pad*2 > upxmax) upxmax = thisbox->items[z].pad*2; } } else { if(thisbox->items[z].width == -1) { /* figure out how much space this item requires */ /* thisbox->items[z].width = */ } else { (*usedx) += thisbox->items[z].width + (thisbox->items[z].pad*2); if(thisbox->items[z].hsize != SIZEEXPAND) (*usedpadx) += (thisbox->items[z].pad*2) + thisbox->items[z].width; else (*usedpadx) += thisbox->items[z].pad*2; } } if(thisbox->type == DW_HORZ) { int itemheight = (thisbox->items[z].pad*2) + thisbox->items[z].height; if(itemheight > uymax) uymax = itemheight; if(thisbox->items[z].vsize != SIZEEXPAND) { if(itemheight > upymax) upymax = itemheight; } else { if(thisbox->items[z].pad*2 > upymax) upymax = thisbox->items[z].pad*2; } } else { if(thisbox->items[z].height == -1) { /* figure out how much space this item requires */ /* thisbox->items[z].height = */ } else { (*usedy) += thisbox->items[z].height + (thisbox->items[z].pad*2); if(thisbox->items[z].vsize != SIZEEXPAND) (*usedpady) += (thisbox->items[z].pad*2) + thisbox->items[z].height; else (*usedpady) += thisbox->items[z].pad*2; } } } (*usedx) += uxmax; (*usedy) += uymax; (*usedpadx) += upxmax; (*usedpady) += upymax; currentx += thisbox->pad; currenty += thisbox->pad; if(thisbox->grouphwnd) { currentx += 3; currenty += thisbox->grouppady - 3; } /* The second pass is for expansion and actual placement. */ if(pass > 1) { /* Any SIZEEXPAND items should be set to uxmax/uymax */ for(z=0;z<thisbox->count;z++) { if(thisbox->items[z].hsize == SIZEEXPAND && thisbox->type == DW_VERT) thisbox->items[z].width = uxmax-(thisbox->items[z].pad*2); if(thisbox->items[z].vsize == SIZEEXPAND && thisbox->type == DW_HORZ) thisbox->items[z].height = uymax-(thisbox->items[z].pad*2); /* Run this code segment again to finalize the sized after setting uxmax/uymax values. */ if(thisbox->items[z].type == TYPEBOX) { Box *tmp = (Box *)GetWindowLongPtr(thisbox->items[z].hwnd, GWLP_USERDATA); if(tmp) { if(*depth > 0) { float calcval; if(thisbox->type == DW_VERT) { calcval = (float)(tmp->minwidth-((thisbox->items[z].pad*2)+(thisbox->pad*2))); if(calcval == 0.0) tmp->xratio = thisbox->xratio; else tmp->xratio = ((float)((thisbox->items[z].width * thisbox->xratio)-((thisbox->items[z].pad*2)+(thisbox->pad*2))))/calcval; tmp->width = thisbox->items[z].width; } if(thisbox->type == DW_HORZ) { calcval = (float)(tmp->minheight-((thisbox->items[z].pad*2)+(thisbox->pad*2))); if(calcval == 0.0) tmp->yratio = thisbox->yratio; else tmp->yratio = ((float)((thisbox->items[z].height * thisbox->yratio)-((thisbox->items[z].pad*2)+(thisbox->pad*2))))/calcval; tmp->height = thisbox->items[z].height; } } (*depth)++; _resize_box(tmp, depth, x, y, &nux, &nuy, 3, &nupx, &nupy); (*depth)--; } } } for(z=0;z<(thisbox->count);z++) { int height = thisbox->items[z].height; int width = thisbox->items[z].width; int pad = thisbox->items[z].pad; HWND handle = thisbox->items[z].hwnd; int vectorx, vectory; /* When upxmax != pad*2 then ratios are incorrect. */ vectorx = (int)((width*thisbox->items[z].xratio)-width); vectory = (int)((height*thisbox->items[z].yratio)-height); if(width > 0 && height > 0) { char tmpbuf[100]; /* This is a hack to fix rounding of the sizing */ if(*depth == 0) { vectorx++; vectory++; } /* If this item isn't going to expand... reset the vectors to 0 */ if(thisbox->items[z].vsize != SIZEEXPAND) vectory = 0; if(thisbox->items[z].hsize != SIZEEXPAND) vectorx = 0; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, COMBOBOXCLASSNAME, strlen(COMBOBOXCLASSNAME)+1)==0) { /* Handle special case Combobox */ MoveWindow(handle, currentx + pad, currenty + pad, width + vectorx, (height + vectory) + 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 + vectorx) - 20), currenty + pad, 20, height + vectory, FALSE); if(cinfo) { MoveWindow(cinfo->buddy, currentx + pad, currenty + pad, (width + vectorx) - 20, height + vectory, FALSE); } } 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"); int cx = width + vectorx; int cy = height + vectory; MoveWindow(handle, currentx + pad, currenty + pad, cx, cy, FALSE); if(cx > 0 && cy > 0 && percent) _handle_splitbar_resize(handle, *percent, type, cx, cy); } 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]; int textheight, diff, total = height + vectory; 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 + vectorx, height + vectory - diff, FALSE); } else { MoveWindow(handle, currentx + pad, currenty + pad, width + vectorx, height + vectory, FALSE); } } else { /* Everything else */ MoveWindow(handle, currentx + pad, currenty + pad, width + vectorx, height + vectory, FALSE); if(thisbox->items[z].type == TYPEBOX) { Box *boxinfo = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); if(boxinfo && boxinfo->grouphwnd) { MoveWindow(boxinfo->grouphwnd, 0, 0, width + vectorx, height + vectory, FALSE); } } } /* 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); } } if(thisbox->type == DW_HORZ) currentx += width + vectorx + (pad * 2); if(thisbox->type == DW_VERT) currenty += height + vectory + (pad * 2); } } } return 0; } void _do_resize(Box *thisbox, int x, int y) { if(x != 0 && y != 0) { if(thisbox) { int usedx = 0, usedy = 0, depth = 0, usedpadx = 0, usedpady = 0; _resize_box(thisbox, &depth, x, y, &usedx, &usedy, 1, &usedpadx, &usedpady); if(usedx-usedpadx == 0 || usedy-usedpady == 0) return; thisbox->xratio = ((float)(x-usedpadx))/((float)(usedx-usedpadx)); thisbox->yratio = ((float)(y-usedpady))/((float)(usedy-usedpady)); usedpadx = usedpady = usedx = usedy = depth = 0; _resize_box(thisbox, &depth, x, y, &usedx, &usedy, 2, &usedpadx, &usedpady); } } } int _HandleScroller(HWND handle, int pos, int which) { SCROLLINFO 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_PAGEDOWN:*/ case SB_PAGELEFT: pos = si.nPos - si.nPage; if(pos < si.nMin) pos = si.nMin; return pos; /*case SB_PAGEUP:*/ 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_LINEDOWN:*/ case SB_LINELEFT: pos = si.nPos - 1; if(pos < si.nMin) pos = si.nMin; return pos; /*case SB_LINEUP:*/ 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 ( MyGetMenuInfo( 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%ld", id ); checkable = (int)dw_window_get_data(DW_HWND_OBJECT, buffer); if ( checkable ) { int is_checked; sprintf( buffer, "_dw_ischecked%ld", 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 ); } } #ifdef DWDEBUG long ProcessCustomDraw (LPARAM lParam) { LPNMLVCUSTOMDRAW lplvcd = (LPNMLVCUSTOMDRAW)lParam; switch(lplvcd->nmcd.dwDrawStage) { case CDDS_PREPAINT : //Before the paint cycle begins //request notifications for individual listview items dw_messagebox("LISTVIEW", DW_MB_OK|DW_MB_ERROR, "PREPAINT"); // return CDRF_NOTIFYITEMDRAW; return (CDRF_NOTIFYPOSTPAINT | CDRF_NOTIFYITEMDRAW); case CDDS_ITEMPREPAINT: //Before an item is drawn { dw_messagebox("LISTVIEW", DW_MB_OK|DW_MB_ERROR, "ITEMPREPAINT"); return CDRF_NOTIFYSUBITEMDRAW; } break; case CDDS_SUBITEM | CDDS_ITEMPREPAINT: //Before a subitem is drawn { dw_messagebox("LISTVIEW", DW_MB_OK|DW_MB_ERROR, "SUBITEM ITEMPREPAINT %d",lplvcd->iSubItem); switch(lplvcd->iSubItem) { case 0: { lplvcd->clrText = RGB(255,255,255); lplvcd->clrTextBk = RGB(240,55,23); return CDRF_NEWFONT; } break; case 1: { lplvcd->clrText = RGB(255,255,0); lplvcd->clrTextBk = RGB(0,0,0); return CDRF_NEWFONT; } break; case 2: { lplvcd->clrText = RGB(20,26,158); lplvcd->clrTextBk = RGB(200,200,10); return CDRF_NEWFONT; } break; case 3: { lplvcd->clrText = RGB(12,15,46); lplvcd->clrTextBk = RGB(200,200,200); return CDRF_NEWFONT; } break; case 4: { lplvcd->clrText = RGB(120,0,128); lplvcd->clrTextBk = RGB(20,200,200); return CDRF_NEWFONT; } break; case 5: { lplvcd->clrText = RGB(255,255,255); lplvcd->clrTextBk = RGB(0,0,150); return CDRF_NEWFONT; } break; } } } return CDRF_DODEFAULT; } #endif /* 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]; GetClassName(tem->hdr.hwndFrom, tmpbuf, 99); #ifdef DEBUG_NOTUSED if ( lem->hdr.code == NM_CUSTOMDRAW ) dw_messagebox("NM_CUSTOMDRAW for (WM_NOTIFY)", DW_MB_OK|DW_MB_ERROR, "%s %d: Classname:%s",__FILE__,__LINE__,tmpbuf); #endif 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; 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; 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; } } } #ifdef DWDEBUG else if ( lem->hdr.code == NM_CUSTOMDRAW ) { dw_messagebox("NM_CUSTOMDRAW for WC_LISTVIEW from _wndproc (WM_NOTIFY)", DW_MB_OK|DW_MB_ERROR, "Hello"); SetWindowLong( hWnd, DWL_MSGRESULT, (LONG)ProcessCustomDraw(mp2) ); return TRUE; } #endif } } 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; } } #ifdef DEBUG_NOTUSED else { NMLISTVIEW FAR *lem=(NMLISTVIEW FAR *)mp2; char tmpbuf[100]; GetClassName(lem->hdr.hwndFrom, tmpbuf, 99); if ( strnicmp( tmpbuf, WC_LISTVIEW, strlen(WC_LISTVIEW)+1 ) == 0 && lem->hdr.code == NM_CUSTOMDRAW ) { dw_messagebox("NM_CUSTOMDRAW for WC_LISTVIEW(mp2) from _wndproc (WM_NOTIFY)", DW_MB_OK|DW_MB_ERROR, "Hello"); SetWindowLong( hWnd, DWL_MSGRESULT, (LONG)ProcessCustomDraw(mp2) ); tmp = NULL; //return TRUE; } } #endif } 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 (!IS_WINNTOR95 && 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(tmp->window, 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]; HWND handle = (HWND)mp2; int (*valuechangefunc)(HWND, int, void *) = tmp->signalfunction; GetClassName(handle, 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 value = _HandleScroller(handle, (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 ) { 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_CHAR: if ( LOWORD( mp1 ) == '\t' ) { if ( GetAsyncKeyState( VK_SHIFT ) & 0x8000 ) _shift_focus_back( hWnd ); else _shift_focus( hWnd ); return TRUE; } else if( LOWORD( mp1 ) == '\r' ) { ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr( hWnd, GWLP_USERDATA ); if ( cinfo && cinfo->clickdefault ) { _click_default( cinfo->clickdefault ); } } 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); } #ifdef DWDEBUG else { /* * Check if we have a click_default for this window */ NMLISTVIEW FAR *lem=(NMLISTVIEW FAR *)mp2; char tmpbuf[100]; GetClassName(lem->hdr.hwndFrom, tmpbuf, 99); if ( lem->hdr.code == NM_CUSTOMDRAW ) dw_messagebox("NM_CUSTOMDRAW for (WM_NOTIFY)", DW_MB_OK|DW_MB_ERROR, "%s %d: Classname:%s is it %s",__FILE__,__LINE__,tmpbuf,WC_LISTVIEW); if ( strnicmp( tmpbuf, WC_LISTVIEW, strlen(WC_LISTVIEW)+1 ) == 0 && lem->hdr.code == NM_CUSTOMDRAW ) { dw_messagebox("NM_CUSTOMDRAW for WC_LISTVIEW(mp2) from _wndproc (WM_NOTIFY) - normal processing", DW_MB_OK|DW_MB_ERROR, "Hello"); SetWindowLong( hWnd, DWL_MSGRESULT, (long)ProcessCustomDraw(mp2) ); return TRUE; } } #endif } break; case WM_HSCROLL: case WM_VSCROLL: { HWND handle = (HWND)mp2; char tmpbuf[100]; if(dw_window_get_data(handle, "_dw_scrollbar")) { int value = _HandleScroller(handle, (int)HIWORD(mp1), (int)LOWORD(mp1)); if(value > -1) dw_scrollbar_set_pos(handle, value); } GetClassName( hWnd, tmpbuf, 99 ); if ( strnicmp(tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1 ) == 0 ) { int value = _HandleScroller(hWnd, (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: { ColorInfo *thiscinfo = (ColorInfo *)GetWindowLongPtr((HWND)mp2, GWLP_USERDATA); 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) { HBRUSH hbr = GetSysColorBrush(COLOR_3DFACE); SelectObject((HDC)mp1, hbr); return (LONG)hbr; } else { 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((HDC)mp1, thiscinfo->hbrush); } return (LONG)thiscinfo->hbrush; } 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((HDC)mp1, thiscinfo->hbrush); return (LONG)thiscinfo->hbrush; } } } break; } if(result != -1) return result; else { 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; #if 0 case WM_ERASEBKGND: { ColorInfo *thiscinfo = (ColorInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); if(thiscinfo && thiscinfo->fore != -1 && thiscinfo->back != -1) return FALSE; } 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) { RECT wndRect; POINTS points; POINT point; int threadid = dw_thread_id(); switch( msg ) { case WM_LBUTTONDOWN: case WM_MBUTTONDOWN: case WM_RBUTTONDOWN: SetFocus(hWnd); _wndproc(hWnd, msg, mp1, mp2); break; case WM_MOUSEMOVE: if ( threadid < 0 || threadid >= THREAD_LIMIT ) threadid = 0; /* * Set the mouse capture and focus on the renderbox * when the mouse moves into the window. */ points = MAKEPOINTS(mp2); /* get the mouse point */ point.x = points.x; point.y = points.y; SetCapture( hWnd ); /* Capture the mouse input */ GetWindowRect( hWnd, &wndRect ); ClientToScreen( hWnd, &point ); if ( PtInRect( &wndRect, point ) ) { // Test if the pointer is on the window if ( _PointerOnWnd[threadid] == 0 ) { SetFocus(hWnd); _PointerOnWnd[threadid] = 1; } } else { ReleaseCapture(); _PointerOnWnd[threadid] = 0; } /* call our standard Windows procedure */ _wndproc(hWnd, msg, mp1, mp2); break; case WM_LBUTTONUP: case WM_MBUTTONUP: case WM_RBUTTONUP: case WM_PAINT: case WM_SIZE: case WM_COMMAND: case WM_CHAR: case WM_KEYDOWN: _wndproc(hWnd, msg, mp1, mp2); break; } return DefWindowProc(hWnd, msg, mp1, mp2); } 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); if(IS_IE5PLUS) SendMessage(hWnd, UDM_SETPOS32, 0, (LPARAM)position); else SendMessage(hWnd, UDM_SETPOS, 0, (LPARAM)MAKELONG((short)position, 0)); } } 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]; 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); } BOOL CALLBACK _colorwndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { ColorInfo *cinfo; char tmpbuf[100]; WNDPROC pOldProc = 0; cinfo = (ColorInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); GetClassName(hWnd, tmpbuf, 99); if(strcmp(tmpbuf, FRAMECLASSNAME) == 0) cinfo = &(((Box *)cinfo)->cinfo); if ( msg == WM_MOUSEMOVE ) _wndproc(hWnd, msg, mp1, mp2); if (cinfo) { pOldProc = cinfo->pOldProc; switch( msg ) { case WM_SETFOCUS: if(cinfo->combo) _wndproc(cinfo->combo, msg, mp1, mp2); else _wndproc(hWnd, msg, mp1, mp2); break; case WM_VSCROLL: case WM_HSCROLL: _wndproc(hWnd, msg, mp1, mp2); break; case WM_KEYDOWN: case WM_KEYUP: { if (hWnd && (mp1 == VK_UP || mp1 == VK_DOWN)) { BOOL ret; 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) { BOOL ret; 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: _wndproc(hWnd, msg, mp1, mp2); if (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) { if (IsWinNT()) PostMessage(cinfo->buddy, WM_USER+10, 0, 0); else SendMessage(cinfo->buddy, WM_USER+10, 0, 0); } break; case WM_USER+10: { if(cinfo->buddy) { long val; if(IS_IE5PLUS) val = (long)SendMessage(cinfo->buddy, UDM_GETPOS32, 0, 0); else val = (long)SendMessage(cinfo->buddy, UDM_GETPOS, 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) { /* 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) { HBRUSH hbr = GetSysColorBrush(COLOR_3DFACE); SetBkColor((HDC)mp1, GetSysColor(COLOR_3DFACE)); SelectObject((HDC)mp1, hbr); return (LONG)hbr; } else { 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((HDC)mp1, thiscinfo->hbrush); } return (LONG)thiscinfo->hbrush; } 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((HDC)mp1, thiscinfo->hbrush); return (LONG)thiscinfo->hbrush; } } } break; } } if(!pOldProc) return DefWindowProc(hWnd, msg, mp1, mp2); return CallWindowProc(pOldProc, hWnd, msg, mp1, mp2); } BOOL CALLBACK _containerwndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { ContainerInfo *cinfo; cinfo = (ContainerInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); switch( msg ) { case WM_COMMAND: case WM_NOTIFY: case WM_MOUSEMOVE: _wndproc(hWnd, msg, mp1, mp2); 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(!cinfo || !cinfo->pOldProc) return DefWindowProc(hWnd, msg, mp1, mp2); return CallWindowProc(cinfo->pOldProc, hWnd, msg, mp1, mp2); } BOOL CALLBACK _treewndproc(HWND hWnd, UINT msg, WPARAM mp1, LPARAM mp2) { ContainerInfo *cinfo; cinfo = (ContainerInfo *)GetWindowLongPtr(hWnd, GWLP_USERDATA); switch( msg ) { case WM_MOUSEMOVE: _wndproc(hWnd, msg, mp1, mp2); break; case WM_CHAR: if(LOWORD(mp1) == '\t') { if(GetAsyncKeyState(VK_SHIFT) & 0x8000) _shift_focus_back(hWnd); else _shift_focus(hWnd); return FALSE; } break; } if(!cinfo || !cinfo->pOldProc) return DefWindowProc(hWnd, msg, mp1, mp2); return CallWindowProc(cinfo->pOldProc, hWnd, msg, mp1, mp2); } 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, handle2; Box *tmp; if(type == DW_HORZ) { int newx = x; float ratio = (float)percent/(float)100.0; handle1 = (HWND)dw_window_get_data(hwnd, "_dw_topleft"); handle2 = (HWND)dw_window_get_data(hwnd, "_dw_bottomright"); tmp = (Box *)GetWindowLongPtr(handle1, GWLP_USERDATA); newx = (int)((float)newx * ratio) - (SPLITBAR_WIDTH/2); ShowWindow(handle1, SW_HIDE); ShowWindow(handle2, SW_HIDE); 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; handle1 = (HWND)dw_window_get_data(hwnd, "_dw_bottomright"); handle2 = (HWND)dw_window_get_data(hwnd, "_dw_topleft"); tmp = (Box *)GetWindowLongPtr(handle1, GWLP_USERDATA); newy = (int)((float)newy * ratio) - (SPLITBAR_WIDTH/2); ShowWindow(handle1, SW_HIDE); ShowWindow(handle2, SW_HIDE); MoveWindow(handle1, 0, y - newy, x, newy, FALSE); _do_resize(tmp, x - 1, newy - 1); tmp = (Box *)GetWindowLongPtr(handle2, GWLP_USERDATA); newy = y - newy - SPLITBAR_WIDTH; MoveWindow(handle2, 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 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[1024] = ""; 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); } /* Function: _BtProc * Abstract: Subclass procedure for buttons */ BOOL CALLBACK _BtProc(HWND hwnd, ULONG msg, WPARAM mp1, LPARAM mp2) { BubbleButton *bubble; static int bMouseOver = 0; static BubbleButton *this_bubble = NULL; POINT point; RECT rect; WNDPROC pOldProc; bubble = (BubbleButton *)GetWindowLongPtr(hwnd, GWLP_USERDATA); if ( bubble != this_bubble ) { /* * If we missed the release capture, then if the bubble details * from this window are different from the last we must be in a * different button, so delete the last bubble text */ bMouseOver = 0; this_bubble = bubble; if ( hwndBubble ) { _free_window_memory(hwndBubble, 0); DestroyWindow(hwndBubble); hwndBubble = 0; } } if ( !bubble ) 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 = bubble->pOldProc; switch(msg) { case WM_CTLCOLORSTATIC: case WM_CTLCOLORLISTBOX: case WM_CTLCOLORBTN: case WM_CTLCOLOREDIT: case WM_CTLCOLORMSGBOX: case WM_CTLCOLORSCROLLBAR: case WM_CTLCOLORDLG: _wndproc(hwnd, msg, mp1, mp2); break; case WM_SETFOCUS: _wndproc(hwnd, msg, mp1, mp2); break; case WM_LBUTTONUP: { SignalHandler *tmp = Root; /* * If we have bubbletext displaying when we * release the mouse, get rid of the bubbletext window */ if ( hwndBubble ) { _free_window_memory(hwndBubble, 0); DestroyWindow(hwndBubble); hwndBubble = 0; } /* 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) { if(bubble->checkbox) in_checkbox_handler = 1; clickfunc(tmp->window, tmp->data); if(bubble->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) { 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; case WM_MOUSEMOVE: GetCursorPos(&point); GetWindowRect(hwnd, &rect); if ( PtInRect(&rect, point) ) { if ( hwnd != GetCapture() ) { SetCapture(hwnd); } if ( !bMouseOver ) { bMouseOver = 1; if(!*bubble->bubbletext) break; if(hwndBubble) { _free_window_memory(hwndBubble, 0); DestroyWindow(hwndBubble); hwndBubble = 0; } if(!hwndBubble) { POINTL ptlWork = {0,0}; SIZE size; HFONT hFont, oldFont = (HFONT)0; HDC hdc; RECT rect; /* Use the WS_EX_TOOLWINDOW extended style * so the window doesn't get listed in the * taskbar. */ hwndBubble = CreateWindowEx(WS_EX_TOOLWINDOW, STATICCLASSNAME, bubble->bubbletext, BS_TEXT | WS_POPUP | WS_BORDER | SS_CENTER, 0,0,50,20, HWND_DESKTOP, NULL, DWInstance, NULL); dw_window_set_font(hwndBubble, DefaultFont); dw_window_set_color(hwndBubble, DW_CLR_BLACK, DW_CLR_YELLOW); hFont = (HFONT)SendMessage(hwndBubble, WM_GETFONT, 0, 0); hdc = GetDC(hwndBubble); if(hFont) oldFont = (HFONT)SelectObject(hdc, hFont); GetTextExtentPoint32(hdc, bubble->bubbletext, strlen(bubble->bubbletext), &size); if(hFont) SelectObject(hdc, oldFont); MapWindowPoints(hwnd, HWND_DESKTOP, (LPPOINT)&ptlWork, 1); GetWindowRect(hwnd, &rect); SetWindowPos(hwndBubble, HWND_TOP, ptlWork.x, ptlWork.y + (rect.bottom-rect.top) + 1, size.cx + 8, size.cy + 2, SWP_NOACTIVATE | SWP_SHOWWINDOW); ReleaseDC(hwndBubble, hdc); } } } else{ /* Calling ReleaseCapture in Win95 also causes WM_CAPTURECHANGED * to be sent. Be sure to account for that. */ ReleaseCapture(); if(bMouseOver && hwndBubble) { bMouseOver = 0; _free_window_memory(hwndBubble, 0); DestroyWindow(hwndBubble); hwndBubble = 0; } } _wndproc(hwnd, msg, mp1, mp2); break; case WM_CAPTURECHANGED: /* This message means we are losing the capture for some reason * Either because we intentionally lost it or another window * stole it */ if ( bMouseOver && hwndBubble ) { bMouseOver = 0; _free_window_memory(hwndBubble, 0); DestroyWindow(hwndBubble); hwndBubble = 0; } break; } 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); } } /* 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; } /* * 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 *fname; 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 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 HTML renderer class */ memset(&wc, 0, sizeof(WNDCLASS)); wc.lpfnWndProc = (WNDPROC)_browserWindowProc; wc.lpszClassName = BrowserClassName; wc.style = CS_HREDRAW|CS_VREDRAW; RegisterClass(&wc); /* 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); } /* We need the version to check capability like up-down controls */ dwVersion = GetVersion(); dwComctlVer = GetDllVersion(TEXT("comctl32.dll")); for ( z = 0; z < THREAD_LIMIT; z++ ) { _foreground[z] = RGB(128,128,128); _background[z] = DW_RGB_TRANSPARENT; _hPen[z] = CreatePen(PS_SOLID, 1, _foreground[z]); _hBrush[z] = CreateSolidBrush(_foreground[z]); _clipboard_contents[z] = NULL; _PointerOnWnd[z] = 0; } if ( !IS_WINNTOR95 ) { /* Get function pointers for the Win2k/98 menu functions */ HANDLE huser = LoadLibrary("user32"); MyGetMenuInfo = (void*)GetProcAddress(huser, "GetMenuInfo"); MySetMenuInfo = (void*)GetProcAddress(huser, "SetMenuInfo"); FreeLibrary(huser); } /* Initialize Security for named events and memory */ InitializeSecurityDescriptor(&_dwsd, SECURITY_DESCRIPTOR_REVISION); SetSecurityDescriptorDacl(&_dwsd, TRUE, (PACL) NULL, FALSE); OleInitialize(NULL); /* * Setup logging/debugging */ if ( (fname = getenv( "DWINDOWS_DEBUGFILE" ) ) != NULL ) { dbgfp = fopen( fname, "w" ); } /* * Get screen size. Used to make calls to dw_screen_width() * and dw_screen-height() quicker, but to alos limit the * default size of windows. */ screenx = GetSystemMetrics(SM_CXSCREEN); screeny = GetSystemMetrics(SM_CYSCREEN); return 0; } /* * Runs a message loop for Dynamic Windows. */ void API dw_main(void) { MSG msg; _dwtid = dw_thread_id(); 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); } } } /* * 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 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[1024]; int rc; va_start(args, format); vsprintf(outbuf, 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 = 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 = GetParent(handle); Box *thisbox = (Box *)GetWindowLongPtr(parent, GWLP_USERDATA); if(!IS_WINNTOR95) { HMENU menu = GetMenu(handle); if(menu) _free_menu_data(menu); } if(parent != HWND_DESKTOP && 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); } HFONT _acquire_font(HWND handle, char *fontname) { HFONT hfont = 0; if(fontname != DefaultFont && fontname[0]) { int Italic, Bold; char *myFontName; int z, size = 9; LOGFONT lf; #if 0 HDC hDC = GetDC(handle); #endif for(z=0;z<strlen(fontname);z++) { if(fontname[z]=='.') break; } size = atoi(fontname) + 5; Italic = instring(" Italic", &fontname[z+1]); Bold = instring(" Bold", &fontname[z+1]); #if 0 lf.lfHeight = -MulDiv(size, GetDeviceCaps(hDC, LOGPIXELSY), 72); #endif lf.lfHeight = size; 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; strcpy(lf.lfFaceName, myFontName); free(myFontName); hfont = CreateFontIndirect(&lf); #if 0 ReleaseDC(handle, hDC); #endif } if(!hfont) hfont = GetStockObject(DEFAULT_GUI_FONT); return hfont; } /* * 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 oldfont = (HFONT)SendMessage(handle, WM_GETFONT, 0, 0); HFONT hfont = _acquire_font(handle, fontname); ColorInfo *cinfo; cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); if(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; strcpy(cinfo->fontname, fontname); cinfo->pOldProc = SubclassWindow(handle, _colorwndproc); SetWindowLongPtr(handle, GWLP_USERDATA, (LONG_PTR)cinfo); } } SendMessage(handle, WM_SETFONT, (WPARAM)hfont, (LPARAM)TRUE); if(oldfont) DeleteObject(oldfont); return 0; } /* * 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 *newbox; char tmpbuf[100]; cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); newbox = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, WC_LISTVIEW, strlen(WC_LISTVIEW))==0) { fore = _internal_color(fore); 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; } 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; newbox->pad = 0; newbox->type = DW_VERT; newbox->count = 0; newbox->cinfo.fore = newbox->cinfo.back = -1; /* Hmm, the "correct" way doesn't seem to be * working, but the old hackish SetParent() * at the bottom seems to work, so I'll leave * it like this for now. */ #if 0 if(hwndOwner) flStyleEx |= WS_EX_MDICHILD; #endif if(!(flStyle & WS_CAPTION)) flStyle |= WS_POPUPWINDOW; if(flStyle & DW_FCF_TASKLIST) { ULONG newflags = (flStyle | WS_CLIPCHILDREN) & ~DW_FCF_TASKLIST; hwndframe = CreateWindowEx(flStyleEx, ClassName, title, newflags, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, hwndOwner, NULL, DWInstance, NULL); } else { flStyleEx |= WS_EX_TOOLWINDOW; hwndframe = CreateWindowEx(flStyleEx, ClassName, title, flStyle | WS_CLIPCHILDREN, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, hwndOwner, NULL, DWInstance, NULL); } SetWindowLongPtr(hwndframe, GWLP_USERDATA, (LONG_PTR)newbox); if(hwndOwner) SetParent(hwndframe, hwndOwner); 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,2000,1000, 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; } /* * INCOMPLETE * 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) { 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 | WS_VSCROLL | WS_HSCROLL, 0,0,2000,1000, 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 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,2000,1000, DW_HWND_OBJECT, NULL, DWInstance, NULL); newbox->grouphwnd = CreateWindow(BUTTONCLASSNAME, title, WS_CHILD | BS_GROUPBOX | WS_VISIBLE | WS_CLIPCHILDREN, 0,0,2000,1000, hwndframe, NULL, DWInstance, NULL); SetWindowLongPtr(hwndframe, GWLP_USERDATA, (LONG_PTR)newbox); dw_window_set_font(newbox->grouphwnd, 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,2000,1000, 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) { return CreateWindow(BrowserClassName, "", WS_VISIBLE | WS_CHILD | WS_CLIPSIBLINGS, 0,0,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); } /* * 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 | WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,2000,1000, 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,2000,1000, 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; tmp = (HMENUI)CreateMenu(); if (!IS_WINNTOR95) { MENUINFO mi; mi.cbSize = sizeof(MENUINFO); mi.fMask = MIM_MENUDATA; mi.dwMenuData = (ULONG_PTR)1; MySetMenuInfo( (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); } } /* * 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[30]; int is_checked, is_disabled; /* * 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 = title; while(*tmp) { if(*tmp == '~') *tmp = '&'; tmp++; } } if (title && *title) 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 = title; mii.cch = strlen(title); InsertMenuItem(mymenu, 65535, TRUE, &mii); sprintf(buffer, "_dw_id%ld", id); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)mymenu ); sprintf(buffer, "_dw_checkable%ld", id); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)check ); sprintf(buffer, "_dw_ischecked%ld", id); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)is_checked ); sprintf(buffer, "_dw_isdisabled%ld", id); dw_window_set_data( DW_HWND_OBJECT, buffer, (void *)is_disabled ); if (!IS_WINNTOR95) { /* According to the docs this will only work on Win2k/98 and above */ if (submenu) { MENUINFO mi; mi.cbSize = sizeof(MENUINFO); mi.fMask = MIM_MENUDATA; mi.dwMenuData = (ULONG_PTR)mymenu; MySetMenuInfo( (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 */ sprintf( buffer, "_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[30],buffer2[30]; int check; int disabled; if (IsWindow(menux) && !IsMenu(mymenu)) mymenu = (HMENU)dw_window_get_data(menux, "_dw_menu"); sprintf( buffer1, "_dw_ischecked%ld", id ); check = (int)dw_window_get_data( DW_HWND_OBJECT, buffer1 ); sprintf( buffer2, "_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 ); } /* * INCOMPLETE * Deletes the menu item specified * Parameters: * menu: The handle to the menu in which the item was appended. * id: Menuitem id. */ void 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 ( DeleteMenu(mymenu, id, MF_BYCOMMAND) == 0 ) { char lasterror[257]; FormatMessage( FORMAT_MESSAGE_FROM_SYSTEM, NULL, GetLastError(), MAKELANGID( LANG_NEUTRAL, SUBLANG_DEFAULT), lasterror, 256, NULL); fprintf(stderr, "Error deleting menu: %s", lasterror); } DrawMenuBar(menux); } /* * 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,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ContainerInfo *cinfo = (ContainerInfo *)calloc(1, sizeof(ContainerInfo)); if(!cinfo) { DestroyWindow(tmp); return NULL; } cinfo->pOldProc = (WNDPROC)SubclassWindow(tmp, _containerwndproc); cinfo->cinfo.fore = cinfo->cinfo.back = -1; SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)cinfo); dw_window_set_font(tmp, DefaultFont); 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,2000,1000, 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->pOldProc = (WNDPROC)SubclassWindow(tmp, _treewndproc); cinfo->cinfo.fore = cinfo->cinfo.back = -1; 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, BS_TEXT | WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); dw_window_set_font(tmp, DefaultFont); 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(ObjectClassName, text, BS_TEXT | WS_VISIBLE | WS_CHILD | WS_CLIPCHILDREN, 0,0,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); dw_window_set_font(tmp, DefaultFont); SubclassWindow(tmp, _statuswndproc); 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,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ContainerInfo *cinfo = (ContainerInfo *)calloc(1, sizeof(ContainerInfo)); if(!cinfo) { DestroyWindow(tmp); return NULL; } cinfo->pOldProc = (WNDPROC)SubclassWindow(tmp, _treewndproc); cinfo->cinfo.fore = cinfo->cinfo.back = -1; 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,2000,1000, 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,2000,1000, 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 = (WNDPROC)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,2000,1000, 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); 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) { BubbleButton *bubble = calloc(1, sizeof(BubbleButton)); HWND tmp = CreateWindow(BUTTONCLASSNAME, text, WS_CHILD | BS_PUSHBUTTON | WS_VISIBLE | WS_CLIPCHILDREN, 0,0,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); bubble->id = id; bubble->bubbletext[0] = '\0'; bubble->pOldProc = (WNDPROC)SubclassWindow(tmp, _BtProc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)bubble); 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; BubbleButton *bubble = calloc(1, sizeof(BubbleButton)); 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,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); bubble->id = id; strncpy(bubble->bubbletext, text, BUBBLE_HELP_MAX - 1); bubble->bubbletext[BUBBLE_HELP_MAX - 1] = '\0'; bubble->pOldProc = (WNDPROC)SubclassWindow(tmp, _BtProc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)bubble); 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; BubbleButton *bubble; HBITMAP hbitmap = 0; HANDLE icon = 0; int windowtype = 0, len; if (!(bubble = calloc(1, sizeof(BubbleButton)))) return 0; windowtype = _dw_get_image_handle(filename, &icon, &hbitmap); tmp = CreateWindow( BUTTONCLASSNAME, "", windowtype | WS_CHILD | BS_PUSHBUTTON | WS_CLIPCHILDREN | WS_VISIBLE, 0,0,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); bubble->id = id; strncpy(bubble->bubbletext, text, BUBBLE_HELP_MAX - 1); bubble->bubbletext[BUBBLE_HELP_MAX - 1] = '\0'; bubble->pOldProc = (WNDPROC)SubclassWindow(tmp, _BtProc); SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)bubble); 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 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; BubbleButton *bubble; HBITMAP hbitmap = 0; HANDLE icon = 0; char *file; FILE *fp; int windowtype; if ( !(bubble = calloc(1, sizeof(BubbleButton))) ) return 0; file = tmpnam( NULL ); if ( file != NULL ) { fp = fopen( file, "wb" ); if ( fp != NULL ) { fwrite( data, 1, len, fp ); fclose( fp ); 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 ); windowtype = BS_BITMAP; } else /* otherwise its assumed to be an ico */ { icon = LoadImage( NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE ); windowtype = BS_ICON; } } else { unlink( file ); return 0; } unlink( file ); } tmp = CreateWindow( BUTTONCLASSNAME, "", WS_CHILD | BS_PUSHBUTTON | windowtype | WS_CLIPCHILDREN | WS_VISIBLE, 0,0,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL ); bubble->id = id; strncpy( bubble->bubbletext, text, BUBBLE_HELP_MAX - 1 ); bubble->bubbletext[BUBBLE_HELP_MAX - 1] = '\0'; bubble->pOldProc = (WNDPROC)SubclassWindow( tmp, _BtProc ); SetWindowLongPtr( tmp, GWLP_USERDATA, (LONG_PTR)bubble ); 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 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,2000,1000, 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,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ColorInfo *cinfo = calloc(1, sizeof(ColorInfo)); 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; 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,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); BubbleButton *bubble = calloc(1, sizeof(BubbleButton)); bubble->id = id; bubble->pOldProc = (WNDPROC)SubclassWindow(tmp, _BtProc); bubble->cinfo.fore = -1; bubble->cinfo.back = -1; SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)bubble); dw_window_set_font(tmp, DefaultFont); 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,2000,1000, 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,2000,1000, 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,2000,1000, 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) { BubbleButton *bubble = calloc(1, sizeof(BubbleButton)); HWND tmp = CreateWindow(BUTTONCLASSNAME, text, WS_CHILD | BS_AUTOCHECKBOX | BS_TEXT | WS_CLIPCHILDREN | WS_VISIBLE, 0,0,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); bubble->id = id; bubble->checkbox = 1; bubble->pOldProc = (WNDPROC)SubclassWindow(tmp, _BtProc); bubble->cinfo.fore = -1; bubble->cinfo.back = -1; SetWindowLongPtr(tmp, GWLP_USERDATA, (LONG_PTR)bubble); dw_window_set_font(tmp, DefaultFont); 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,2000,1000, DW_HWND_OBJECT, (HMENU)id, DWInstance, NULL); ContainerInfo *cinfo = (ContainerInfo *)calloc(1, sizeof(ContainerInfo)); if(!cinfo) { DestroyWindow(tmp); return NULL; } cinfo->cinfo.fore = -1; cinfo->cinfo.back = -1; cinfo->pOldProc = (WNDPROC)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) { HICON hicon = icon < 65536 ? LoadIcon(DWInstance, MAKEINTRESOURCE(icon)) : (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; HBITMAP oldbitmap = (HBITMAP)SendMessage(handle, STM_GETIMAGE, IMAGE_BITMAP, 0); HICON icon; HICON oldicon = (HICON)SendMessage(handle, STM_GETIMAGE, IMAGE_ICON, 0); if(id) { hbitmap = LoadBitmap(DWInstance, MAKEINTRESOURCE(id)); icon = LoadImage(DWInstance, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, LR_SHARED); } else if(filename) { _dw_get_image_handle(filename, &icon, &hbitmap); 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 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 = tmpnam( NULL ); if ( file != NULL ) { fp = fopen( file, "wb" ); if ( fp != NULL ) { fwrite( data, 1, len, fp ); fclose( fp ); 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 ); } else { unlink( file ); return; } unlink( 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]; 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, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1) == 0 ) { /* groupbox */ thisbox = (Box *)GetWindowLongPtr( handle, GWLP_USERDATA ); if ( thisbox && thisbox->grouphwnd != (HWND)NULL ) SetWindowText( thisbox->grouphwnd, text ); } } /* * 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) { int len = GetWindowTextLength(handle); char *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) { EnableWindow(handle, FALSE); } /* * Enables given window (widget). * Parameters: * handle: Handle to the window. */ void API dw_window_enable(HWND handle) { 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; } /* * 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) { Box *thisbox; /* * 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("dw_box_pack_start()", DW_MB_OK|DW_MB_ERROR, "Danger! Danger! Will Robinson; box and item are the same!"); return; } thisbox = (Box *)GetWindowLongPtr(box, GWLP_USERDATA); if(thisbox) { int z; Item *tmpitem, *thisitem = thisbox->items; char tmpbuf[100]; tmpitem = malloc(sizeof(Item)*(thisbox->count+1)); for(z=0;z<thisbox->count;z++) { tmpitem[z] = thisitem[z]; } GetClassName(item, tmpbuf, 99); if(vsize && !height) height = 1; if(hsize && !width) width = 1; if(strnicmp(tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1)==0) tmpitem[thisbox->count].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[thisbox->count].type = TYPEITEM; } else { if ( width == 0 && hsize == FALSE ) dw_messagebox("dw_box_pack_start()", 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("dw_box_pack_start()", DW_MB_OK|DW_MB_ERROR, "Height and expand Vertical both unset for box: %x item: %x",box,item); tmpitem[thisbox->count].type = TYPEITEM; } tmpitem[thisbox->count].hwnd = item; tmpitem[thisbox->count].origwidth = tmpitem[thisbox->count].width = width; tmpitem[thisbox->count].origheight = tmpitem[thisbox->count].height = height; tmpitem[thisbox->count].pad = pad; if(hsize) tmpitem[thisbox->count].hsize = SIZEEXPAND; else tmpitem[thisbox->count].hsize = SIZESTATIC; if(vsize) tmpitem[thisbox->count].vsize = SIZEEXPAND; else tmpitem[thisbox->count].vsize = SIZESTATIC; 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); } } } } /* * 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) { int usedx = 0, usedy = 0, depth = 0, usedpadx = 0, usedpady = 0; Box *thisbox; /* * 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 zero. * It doesn't work vey well :-( */ thisbox = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); if ( thisbox ) { _resize_box(thisbox, &depth, 0, 0, &usedx, &usedy, 1, &usedpadx, &usedpady); _resize_box(thisbox, &depth, usedx, usedy, &usedx, &usedy, 2, &usedpadx, &usedpady); } if ( width == 0 ) width = usedx; if ( height == 0 ) height = usedy; SetWindowPos(handle, (HWND)NULL, 0, 0, width, height, SWP_SHOWWINDOW | SWP_NOZORDER | SWP_NOMOVE); #if 0 /* force a configure event */ SendMessage( handle, WM_SIZE, 0, MAKELPARAM(usedx, usedy) ); #endif } /* * Returns the width of the screen. */ int API dw_screen_width(void) { return screenx; } /* * Returns the height of the screen. */ int API dw_screen_height(void) { return screeny; } /* 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 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) { 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) { int usedx = 0, usedy = 0, depth = 0, usedpadx = 0, usedpady = 0; Box *thisbox; /* * 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 zero. * It doesn't work vey well :-( */ thisbox = (Box *)GetWindowLongPtr(handle, GWLP_USERDATA); if ( thisbox ) { _resize_box(thisbox, &depth, 0, 0, &usedx, &usedy, 1, &usedpadx, &usedpady); _resize_box(thisbox, &depth, usedx, usedy, &usedx, &usedy, 2, &usedpadx, &usedpady); } if ( width == 0 ) width = usedx; if ( height == 0 ) height = usedy; SetWindowPos(handle, (HWND)NULL, x, y, width, height, SWP_NOZORDER | SWP_SHOWWINDOW | SWP_NOACTIVATE); #if 0 /* force a configure event */ SendMessage( handle, WM_SIZE, 0, MAKELPARAM(width, height) ); #endif } /* * 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 = GetWindowLong(handle, GWL_STYLE); ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); tmp = currentstyle | mask; tmp ^= mask; tmp |= style; /* 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]) { int oldpage = TabCtrl_GetCurSel(handle); 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)); if(oldpage > -1 && array[oldpage]) SetParent(array[oldpage]->hwnd, DW_HWND_OBJECT); TabCtrl_SetCurSel(handle, z); 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); SubclassWindow(tmpbox, _wndproc); if(array[pageid]->hwnd) dw_window_destroy(array[pageid]->hwnd); array[pageid]->hwnd = tmpbox; if(pageidx == dw_notebook_page_get(handle)) { 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; if(!array) return; pageid = _findnotebookid(array, pageidx); if(pageid < 0) return; if(array[pageid]) { SetParent(array[pageid]->hwnd, DW_HWND_OBJECT); 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); } } /* * 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]; 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]; 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]; 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]; 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]; 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]; 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. */ unsigned int API dw_listbox_selected(HWND handle) { char tmpbuf[100]; 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]; 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]; 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]; 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]; 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]; 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((textlen = strlen(buffer)) < 1) return startpoint; startpoint++; tmpbuf = calloc(1, len + textlen + startpoint + 2); if(startpoint < 0) startpoint = 0; if(len) { char *dest, *start; int copylen = len - startpoint; GetWindowText(handle, tmpbuf, len+1); dest = &tmpbuf[startpoint+textlen-1]; start = &tmpbuf[startpoint]; if(copylen > 0) memcpy(dest, start, copylen); } memcpy(&tmpbuf[startpoint], buffer, textlen); SetWindowText(handle, tmpbuf); free(tmpbuf); return (startpoint + textlen - 1); } /* * 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 not * 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) { 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[100]; ColorInfo *cinfo = (ColorInfo *)GetWindowLongPtr(handle, GWLP_USERDATA); sprintf(tmpbuf, "%ld", position); if(cinfo && cinfo->buddy) SetWindowText(cinfo->buddy, tmpbuf); if(IS_IE5PLUS) SendMessage(handle, UDM_SETPOS32, 0, (LPARAM)position); else SendMessage(handle, UDM_SETPOS, 0, (LPARAM)MAKELONG((short)position, 0)); } /* * 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) { if(IS_IE5PLUS) SendMessage(handle, UDM_SETRANGE32, (WPARAM)lower,(LPARAM)upper); else SendMessage(handle, UDM_SETRANGE32, (WPARAM)((short)lower), (LPARAM)((short)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) { if(IS_IE5PLUS) return (long)SendMessage(handle, UDM_GETPOS32, 0, 0); else return (long)SendMessage(handle, UDM_GETPOS, 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]; GetClassName(handle, tmpbuf, 99); if(strnicmp(tmpbuf, BUTTONCLASSNAME, strlen(BUTTONCLASSNAME)+1)==0) { BubbleButton *bubble= (BubbleButton *)GetWindowLongPtr(handle, GWLP_USERDATA); if(bubble && !bubble->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) { BubbleButton *bubble= (BubbleButton *)GetWindowLongPtr(handle, GWLP_USERDATA); if(bubble && !bubble->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; 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 TRUE; } /* * 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 TRUE; } /* * 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) { 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; } /* * 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; char *file; FILE *fp; if ( !data ) return 0; file = tmpnam( NULL ); if ( file != NULL ) { fp = fopen( file, "wb" ); if ( fp != NULL ) { fwrite( data, 1, len, fp ); fclose( fp ); icon = LoadImage( NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE ); } else { unlink( file ); return 0; } unlink( 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; 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) { TreeView_SetImageList(handle, hSmall, TVSIL_NORMAL); } else { ListView_SetImageList(handle, hSmall, LVSIL_SMALL); ListView_SetImageList(handle, hLarge, LVSIL_NORMAL); } lasthwnd = handle; return z; } if(hicon == lookup[z]) { if(lasthwnd != handle) { if(type) { TreeView_SetImageList(handle, hSmall, TVSIL_NORMAL); } else { ListView_SetImageList(handle, hSmall, LVSIL_SMALL); 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; lvi.iItem = row; 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[100], *destptr = textbuffer; int item = (int)dw_window_get_data(handle, "_dw_insertitem"); if(!cinfo || !cinfo->flags || !data) return; flags = cinfo->flags; lvi.mask = LVIF_DI_SETITEM | LVIF_TEXT; lvi.iItem = row + item; lvi.iSubItem = column; if(flags[column] & DW_CFA_BITMAPORICON) { HICON hicon = *((HICON *)data); lvi.mask = LVIF_DI_SETITEM | LVIF_IMAGE; lvi.pszText = NULL; lvi.cchTextMax = 0; lvi.iImage = _lookup_icon(handle, hicon, 0); } else if(flags[column] & DW_CFA_STRING) { char *tmp = *((char **)data); if(!tmp) tmp = ""; lvi.pszText = tmp; lvi.cchTextMax = strlen(tmp); destptr = tmp; } else if(flags[column] & DW_CFA_ULONG) { ULONG tmp = *((ULONG *)data); sprintf(textbuffer, "%lu", tmp); lvi.pszText = textbuffer; lvi.cchTextMax = strlen(textbuffer); } else if(flags[column] & DW_CFA_DATE) { struct tm curtm; CDATE cdate = *((CDATE *)data); /* Safety check... zero dates are crashing * Visual Studio 2008. -Brian */ if(cdate.year > 1900) { curtm.tm_mday = cdate.day; curtm.tm_mon = cdate.month > 0 ? cdate.month - 1 : 0; curtm.tm_year = cdate.year - 1900; strftime(textbuffer, 100, "%x", &curtm); } else { textbuffer[0] = 0; } lvi.pszText = textbuffer; lvi.cchTextMax = strlen(textbuffer); } else if(flags[column] & DW_CFA_TIME) { struct tm curtm; CTIME ctime = *((CTIME *)data); curtm.tm_hour = ctime.hours; curtm.tm_min = ctime.minutes; curtm.tm_sec = ctime.seconds; strftime(textbuffer, 100, "%X", &curtm); lvi.pszText = textbuffer; 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 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); } /* * 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) { LV_ITEM lvi; HWND container = (HWND)pointer; int item = (int)dw_window_get_data(container, "_dw_insertitem"); lvi.iItem = row + item; lvi.iSubItem = 0; lvi.mask = LVIF_PARAM; lvi.lParam = (LPARAM)title; if(!ListView_SetItem(container, &lvi) && lvi.lParam) lvi.lParam = 0; } /* * 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); while ( index != -1 ) { LV_ITEM lvi; memset(&lvi, 0, sizeof(LV_ITEM)); lvi.iItem = index; lvi.mask = LVIF_PARAM; ListView_GetItem( handle, &lvi ); if ( strcmp( (char *)lvi.lParam, text ) == 0 ) { ListView_SetItemState( handle, index, LVIS_FOCUSED | LVIS_SELECTED, LVIS_FOCUSED | LVIS_SELECTED ); 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); while(index != -1) { LV_ITEM lvi; memset(&lvi, 0, sizeof(LV_ITEM)); lvi.iItem = index; lvi.mask = LVIF_PARAM; ListView_GetItem(handle, &lvi); if ( strcmp( (char *)lvi.lParam, text ) == 0 ) { 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++) { LV_ITEM lvi; memset(&lvi, 0, sizeof(LV_ITEM)); lvi.iItem = index; lvi.iSubItem = z; lvi.mask = LVIF_TEXT; lvi.cchTextMax = 1023; lvi.pszText = text; if(ListView_GetItem(handle, &lvi)) { int width = ListView_GetStringWidth(handle, lvi.pszText); if(width > columns[z]) { if(z == 0) columns[z] = width + 20; else columns[z] = width; } } } index = ListView_GetNextItem(handle, index, LVNI_ALL); } /* Set the new sizes */ 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 = 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 = 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,screenx,screeny, 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) { int threadid = dw_thread_id(); if(threadid < 0 || threadid >= THREAD_LIMIT) threadid = 0; value = _internal_color(value); DeleteObject(_hPen[threadid]); DeleteObject(_hBrush[threadid]); _foreground[threadid] = RGB(DW_RED_VALUE(value), DW_GREEN_VALUE(value), DW_BLUE_VALUE(value)); _hPen[threadid] = CreatePen(PS_SOLID, 1, _foreground[threadid]); _hBrush[threadid] = CreateSolidBrush(_foreground[threadid]); } /* 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) { int threadid = dw_thread_id(); if(threadid < 0 || threadid >= THREAD_LIMIT) threadid = 0; value = _internal_color(value); if(value == DW_RGB_TRANSPARENT) _background[threadid] = DW_RGB_TRANSPARENT; else _background[threadid] = RGB(DW_RED_VALUE(value), DW_GREEN_VALUE(value), DW_BLUE_VALUE(value)); } /* 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; int threadid = dw_thread_id(); if(threadid < 0 || threadid >= THREAD_LIMIT) threadid = 0; if(handle) hdcPaint = GetDC(handle); else if(pixmap) hdcPaint = pixmap->hdc; else return; SetPixel(hdcPaint, x, y, _foreground[threadid]); 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; int threadid = dw_thread_id(); if(threadid < 0 || threadid >= THREAD_LIMIT) threadid = 0; if(handle) hdcPaint = GetDC(handle); else if(pixmap) hdcPaint = pixmap->hdc; else return; oldPen = SelectObject(hdcPaint, _hPen[threadid]); 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, _foreground[threadid]); 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) * fill: if true filled * number of points * x[]: X coordinates. * y[]: Y coordinates. */ void API dw_draw_polygon(HWND handle, HPIXMAP pixmap, int fill, int npoints, int *x, int *y) { HDC hdcPaint; HBRUSH oldBrush; HPEN oldPen; POINT *points; int i; int threadid = dw_thread_id(); if(threadid < 0 || threadid >= THREAD_LIMIT) threadid = 0; 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++; } } oldBrush = SelectObject( hdcPaint, _hBrush[threadid] ); oldPen = SelectObject( hdcPaint, _hPen[threadid] ); if ( 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) * x: X coordinate. * y: Y coordinate. * width: Width of rectangle. * height: Height of rectangle. */ void API dw_draw_rect(HWND handle, HPIXMAP pixmap, int fill, int x, int y, int width, int height) { HDC hdcPaint; RECT Rect; int threadid = dw_thread_id(); if(threadid < 0 || threadid >= THREAD_LIMIT) threadid = 0; if(handle) hdcPaint = GetDC(handle); else if(pixmap) hdcPaint = pixmap->hdc; else return; SetRect(&Rect, x, y, x + width , y + height ); if(fill) FillRect(hdcPaint, &Rect, _hBrush[threadid]); else FrameRect(hdcPaint, &Rect, _hBrush[threadid]); 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; int threadid = dw_thread_id(); ColorInfo *cinfo; if(threadid < 0 || threadid >= THREAD_LIMIT) threadid = 0; if(handle) hdc = GetDC(handle); else if(pixmap) hdc = pixmap->hdc; else return; 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; } if(hFont) oldFont = SelectObject(hdc, hFont); SetTextColor(hdc, _foreground[threadid]); if(_background[threadid] == DW_RGB_TRANSPARENT) SetBkMode(hdc, TRANSPARENT); else { SetBkMode(hdc, OPAQUE); SetBkColor(hdc, _background[threadid]); } 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; { 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; COLORREF bkcolor; ULONG cx, cy; 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); #if 0 /* force a CONFIGURE event on the underlying renderbox */ dw_window_get_pos_size( handle, NULL, NULL, &cx, &cy ); SendMessage( handle, WM_SIZE, 0, MAKELPARAM(cx, cy) ); #endif return pixmap; } /* * 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; ULONG cx, cy; char *file = malloc(strlen(filename) + 5); if (!file || !(pixmap = calloc(1,sizeof(struct _hpixmap)))) { if(file) free(file); return NULL; } 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; } } hdc = GetDC(handle); pixmap->handle = handle; pixmap->hbm = (HBITMAP)LoadImage(NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE); if ( !pixmap->hbm ) { free(file); 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 ); free( file ); pixmap->transcolor = DW_RGB_TRANSPARENT; #if 0 /* force a CONFIGURE event on the underlying renderbox */ dw_window_get_pos_size( handle, NULL, NULL, &cx, &cy ); SendMessage( handle, WM_SIZE, 0, MAKELPARAM(cx, cy) ); #endif 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; ULONG cx, cy; if ( !(pixmap = calloc(1,sizeof(struct _hpixmap))) ) { return NULL; } hdc = GetDC(handle); pixmap->handle = handle; file = tmpnam( NULL ); if ( file != NULL ) { fp = fopen( file, "wb" ); if ( fp != NULL ) { fwrite( data, 1, len, fp ); fclose( fp ); pixmap->hbm = (HBITMAP)LoadImage( NULL, file, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE ); } else { unlink( file ); free( pixmap ); return NULL; } unlink( 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; #if 0 /* force a CONFIGURE event on the underlying renderbox */ dw_window_get_pos_size( handle, NULL, NULL, &cx, &cy ); SendMessage( handle, WM_SIZE, 0, MAKELPARAM(cx, cy) ); #endif 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->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; SelectObject(pixmap->hdc, pixmap->hbm); ReleaseDC(handle, hdc); return pixmap; } /* * 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 ); 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) { HDC hdcdest; HDC hdcsrc; HDC hdcMem; if ( dest ) hdcdest = GetDC( dest ); else if ( destp ) hdcdest = destp->hdc; else return; if ( src ) hdcsrc = GetDC( src ); else if ( srcp ) hdcsrc = srcp->hdc; else return; if ( srcp && srcp->transcolor != DW_RGB_TRANSPARENT ) { DrawTransparentBitmap( hdcdest, srcp->hdc, srcp->hbm, xdest, ydest, RGB( DW_RED_VALUE(srcp->transcolor), DW_GREEN_VALUE(srcp->transcolor), DW_BLUE_VALUE(srcp->transcolor)) ); } else { BitBlt( hdcdest, xdest, ydest, width, height, hdcsrc, xsrc, ysrc, SRCCOPY ); } if ( !destp ) ReleaseDC( dest, hdcdest ); if ( !srcp ) ReleaseDC( src, hdcsrc ); } /* 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 -1; *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 -1; if(0 == strlen(name)) return -1; *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); } /* * 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) { return ResetEvent(eve); } /* * 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) { return SetEvent(eve); } /* * 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); if(rc == WAIT_OBJECT_0) return 1; if(rc == WAIT_ABANDONED) return -1; return 0; } /* * 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) return CloseHandle(*eve); return 0; } /* 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) { int rc; rc = ResetEvent(eve); if(!rc) return 1; return 0; } /* 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) { int rc; rc = SetEvent(eve); if(!rc) return 1; return 0; } /* 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); switch (rc) { case WAIT_FAILED: rc = DW_ERROR_TIMEOUT; break; case WAIT_ABANDONED: rc = DW_ERROR_INTERRUPT; break; case WAIT_OBJECT_0: rc = 0; break; } return rc; } /* 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) { int rc; rc = CloseHandle(eve); if(!rc) return 1; return 0; } /* * 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; } /* * 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 return (DWTID)_beginthread((void(*)(void *))func, stack, data); #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(); if ( dbgfp != NULL ) { fclose( dbgfp ); } 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,2000,1000, 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); _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,2000,1000, // resize it later 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; } } /* * 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) { Box *thisbox; /* * 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("dw_box_pack_end()", DW_MB_OK|DW_MB_ERROR, "Danger! Danger! Will Robinson; box and item are the same!"); return; } thisbox = (Box *)GetWindowLongPtr(box, GWLP_USERDATA); if(thisbox) { int z; Item *tmpitem, *thisitem = thisbox->items; char tmpbuf[100]; tmpitem = malloc(sizeof(Item)*(thisbox->count+1)); for(z=0;z<thisbox->count;z++) { tmpitem[z+1] = thisitem[z]; } GetClassName(item, tmpbuf, 99); if(vsize && !height) height = 1; if(hsize && !width) width = 1; if(strnicmp(tmpbuf, FRAMECLASSNAME, strlen(FRAMECLASSNAME)+1)==0) tmpitem[0].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[thisbox->count].type = TYPEITEM; } else { if ( width == 0 && hsize == FALSE ) dw_messagebox("dw_box_pack_end()", 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("dw_box_pack_end()", DW_MB_OK|DW_MB_ERROR, "Height and expand Vertical both unset for box: %x item: %x",box,item); tmpitem[0].type = TYPEITEM; } tmpitem[0].hwnd = item; tmpitem[0].origwidth = tmpitem[0].width = width; tmpitem[0].origheight = tmpitem[0].height = height; tmpitem[0].pad = pad; if(hsize) tmpitem[0].hsize = SIZEEXPAND; else tmpitem[0].hsize = SIZESTATIC; if(vsize) tmpitem[0].vsize = SIZEEXPAND; else tmpitem[0].vsize = SIZESTATIC; 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); } } } } /* * 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 *dw_clipboard_get_text() { HANDLE handle; int threadid = dw_thread_id(); long len; if ( !OpenClipboard( NULL ) ) return NULL; if ( ( handle = GetClipboardData( CF_TEXT) ) == NULL ) { CloseClipboard(); return NULL; } len = strlen( (char *)handle ); if ( threadid < 0 || threadid >= THREAD_LIMIT ) threadid = 0; if ( _clipboard_contents[threadid] != NULL ) { GlobalFree( _clipboard_contents[threadid] ); } _clipboard_contents[threadid] = (char *)GlobalAlloc(GMEM_FIXED, len + 1); if ( !_clipboard_contents[threadid] ) { CloseClipboard(); return NULL; } strcpy( (char *)_clipboard_contents[threadid], (char *)handle ); CloseClipboard(); return _clipboard_contents[threadid]; } /* * Sets the contents of the default clipboard to the supplied text. * Parameters: * Text. */ void 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(); if ( !SetClipboardData( CF_TEXT, ptr1 ) ) { GlobalFree( ptr1 ); return; } 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; env->DWSubVersion = DW_SUB_VERSION; } /* * 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] = ""; char filterbuf[1000] = ""; int rc; BROWSEINFO bi; TCHAR szDir[MAX_PATH]; LPITEMIDLIST pidl; LPMALLOC pMalloc; if ( flags == DW_DIRECTORY_OPEN ) { #if 0 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)) { strcpy(filenamebuf,szDir); } // 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 { 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.lpstrInitialDir = defpath; of.lpstrTitle = title; 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, 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 -1; return 1; } /* * 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]) { /* Figure out how to do this the "Windows way" */ char *home = getenv("HOME"); if(home) strcpy(_user_dir, home); else strcpy(_user_dir, "C:\\"); } return _user_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 = NULL, *tmp = *root; while(tmp) { prev = tmp; tmp = tmp->next; } if(prev) prev->next = new; else *root = 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[15]; HWND owner; sprintf(buffer, "_dw_id%d", (int)window); owner = (HWND)dw_window_get_data(DW_HWND_OBJECT, buffer); if (owner) { id = (ULONG)window; window = owner; dw_window_set_data(DW_HWND_OBJECT, buffer, 0); } else { /* If it is a popup menu clear all entries */ dw_signal_disconnect_by_window(window); } } _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(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(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(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; } } }