static int winFrameMapMethod(Ihandle* ih)
{
char *title;
DWORD dwStyle = WS_CHILD|WS_CLIPSIBLINGS|
BS_OWNERDRAW, /* owner draw necessary because BS_GROUPBOX does not work ok */
dwExStyle = 0;
if (!ih->parent)
return IUP_ERROR;
title = iupAttribGet(ih, "TITLE");
if (title)
iupAttribSetStr(ih, "_IUPFRAME_HAS_TITLE", "1");
if (iupAttribGetBoolean(IupGetDialog(ih), "COMPOSITED"))
dwExStyle |= WS_EX_COMPOSITED;
else
dwStyle |= WS_CLIPCHILDREN;
if (!iupwinCreateWindowEx(ih, "BUTTON", dwExStyle, dwStyle))
return IUP_ERROR;
/* replace the WinProc to handle other messages */
IupSetCallback(ih, "_IUPWIN_CTRLPROC_CB", (Icallback)winFrameProc);
/* Process WM_DRAWITEM */
IupSetCallback(ih, "_IUPWIN_DRAWITEM_CB", (Icallback)winFrameDrawItem);
return IUP_NOERROR;
}
static HWND winTipsCreate(HWND hParent)
{
RECT rect = {1,1,1,1};
HWND tips_hwnd = iupwinCreateWindowEx(hParent, TOOLTIPS_CLASS, WS_EX_TOPMOST, TTS_ALWAYSTIP|TTS_NOPREFIX, 0, NULL);
SendMessage(tips_hwnd, TTM_SETMAXTIPWIDTH, 0, (LPARAM)(INT)3000);
SendMessage(tips_hwnd, TTM_SETMARGIN, (WPARAM)0, (LPARAM)&rect);
return tips_hwnd;
}
static int winButtonMapMethod(Ihandle* ih)
{
char* value;
DWORD dwStyle = WS_CHILD | WS_CLIPSIBLINGS |
BS_NOTIFY; /* necessary because of the base messages */
if (!ih->parent)
return IUP_ERROR;
/* Buttons with the BS_PUSHBUTTON style do NOT use the returned brush in WM_CTLCOLORBTN.
Buttons with these styles are always drawn with the default system colors.
So FGCOLOR and BGCOLOR do NOT work.
The BS_FLAT style does NOT completely remove the borders. With XP styles is ignored.
So FLAT do NOT work.
BCM_SETTEXTMARGIN is not working.
Buttons with images and with XP styles do NOT draw the focus feedback.
Can NOT remove the borders when using IMPRESS.
So IUP will draw its own button,
but uses the Windows functions to draw text and images in native format. */
if (iupwin_comctl32ver6)
dwStyle |= BS_PUSHBUTTON; /* it will be an ownerdraw because we use NM_CUSTOMDRAW */
else
dwStyle |= BS_OWNERDRAW;
value = iupAttribGet(ih, "IMAGE");
if (value)
{
ih->data->type = IUP_BUTTON_IMAGE;
value = iupAttribGet(ih, "TITLE");
if (value && *value!=0)
ih->data->type |= IUP_BUTTON_TEXT;
}
else
ih->data->type = IUP_BUTTON_TEXT;
if (iupAttribGetBoolean(ih, "CANFOCUS"))
dwStyle |= WS_TABSTOP;
if (!iupwinCreateWindowEx(ih, "BUTTON", 0, dwStyle))
return IUP_ERROR;
/* Process WM_COMMAND */
IupSetCallback(ih, "_IUPWIN_COMMAND_CB", (Icallback)winButtonWmCommand);
/* Process BUTTON_CB */
IupSetCallback(ih, "_IUPWIN_CTRLPROC_CB", (Icallback)winButtonProc);
if (iupwin_comctl32ver6)
IupSetCallback(ih, "_IUPWIN_NOTIFY_CB", (Icallback)winButtonWmNotify); /* Process WM_NOTIFY */
else
IupSetCallback(ih, "_IUPWIN_DRAWITEM_CB", (Icallback)winButtonDrawItem); /* Process WM_DRAWITEM */
return IUP_NOERROR;
}
static int winLabelMapMethod(Ihandle* ih)
{
char* value;
DWORD dwStyle = WS_CHILD | WS_CLIPSIBLINGS |
SS_NOTIFY; /* SS_NOTIFY is necessary because of the base messages */
if (!ih->parent)
return IUP_ERROR;
value = iupAttribGet(ih, "SEPARATOR");
if (value)
{
if (iupStrEqualNoCase(value, "HORIZONTAL"))
{
ih->data->type = IUP_LABEL_SEP_HORIZ;
dwStyle |= SS_ETCHEDHORZ;
}
else /* "VERTICAL" */
{
ih->data->type = IUP_LABEL_SEP_VERT;
dwStyle |= SS_ETCHEDVERT;
}
}
else
{
/* The lack for good alignment support in STATIC control forces IUP to draw its own label,
but uses the Windows functions to draw text and images in native format. */
dwStyle |= SS_OWNERDRAW;
value = iupAttribGet(ih, "IMAGE");
if (value)
ih->data->type = IUP_LABEL_IMAGE;
else
ih->data->type = IUP_LABEL_TEXT;
}
if (!iupwinCreateWindowEx(ih, "STATIC", 0, dwStyle))
return IUP_ERROR;
if (ih->data->type != IUP_LABEL_SEP_HORIZ && ih->data->type != IUP_LABEL_SEP_VERT)
{
/* replace the WinProc to handle other messages */
IupSetCallback(ih, "_IUPWIN_CTRLPROC_CB", (Icallback)winLabelProc);
IupSetCallback(ih, "_IUPWIN_DRAWITEM_CB", (Icallback)winLabelDrawItem);
}
/* configure for DRAG&DROP of files */
if (IupGetCallback(ih, "DROPFILES_CB"))
iupAttribSetStr(ih, "DRAGDROP", "YES");
return IUP_NOERROR;
}
int iupwinCreateWindow(Ihandle* ih, LPCTSTR lpClassName, DWORD dwExStyle, DWORD dwStyle, void* clientdata)
{
ih->serial = iupDialogGetChildId(ih);
ih->handle = iupwinCreateWindowEx(iupChildTreeGetNativeParentHandle(ih), lpClassName, dwExStyle, dwStyle, ih->serial, clientdata);
if (!ih->handle)
return 0;
/* associate HWND with Ihandle*, all Win32 controls must call this. */
iupwinHandleAdd(ih, ih->handle);
/* replace the WinProc to handle base callbacks */
iupwinChangeWndProc(ih, iupwinBaseWndProc);
return 1;
}
static int winProgressBarMapMethod(Ihandle* ih)
{
DWORD dwStyle = WS_CHILD;
if (!ih->parent)
return IUP_ERROR;
if (iupStrEqualNoCase(iupAttribGetStr(ih, "ORIENTATION"), "VERTICAL"))
{
dwStyle |= PBS_VERTICAL;
if (ih->currentheight < ih->currentwidth)
{
int tmp = ih->currentheight;
ih->currentheight = ih->currentwidth;
ih->currentwidth = tmp;
}
}
if (!iupwin_comctl32ver6 && !iupStrBoolean(iupAttribGetStr(ih, "DASHED")))
dwStyle |= PBS_SMOOTH;
if (iupwin_comctl32ver6 && iupStrBoolean(iupAttribGetStr(ih, "MARQUEE")))
{
dwStyle |= PBS_MARQUEE;
ih->data->marquee = 1;
}
if (!iupwinCreateWindowEx(ih, PROGRESS_CLASS, 0, dwStyle))
return IUP_ERROR;
/* configure the native range */
SendMessage(ih->handle, PBM_SETRANGE, 0, MAKELPARAM(0, IUP_PB_MAX));
return IUP_NOERROR;
}
static int winValMapMethod(Ihandle* ih)
{
DWORD dwStyle = WS_CHILD | WS_CLIPSIBLINGS | TBS_AUTOTICKS;
int show_ticks;
if (!ih->parent)
return IUP_ERROR;
/* Track bar Orientation */
if (ih->data->type == IVAL_HORIZONTAL)
dwStyle |= TBS_HORZ;
else
dwStyle |= TBS_VERT;
if (iupAttribGetBoolean(ih, "CANFOCUS"))
dwStyle |= WS_TABSTOP;
/* Track bar Ticks */
show_ticks = iupAttribGetInt(ih, "SHOWTICKS");
if (!show_ticks)
{
dwStyle |= TBS_NOTICKS; /* No show_ticks */
}
else
{
char* tickspos;
if (show_ticks<2) show_ticks=2;
ih->data->show_ticks = show_ticks; /* non zero value, can be changed later, but not to zero */
/* Defines the position of tick marks */
tickspos = iupAttribGetStr(ih, "TICKSPOS");
if(iupStrEqualNoCase(tickspos, "BOTH"))
dwStyle |= TBS_BOTH;
else if(iupStrEqualNoCase(tickspos, "REVERSE"))
dwStyle |= TBS_BOTTOM; /* same as TBS_RIGHT */
else /* NORMAL */
dwStyle |= TBS_TOP; /* same as TBS_LEFT */
}
if (!iupwinCreateWindowEx(ih, TRACKBAR_CLASS, 0, dwStyle))
return IUP_ERROR;
/* Process Keyboard */
IupSetCallback(ih, "_IUPWIN_CTRLPROC_CB", (Icallback)winValProc);
/* Process Val Scroll commands */
IupSetCallback(ih, "_IUPWIN_CUSTOMSCROLL_CB", (Icallback)winValCustomScroll);
/* Process background color */
IupSetCallback(ih, "_IUPWIN_CTLCOLOR_CB", (Icallback)winValCtlColor);
/* configure the native range */
SendMessage(ih->handle, TBM_SETRANGEMIN, FALSE, 0);
SendMessage(ih->handle, TBM_SETRANGEMAX, FALSE, SHRT_MAX);
if (ih->data->inverted)
SendMessage(ih->handle, TBM_SETPOS, FALSE, SHRT_MAX); /* default initial position is at MIN */
return IUP_NOERROR;
}
static int winListMapMethod(Ihandle* ih)
{
char* class_name;
DWORD dwStyle = WS_CHILD|WS_CLIPSIBLINGS,
dwExStyle = WS_EX_CLIENTEDGE;
if (!ih->parent)
return IUP_ERROR;
if (ih->data->is_dropdown || ih->data->has_editbox)
{
class_name = "COMBOBOX";
dwStyle |= CBS_NOINTEGRALHEIGHT;
if (ih->data->is_dropdown)
dwStyle |= WS_VSCROLL|WS_HSCROLL;
else if (ih->data->sb)
{
dwStyle |= WS_VSCROLL|WS_HSCROLL;
if (!iupAttribGetBoolean(ih, "AUTOHIDE"))
dwStyle |= CBS_DISABLENOSCROLL;
}
if (ih->data->has_editbox)
{
dwStyle |= CBS_AUTOHSCROLL;
if (ih->data->is_dropdown)
dwStyle |= CBS_DROPDOWN; /* hidden-list+edit */
else
dwStyle |= CBS_SIMPLE; /* visible-list+edit */
}
else
dwStyle |= CBS_DROPDOWNLIST; /* hidden-list */
if (iupAttribGetBoolean(ih, "SORT"))
dwStyle |= CBS_SORT;
}
else
{
class_name = "LISTBOX";
dwStyle |= LBS_NOINTEGRALHEIGHT|LBS_NOTIFY;
if (ih->data->is_multiple)
dwStyle |= LBS_EXTENDEDSEL;
if (ih->data->sb)
{
dwStyle |= WS_VSCROLL|WS_HSCROLL;
if (!iupAttribGetBoolean(ih, "AUTOHIDE"))
dwStyle |= LBS_DISABLENOSCROLL;
}
if (iupAttribGetBoolean(ih, "SORT"))
dwStyle |= LBS_SORT;
}
if (iupAttribGetBoolean(ih, "CANFOCUS"))
dwStyle |= WS_TABSTOP;
if (!iupwinCreateWindowEx(ih, class_name, dwExStyle, dwStyle))
return IUP_ERROR;
/* Custom Procedure */
IupSetCallback(ih, "_IUPWIN_CTRLPROC_CB", (Icallback)winListProc);
/* Process background color */
IupSetCallback(ih, "_IUPWIN_CTLCOLOR_CB", (Icallback)winListCtlColor);
/* Process WM_COMMAND */
IupSetCallback(ih, "_IUPWIN_COMMAND_CB", (Icallback)winListWmCommand);
if (ih->data->is_dropdown || ih->data->has_editbox)
{
COMBOBOXINFO boxinfo;
ZeroMemory(&boxinfo, sizeof(COMBOBOXINFO));
boxinfo.cbSize = sizeof(COMBOBOXINFO);
GetComboBoxInfo(ih->handle, &boxinfo);
iupwinHandleAdd(ih, boxinfo.hwndList);
iupAttribSetStr(ih, "_IUPWIN_LISTBOX", (char*)boxinfo.hwndList);
/* subclass the list box. */
IupSetCallback(ih, "_IUPWIN_LISTOLDPROC_CB", (Icallback)GetWindowLongPtr(boxinfo.hwndList, GWLP_WNDPROC));
SetWindowLongPtr(boxinfo.hwndList, GWLP_WNDPROC, (LONG_PTR)winListComboListWinProc);
if (ih->data->has_editbox)
{
iupwinHandleAdd(ih, boxinfo.hwndItem);
iupAttribSetStr(ih, "_IUPWIN_EDITBOX", (char*)boxinfo.hwndItem);
/* subclass the edit box. */
IupSetCallback(ih, "_IUPWIN_EDITOLDPROC_CB", (Icallback)GetWindowLongPtr(boxinfo.hwndItem, GWLP_WNDPROC));
SetWindowLongPtr(boxinfo.hwndItem, GWLP_WNDPROC, (LONG_PTR)winListEditWinProc);
/* set defaults */
SendMessage(ih->handle, CB_LIMITTEXT, 0, 0L);
}
}
/* configure for DRAG&DROP */
if (IupGetCallback(ih, "DROPFILES_CB"))
iupAttribSetStr(ih, "DRAGDROP", "YES");
IupSetCallback(ih, "_IUP_XY2POS_CB", (Icallback)winListConvertXYToPos);
iupListSetInitialItems(ih);
return IUP_NOERROR;
}
static int winTabsMapMethod(Ihandle* ih)
{
DWORD dwStyle = WS_CHILD | WS_CLIPSIBLINGS | TCS_HOTTRACK | WS_TABSTOP,
dwExStyle = 0;
if (!ih->parent)
return IUP_ERROR;
if (ih->data->type == ITABS_BOTTOM)
dwStyle |= TCS_BOTTOM;
else if (ih->data->type == ITABS_RIGHT)
dwStyle |= TCS_VERTICAL|TCS_RIGHT;
else if (ih->data->type == ITABS_LEFT)
dwStyle |= TCS_VERTICAL;
if (ih->data->is_multiline)
dwStyle |= TCS_MULTILINE;
iupwinGetNativeParentStyle(ih, &dwExStyle, &dwStyle);
if (dwExStyle & WS_EX_COMPOSITED && !ih->data->is_multiline && iupwinIsVista())
{
/* workaround for composite bug in Vista */
ih->data->is_multiline = 1;
dwStyle |= TCS_MULTILINE;
}
if (!iupwinCreateWindowEx(ih, WC_TABCONTROL, dwExStyle, dwStyle))
return IUP_ERROR;
/* replace the WinProc to handle other messages */
IupSetCallback(ih, "_IUPWIN_CTRLPROC_CB", (Icallback)winTabsProc);
/* Process WM_NOTIFY */
IupSetCallback(ih, "_IUPWIN_NOTIFY_CB", (Icallback)winTabsWmNotify);
/* Process background color */
IupSetCallback(ih, "_IUPWIN_CTLCOLOR_CB", (Icallback)winTabsCtlColor);
if (iupwin_comctl32ver6 && ih->data->type != ITABS_TOP)
{
/* XP Styles support only TABTYPE=TOP */
iupwinDrawRemoveTheme(ih->handle);
}
/* Change children background */
if (winTabsUsingXPStyles(ih))
{
char* color = iupAttribGetInheritNativeParent(ih, "BGCOLOR");
if (!color)
color = iupAttribGetInheritNativeParent(ih, "BACKGROUND");
if (!color)
{
COLORREF cr;
if (iupwinDrawGetThemeTabsBgColor(ih->handle, &cr))
iupAttribSetStrf(ih, "BACKGROUND", "%d %d %d", (int)GetRValue(cr), (int)GetGValue(cr), (int)GetBValue(cr));
}
}
/* Create pages and tabs */
if (ih->firstchild)
{
Ihandle* child;
for (child = ih->firstchild; child; child = child->brother)
winTabsChildAddedMethod(ih, child);
}
return IUP_NOERROR;
}
static int winToggleMapMethod(Ihandle* ih)
{
Ihandle* radio = iupRadioFindToggleParent(ih);
char* value;
DWORD dwStyle = WS_CHILD | WS_CLIPSIBLINGS |
BS_NOTIFY; /* necessary because of the base messages */
if (!ih->parent)
return IUP_ERROR;
if (radio)
ih->data->radio = 1;
value = iupAttribGet(ih, "IMAGE");
if (value)
{
ih->data->type = IUP_TOGGLE_IMAGE;
dwStyle |= BS_BITMAP|BS_PUSHLIKE;
}
else
{
ih->data->type = IUP_TOGGLE_TEXT;
dwStyle |= BS_TEXT|BS_MULTILINE;
if (iupAttribGetBoolean(ih, "RIGHTBUTTON"))
dwStyle |= BS_RIGHTBUTTON;
}
if (iupAttribGetBoolean(ih, "CANFOCUS"))
dwStyle |= WS_TABSTOP;
if (radio)
{
dwStyle |= BS_RADIOBUTTON;
if (!iupAttribGet(radio, "_IUPWIN_LASTTOGGLE"))
{
/* this is the first toggle in the radio, and the last toggle with VALUE=ON */
iupAttribSetStr(ih, "VALUE","ON");
}
}
else
{
if (ih->data->type == IUP_TOGGLE_TEXT && iupAttribGetBoolean(ih, "3STATE"))
dwStyle |= BS_AUTO3STATE;
else
dwStyle |= BS_AUTOCHECKBOX;
}
if (!iupwinCreateWindowEx(ih, "BUTTON", 0, dwStyle))
return IUP_ERROR;
/* Process WM_COMMAND */
IupSetCallback(ih, "_IUPWIN_COMMAND_CB", (Icallback)winToggleWmCommand);
/* Process background color */
IupSetCallback(ih, "_IUPWIN_CTLCOLOR_CB", (Icallback)winToggleCtlColor);
if (ih->data->type == IUP_TOGGLE_IMAGE)
{
if (iupwin_comctl32ver6)
IupSetCallback(ih, "_IUPWIN_NOTIFY_CB", (Icallback)winToggleWmNotify); /* Process WM_NOTIFY */
else
{
IupSetCallback(ih, "_IUPWIN_CTRLPROC_CB", (Icallback)winToggleProc);
iupAttribSetStr(ih, "_IUPWIN_ACTIVE", "YES");
}
}
return IUP_NOERROR;
}
