/*
###########################################################################
# (@)PACKAGE:Win32::GUI::Combobox
#
# $Id: Combobox.xs,v 1.9 2007/07/15 18:23:06 robertemay Exp $
#
###########################################################################
*/
#include "GUI.h"
void Combobox_onPreCreate(NOTXSPROC LPPERLWIN32GUI_CREATESTRUCT perlcs) {
perlcs->cs.lpszClass = "COMBOBOX";
perlcs->cs.style = WS_VISIBLE | WS_CHILD;
perlcs->cs.dwExStyle = WS_EX_CLIENTEDGE;
}
BOOL
Combobox_onParseOption(NOTXSPROC char *option, SV* value, LPPERLWIN32GUI_CREATESTRUCT perlcs) {
BOOL retval = TRUE;
if BitmaskOptionValue("-autohscroll", perlcs->cs.style, CBS_AUTOHSCROLL)
} else if BitmaskOptionValue("-disablenoscroll", perlcs->cs.style, CBS_DISABLENOSCROLL)
} else if BitmaskOptionValue("-hasstring", perlcs->cs.style, CBS_HASSTRINGS)
} else if BitmaskOptionValue("-lowercase", perlcs->cs.style, CBS_LOWERCASE)
} else if BitmaskOptionValue("-nointegraleheight", perlcs->cs.style, CBS_NOINTEGRALHEIGHT)
} else if BitmaskOptionValue("-sort", perlcs->cs.style, CBS_SORT)
} else if BitmaskOptionValue("-uppercase", perlcs->cs.style, CBS_UPPERCASE)
}
else if(strcmp(option, "-simple") == 0) {
perlcs->cs.style &= ~CBS_DROPDOWNLIST;
perlcs->cs.style |= CBS_SIMPLE;
}
else if(strcmp(option, "-dropdown") == 0) {
perlcs->cs.style &= ~CBS_DROPDOWNLIST;
perlcs->cs.style |= CBS_DROPDOWN;
}
else if(strcmp(option, "-dropdownlist") == 0) {
perlcs->cs.style |= CBS_DROPDOWNLIST;
}
else
retval = FALSE;
return retval;
}
void
Combobox_onPostCreate(NOTXSPROC HWND myhandle, LPPERLWIN32GUI_CREATESTRUCT perlcs) {
}
BOOL
Combobox_onParseEvent(NOTXSPROC char *name, int* eventID) {
BOOL retval = TRUE;
if Parse_Event("GotFocus", PERLWIN32GUI_NEM_GOTFOCUS)
else if Parse_Event("LostFocus", PERLWIN32GUI_NEM_LOSTFOCUS)
else if Parse_Event("DblClick", PERLWIN32GUI_NEM_DBLCLICK)
else if Parse_Event("Change", PERLWIN32GUI_NEM_CONTROL1)
else if Parse_Event("Anonymous", PERLWIN32GUI_NEM_CONTROL2)
else if Parse_Event("DropDown", PERLWIN32GUI_NEM_CONTROL3)
else if Parse_Event("CloseUp", PERLWIN32GUI_NEM_CONTROL4)
else retval = FALSE;
return retval;
}
int
Combobox_onEvent (NOTXSPROC LPPERLWIN32GUI_USERDATA perlud, UINT uMsg, WPARAM wParam, LPARAM lParam) {
int PerlResult = 1;
if ( uMsg == WM_COMMAND ) {
switch(HIWORD(wParam)) {
case CBN_SETFOCUS:
/*
* (@)EVENT:GotFocus()
* Sent when the control is activated.
* (@)APPLIES_TO:Combobox, ComboboxEx
*/
PerlResult = DoEvent(NOTXSCALL perlud, PERLWIN32GUI_NEM_GOTFOCUS, "GotFocus", -1 );
break;
case CBN_KILLFOCUS:
/*
* (@)EVENT:LostFocus()
* Sent when the control is deactivated.
* (@)APPLIES_TO:Combobox, ComboboxEx
*/
PerlResult = DoEvent(NOTXSCALL perlud, PERLWIN32GUI_NEM_LOSTFOCUS, "LostFocus", -1 );
break;
case CBN_DBLCLK:
/*
* (@)EVENT:DblClick()
* Sent when the user double clicks on an item from the Combobox
* (@)APPLIES_TO:Combobox, ComboboxEx
*/
PerlResult = DoEvent(NOTXSCALL perlud, PERLWIN32GUI_NEM_DBLCLICK, "DblClick", -1 );
break;
case CBN_SELCHANGE:
/*
* (@)EVENT:Change()
* Sent when the user selects an item from the Combobox
* (@)APPLIES_TO:Combobox, ComboboxEx
*/
PerlResult = DoEvent(NOTXSCALL perlud, PERLWIN32GUI_NEM_CONTROL1, "Change", -1 );
break;
case CBN_DROPDOWN:
/*
* (@)EVENT:DropDown()
* Sent when the user selects the list box. This event allows you to populate the
* dropdown dynamically. This event is only fired if the combo box has the CBS_DROPDOWN or CBS_DROPDOWNLIST style.
* (@)APPLIES_TO:Combobox, ComboboxEx
*/
PerlResult = DoEvent(NOTXSCALL perlud, PERLWIN32GUI_NEM_CONTROL3, "DropDown", -1 );
break;
case CBN_CLOSEUP:
/*
* (@)EVENT:CloseUp()
* Sent when the list box of a combo box has been closed. This event allows you to populate the
* dropdown dynamically. This event is only fired if the combo box has the CBS_DROPDOWN or CBS_DROPDOWNLIST style.
*
* If the user changed the current selection, the combo box also sends the Change event when the drop-down list closes.
* In general, you cannot predict the order in which notifications will be sent. In particular, a Change event message
* may occur either before or after a CloseUp event.
* (@)APPLIES_TO:Combobox, ComboboxEx
*/
PerlResult = DoEvent(NOTXSCALL perlud, PERLWIN32GUI_NEM_CONTROL4, "CloseUp", -1 );
break;
default:
PerlResult = DoEvent(NOTXSCALL perlud, PERLWIN32GUI_NEM_CONTROL2, "Anonymous",
PERLWIN32GUI_ARGTYPE_INT, HIWORD(wParam),
-1 );
break;
}
}
return PerlResult;
}
/*
###########################################################################
# (@)PACKAGE:Win32::GUI::ComboboxEx
###########################################################################
*/
void ComboboxEx_onPreCreate(NOTXSPROC LPPERLWIN32GUI_CREATESTRUCT perlcs) {
perlcs->cs.lpszClass = WC_COMBOBOXEX;
perlcs->cs.style = WS_VISIBLE | WS_CHILD;
}
BOOL
ComboboxEx_onParseOption(NOTXSPROC char *option, SV* value, LPPERLWIN32GUI_CREATESTRUCT perlcs) {
BOOL retval = TRUE;
if(strcmp(option, "-imagelist") == 0) {
perlcs->hImageList = (HIMAGELIST) handle_From(NOTXSCALL value);
} else if BitmaskOptionValueMask("-casesensitive", perlcs->dwFlags, CBES_EX_CASESENSITIVE )
} else if BitmaskOptionValueMask("-noeditimage", perlcs->dwFlags, CBES_EX_NOEDITIMAGE )
} else if BitmaskOptionValueMask("-noeditimageindent", perlcs->dwFlags, CBES_EX_NOEDITIMAGEINDENT )
} else if BitmaskOptionValueMask("-nosizelimit", perlcs->dwFlags, CBES_EX_NOSIZELIMIT )
} else retval = Combobox_onParseOption (NOTXSCALL option, value, perlcs);
return retval;
}
void
ComboboxEx_onPostCreate(NOTXSPROC HWND myhandle, LPPERLWIN32GUI_CREATESTRUCT perlcs) {
if(perlcs->hImageList != NULL) {
SendMessage(myhandle, CBEM_SETIMAGELIST, 0, (LPARAM) perlcs->hImageList);
}
if ( perlcs->dwFlagsMask != 0) {
SendMessage(myhandle, CBEM_SETEXTENDEDSTYLE, (WPARAM) perlcs->dwFlagsMask, (LPARAM) perlcs->dwFlags);
}
}
BOOL
ComboboxEx_onParseEvent(NOTXSPROC char *name, int* eventID) {
return Combobox_onParseEvent(NOTXSCALL name, eventID);;
}
int
ComboboxEx_onEvent (NOTXSPROC LPPERLWIN32GUI_USERDATA perlud, UINT uMsg, WPARAM wParam, LPARAM lParam) {
return Combobox_onEvent (NOTXSCALL perlud, uMsg, wParam, lParam);
}
MODULE = Win32::GUI::Combobox PACKAGE = Win32::GUI::Combobox
PROTOTYPES: DISABLE
###########################################################################
# (@)PACKAGE:Win32::GUI::Combobox
###########################################################################
#pragma message( "*** PACKAGE Win32::GUI::Combobox..." )
###########################################################################
# (@)METHOD:AddString(STRING)
# Adds an item at the end of the control's list.
LRESULT
AddString(handle,string)
HWND handle
LPCTSTR string
CODE:
RETVAL = SendMessage(handle, CB_ADDSTRING, 0, (LPARAM) string);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:DeleteString(INDEX)
# (@)METHOD:RemoveItem(INDEX)
# Removes the zero-based INDEX item from the Combobox.
LRESULT
DeleteString(handle,index)
HWND handle
WPARAM index
ALIAS:
Win32::GUI::Combobox::RemoveItem = 1
CODE:
RETVAL = SendMessage(handle, CB_DELETESTRING, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:Dir(PATH, [FLAG])
# Add a list of filenames.
LRESULT
Dir(handle, path, flag = DDL_ARCHIVE | DDL_DIRECTORY | DDL_DRIVES | DDL_READWRITE)
HWND handle
LPCTSTR path
WPARAM flag
CODE:
RETVAL = SendMessage(handle, CB_DIR, flag, (LPARAM) path);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:FindString(STRING, [INDEX])
# Search item beginning with specified string.
LRESULT
FindString(handle,string,index=-1)
HWND handle
LPCTSTR string
long index
CODE:
RETVAL = SendMessage(handle, CB_FINDSTRING, (WPARAM) index, (LPARAM) string);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:FindStringExact(STRING, [INDEX])
# Search item that match specified string.
LRESULT
FindStringExact(handle,string,index=-1)
HWND handle
LPCTSTR string
long index
CODE:
RETVAL = SendMessage(handle, CB_FINDSTRINGEXACT, (WPARAM) index, (LPARAM) string);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:Count()
# (@)METHOD:GetCount()
# Return the number of items.
LRESULT
GetCount(handle)
HWND handle
ALIAS:
Win32::GUI::Combobox::Count = 1
CODE:
RETVAL = SendMessage(handle, CB_GETCOUNT, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetCurSel()
# (@)METHOD:ListIndex()
# (@)METHOD:SelectedItem()
# Returns the zero-based index of the currently selected item, or -1 if
# no item is selected.
LRESULT
GetCurSel(handle)
HWND handle
ALIAS:
Win32::GUI::Combobox::SelectedItem = 1
Win32::GUI::Combobox::ListIndex = 2
CODE:
RETVAL = SendMessage(handle, CB_GETCURSEL, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetDroppedControlRect()
# Retrieves screen coordinates of the drop-down list box.
void
GetDroppedControlRect(handle)
HWND handle
PREINIT:
RECT myRect;
PPCODE:
SendMessage(handle, CB_GETDROPPEDCONTROLRECT, 0, (LPARAM) &myRect);
EXTEND(SP, 4);
XST_mIV(0, myRect.left);
XST_mIV(1, myRect.top);
XST_mIV(2, myRect.right);
XST_mIV(3, myRect.bottom);
XSRETURN(4);
###########################################################################
# (@)METHOD:GetDroppedState()
# Determine whether the list box of a combo box is dropped down.
LRESULT
GetDroppedState(handle)
HWND handle
CODE:
RETVAL = SendMessage(handle, CB_GETDROPPEDSTATE, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetDroppedWidth()
# Retrieve the minimum allowable width, in pixels, of the list box af a Combobox with the CBS_DROPDOWN or CBS_DROPDOWNLIST style.
LRESULT
GetDroppedWidth(handle)
HWND handle
CODE:
RETVAL = SendMessage(handle, CB_GETDROPPEDWIDTH, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetEditSel()
# Get the starting and ending character positions of the current selection in the edit control of a Combobox.
void
GetEditSel(handle)
HWND handle
PREINIT:
DWORD start;
DWORD end;
PPCODE:
SendMessage(handle, CB_GETEDITSEL, (WPARAM) &start, (LPARAM) &end);
EXTEND(SP, 2);
XST_mIV(0, (long) start);
XST_mIV(1, (long) end);
XSRETURN(2);
###########################################################################
# (@)METHOD:GetExtendedUI()
# Determine whether a combo box has the default user interface or the extended user interface.
LRESULT
GetExtendedUI(handle)
HWND handle
CODE:
RETVAL = SendMessage(handle, CB_GETEXTENDEDUI, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetHorizontalExtent()
# Retrieve from a combo box the width, in pixels, by which the list box can be scrolled horizontally (the scrollable width).
LRESULT
GetHorizontalExtent(handle)
HWND handle
CODE:
RETVAL = SendMessage(handle, CB_GETHORIZONTALEXTENT, 0, 0);
OUTPUT:
RETVAL
# TODO : CB_GETITEMDATA : Store SV* ?
###########################################################################
# (@)METHOD:GetItemHeight(INDEX)
# Determine the height of list items or the selection field in a combo box.
LRESULT
GetItemHeight(handle, index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CB_GETITEMHEIGHT, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetLBText(INDEX)
# (@)METHOD:GetString(INDEX)
# Returns the string at the specified zero-based INDEX in the Combobox.
void
GetLBText(handle,index)
HWND handle
WPARAM index
ALIAS:
Win32::GUI::Combobox::GetString = 1
PREINIT:
STRLEN cbString;
char *szString;
PPCODE:
cbString = SendMessage(handle, CB_GETLBTEXTLEN, index, 0);
if(cbString != LB_ERR) {
szString = (char *) safemalloc(cbString+1);
if(SendMessage(handle, CB_GETLBTEXT,
index, (LPARAM) (LPCTSTR) szString) != LB_ERR) {
EXTEND(SP, 1);
XST_mPV(0, szString);
safefree(szString);
XSRETURN(1);
} else {
safefree(szString);
XSRETURN_UNDEF;
}
} else {
XSRETURN_UNDEF;
}
###########################################################################
# (@)METHOD:GetLBTextLen(INDEX)
# Retrieve the length, in characters, of a string in the list of a combo box.
LRESULT
GetLBTextLen(handle,index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CB_GETLBTEXTLEN, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetLocale()
# Retrieve the current locale of the Combobox.
LRESULT
GetLocale(handle)
HWND handle
CODE:
RETVAL = SendMessage(handle, CB_GETLOCALE, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetTopIndex()
# Retrieve the zero-based index of the first visible item in the list box portion of a Combobox.
LRESULT
GetTopIndex(handle)
HWND handle
CODE:
RETVAL = SendMessage(handle, CB_GETTOPINDEX, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:InitStorage(count,size)
# Allocates memory for storing list box items.
LRESULT
InitStorage(handle,count,size)
HWND handle
WPARAM count
WPARAM size
CODE:
RETVAL = SendMessage(handle, CB_INITSTORAGE, count, (LPARAM) size);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:InsertString(STRING, [INDEX])
# (@)METHOD:InsertItem(STRING, [INDEX])
# Inserts an item at the specified zero-based INDEX in the Combobox,
# or adds it at the end if INDEX is not specified.
LRESULT
InsertString(handle,string,index=-1)
HWND handle
LPCTSTR string
long index
ALIAS:
Win32::GUI::Combobox::InsertItem = 1
CODE:
RETVAL = SendMessage(handle, CB_INSERTSTRING, (WPARAM) index, (LPARAM) string);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:LimitText(SIZE)
# Set limit of the text length the user may type into the Textfield of a Combobox.
LRESULT
LimitText(handle,index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CB_LIMITTEXT, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:ResetContent()
# (@)METHOD:Reset()
# (@)METHOD:Clear()
# Remove all items from the Listbox and Textfield of a Combobox.
LRESULT
ResetContent(handle)
HWND handle
ALIAS:
Win32::GUI::Combobox::Reset = 1
Win32::GUI::Combobox::Clear = 2
CODE:
RETVAL = SendMessage(handle, CB_RESETCONTENT, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SelectString(STRING, [INDEX])
# Search for an item that begins with the specified string in the Listbox.
# If a matching item is found, it is selected and copied to the Textfield.
LRESULT
SelectString(handle,string,index=-1)
HWND handle
LPCTSTR string
long index
CODE:
RETVAL = SendMessage(handle, CB_SELECTSTRING, (WPARAM) index, (LPARAM) string);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetCurSel(INDEX)
# (@)METHOD:Select(INDEX)
# Selects the zero-based INDEX item in the Combobox.
LRESULT
SetCurSel(handle,index)
HWND handle
WPARAM index
ALIAS:
Win32::GUI::Combobox::Select = 1
CODE:
RETVAL = SendMessage(handle, CB_SETCURSEL, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetDroppedWidth(WIDTH)
# Set the maximum allowable width, in pixels, of the Listbox of a Combobox.
LRESULT
SetDroppedWidth(handle,index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CB_SETDROPPEDWIDTH, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetEditSel(START,END)
# Select characters in the textfield. START and END are the
# (zero-based) index of the characters to be selected. START
# is the index of the first character to be selected, and END
# is the index of the first character following the selection.
# For example to select the first 4 characters:
#
# $combobox->SetEditSel(0,4);
#
# If START is -1, the any selection is removed. If END is -1,
# then the selection is from START to the last character in the
# textfield.
#
# Returns 1 on success, 0 on failure and -1 if sent to a
# Combobox that does not have a textfield (C<-dropdownlist => 1>).
LRESULT
SetEditSel(handle,start,end)
HWND handle
UINT start
UINT end
CODE:
RETVAL = SendMessage(handle, CB_SETEDITSEL, 0, MAKELPARAM(start, end));
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetExtendedUI(FLAG)
# Select either the default user interface or the extended user interface for a Combobox.
LRESULT
SetExtendedUI(handle,index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CB_SETEXTENDEDUI, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetHorizontalExtend(CX)
# Set the width, in pixels, by which a listbox can be scrolled horizontally (the scrollable width).
LRESULT
SetHorizontalExtend(handle,index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CB_SETHORIZONTALEXTENT, index, 0);
OUTPUT:
RETVAL
# TODO : CB_SETITEMDATA
###########################################################################
# (@)METHOD:SetItemHeight(INDEX,HEIGHT)
# Set the height of list items or the selection field in a Combobox.
LRESULT
SetItemHeight(handle,wparam,lparam)
HWND handle
WPARAM wparam
WPARAM lparam
CODE:
RETVAL = SendMessage(handle, CB_SETITEMHEIGHT, wparam, (LPARAM) lparam);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetLocale(LOCALE)
# Set the current locale of the Combobox.
LRESULT
SetLocale(handle,wparam)
HWND handle
WPARAM wparam
CODE:
RETVAL = SendMessage(handle, CB_SETLOCALE, wparam, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetTopIndex(INDEX)
# Ensure that a particular item is visible in the Listbox of a Combobox.
LRESULT
SetTopIndex(handle,index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CB_SETTOPINDEX, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:ShowDropDown(FLAG)
# Show or hide the Listbox of a Combobox.
LRESULT
ShowDropDown(handle,index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CB_SHOWDROPDOWN, index, 0);
OUTPUT:
RETVAL
###########################################################################
###########################################################################
###########################################################################
###########################################################################
# (@)METHOD:Add(STRING, STRING .. STRING)
# Adds one or more items at the end of the control's list.
void
Add(handle,...)
HWND handle
PREINIT:
int i;
CODE:
for(i = 1; i < items; i++) {
SendMessage(handle, CB_ADDSTRING, 0, (LPARAM) (LPCTSTR) SvPV_nolen(ST(i)));
}
###########################################################################
# (@)METHOD:ItemHeight([HEIGHT])
# Gets or sets the items height in a Combobox.
LRESULT
ItemHeight(handle,height=-1)
HWND handle
long height
CODE:
if(items == 1) {
RETVAL = SendMessage(handle, LB_GETITEMHEIGHT, 0, 0);
} else {
RETVAL = SendMessage(handle, LB_SETITEMHEIGHT, 0, MAKELPARAM(height, 0));
}
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:TopIndex([INDEX])
# (@)METHOD:FirstVisibleItem([INDEX])
# Set or Get first visible item index.
LRESULT
TopIndex(handle,index=-1)
HWND handle
long index
ALIAS:
Win32::GUI::Combobox::FirstVisibleItem = 1
CODE:
if(items == 1)
RETVAL = SendMessage(handle, CB_GETTOPINDEX, 0, 0);
else
RETVAL = SendMessage(handle, CB_SETTOPINDEX, (WPARAM) index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)PACKAGE:Win32::GUI::ComboboxEx
###########################################################################
MODULE = Win32::GUI::Combobox PACKAGE = Win32::GUI::ComboboxEx
#pragma message( "*** PACKAGE Win32::GUI::ComboboxEx..." )
###########################################################################
# (@)METHOD:DeleteItem(INDEX)
# Delete an indexed item of the control's list.
LRESULT
DeleteItem(handle,index)
HWND handle
WPARAM index
CODE:
RETVAL = SendMessage(handle, CBEM_DELETEITEM, index, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetComboControl()
# Retrieves the handle to the child combo box control.
HWND
GetComboControl(handle)
HWND handle
CODE:
RETVAL = (HWND) SendMessage(handle, CBEM_GETCOMBOCONTROL, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetEditControl()
# Retrieves the handle to the edit control portion of a ComboBoxEx control.
HWND
GetEditControl(handle)
HWND handle
CODE:
RETVAL = (HWND) SendMessage(handle, CBEM_GETEDITCONTROL, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetImageList()
# Retrieves the handle to an image list assigned to a ComboBoxEx.
HIMAGELIST
GetImageList(handle)
HWND handle
CODE:
RETVAL = (HIMAGELIST) SendMessage(handle, CBEM_GETIMAGELIST, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetExtendedStyle()
# Retrieves the extended styles that are in use for a ComboBoxEx control.
HWND
GetExtendedStyle(handle)
HWND handle
CODE:
RETVAL = (HWND) SendMessage(handle, CBEM_GETEXTENDEDSTYLE, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:GetItem(NODE)
# Retrieves item information for a given ComboBoxEx item.
void
GetItem(handle,item)
HWND handle
int item
PREINIT:
COMBOBOXEXITEM cb_item;
char pszText[1024];
PPCODE:
ZeroMemory(&cb_item, sizeof(COMBOBOXEXITEM));
cb_item.iItem = item;
cb_item.mask = CBEIF_DI_SETITEM | CBEIF_IMAGE | CBEIF_INDENT
| CBEIF_LPARAM | CBEIF_OVERLAY
| CBEIF_SELECTEDIMAGE | CBEIF_TEXT;
cb_item.pszText = pszText;
cb_item.cchTextMax = 1024;
if(SendMessage(handle, CBEM_GETITEM, 0, (LPARAM) &item) != 0) {
EXTEND(SP, 14);
XST_mPV(0, "-text");
XST_mPV(1, cb_item.pszText);
XST_mPV(2, "-image");
XST_mIV(3, cb_item.iImage);
XST_mPV(4, "-selectedimage");
XST_mIV(5, cb_item.iSelectedImage);
XST_mPV(6, "-item");
XST_mIV(7, cb_item.iItem);
XST_mPV(8, "-overlay");
XST_mIV(9, cb_item.iOverlay);
XST_mPV(10, "-indent");
XST_mIV(11, cb_item.iIndent);
XST_mPV(12, "-lparam");
XST_mIV(13, cb_item.lParam);
XSRETURN(14);
} else {
XSRETURN_UNDEF;
}
###########################################################################
# (@)METHOD:GetUnicodeFormat()
# Retrieves the UNICODE character format flag for the control.
LRESULT
GetUnicodeFormat(handle)
HWND handle
CODE:
RETVAL = SendMessage(handle, CBEM_GETUNICODEFORMAT, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:HasEditChanged()
# Determines if the user has changed the contents of the ComboBoxEx edit control by typing.
LRESULT
HasEditChanged(handle)
HWND handle
CODE:
RETVAL = SendMessage(handle, CBEM_HASEDITCHANGED, 0, 0);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:InsertItem(%OPTIONS)
# Inserts a new item in the ComboboxEx control. Returns the newly created
# item zero-based index or -1 on errors.
#
# B<%OPTIONS> can be:
# -index => position (-1 for the end of the list)
# -image => index of an image from the associated ImageList
# -selectedimage => index of an image from the associated ImageList
# -text => string
# -indent => indentation spaces (1 space == 10 pixels)
LRESULT
InsertItem(handle,...)
HWND handle
PREINIT:
COMBOBOXEXITEM Item;
CODE:
ZeroMemory(&Item, sizeof(COMBOBOXEXITEM));
Item.iItem = -1;
ParseComboboxExItemOptions(NOTXSCALL sp, mark, ax, items, 1, &Item);
RETVAL = SendMessage(handle, CBEM_INSERTITEM, 0, (LPARAM) &Item);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetExtendedStyle(mask, exstyle)
# Sets extended styles within a ComboBoxEx control.
LRESULT
SetExtendedStyle(handle, mask, exstyle)
HWND handle
DWORD mask
DWORD exstyle
CODE:
RETVAL = SendMessage(handle, CBEM_SETEXTENDEDSTYLE, (WPARAM) mask, (LPARAM) exstyle);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetImageList(imagelist)
# Sets an image list for a ComboBoxEx control.
LRESULT
SetImageList(handle, himl)
HWND handle
HIMAGELIST himl
CODE:
RETVAL = SendMessage(handle, CBEM_SETIMAGELIST, (WPARAM) 0, (LPARAM) himl);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetItem(%OPTIONS)
# Sets the attributes for an item in a ComboBoxEx control.
#
# B<%OPTIONS> can be:
# -image => index of an image from the associated ImageList
# -selectedimage => index of an image from the associated ImageList
# -text => string
# -indent => indentation spaces (1 space == 10 pixels)
LRESULT
SetItem(handle,item,...)
HWND handle
int item
PREINIT:
COMBOBOXEXITEM Item;
CODE:
ZeroMemory(&Item, sizeof(COMBOBOXEXITEM));
Item.iItem = item;
ParseComboboxExItemOptions(NOTXSCALL sp, mark, ax, items, 2, &Item);
RETVAL = SendMessage(handle, CBEM_SETITEM, 0, (LPARAM) &Item);
OUTPUT:
RETVAL
###########################################################################
# (@)METHOD:SetUnicodeFormat(FLAG)
# Sets the UNICODE character format flag for the control.
LRESULT
SetUnicodeFormat(handle,flag)
HWND handle
BOOL flag
CODE:
RETVAL = SendMessage(handle, CBEM_SETUNICODEFORMAT, (WPARAM) flag, 0);
OUTPUT:
RETVAL
###########################################################################
###########################################################################
###########################################################################