// Default dialog procedure, which handles common functions
INT_PTR CALLBACK PSPBaseProc(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
CCtrlList *pCtrlList;
pCtrlList = CCtrlList::GetObj(hDlg);
if (PtrIsValid(pCtrlList)) {
switch (uMsg) {
case WM_INITDIALOG:
return TRUE;
// set propertysheet page's background white in aero mode
case WM_CTLCOLORSTATIC:
case WM_CTLCOLORDLG:
if (IsAeroMode())
return (INT_PTR)GetStockBrush(WHITE_BRUSH);
break;
// Set text color of edit boxes according to the source of information they display.
case WM_CTLCOLOREDIT:
return pCtrlList->OnSetTextColour((HWND)lParam, (HDC)wParam);
case WM_NOTIFY:
switch (((LPNMHDR)lParam)->idFrom) {
case 0:
MCONTACT hContact = (MCONTACT)((LPPSHNOTIFY)lParam)->lParam;
LPSTR pszProto;
switch (((LPNMHDR)lParam)->code) {
case PSN_RESET:
pCtrlList->OnReset();
break;
case PSN_INFOCHANGED:
if (PSGetBaseProto(hDlg, pszProto) && *pszProto) {
BOOL bChanged = (GetWindowLongPtr(hDlg, DWLP_MSGRESULT)&PSP_CHANGED) | pCtrlList->OnInfoChanged(hContact, pszProto);
SetWindowLongPtr(hDlg, DWLP_MSGRESULT, bChanged ? PSP_CHANGED : 0);
}
break;
case PSN_APPLY:
if (PSGetBaseProto(hDlg, pszProto) && *pszProto)
pCtrlList->OnApply(hContact, pszProto);
break;
}
break;
}
break;
case WM_COMMAND:
if (!PspIsLocked(hDlg))
pCtrlList->OnChangedByUser(LOWORD(wParam), HIWORD(wParam));
break;
case WM_DESTROY:
// destroy all control objects and the list
pCtrlList->Release();
}
}
return 0;
}
/**
* name: OnReminderChecked
* class: CAnnivEditCtrl
* desc: is called if reminder checkbox's state was changed
* param: none
* return: nothing
**/
void CAnnivEditCtrl::OnReminderChecked()
{
MCONTACT hContact;
LPCSTR pszProto;
int state;
TCHAR buf[6];
MAnnivDate *pCurrent = Current();
PSGetContact(_hwndDlg, hContact);
if (!hContact || !PSGetBaseProto(_hwndDlg, pszProto) || !pCurrent)
{
EnableReminderCtrl(FALSE);
}
else
{
if (IsDlgButtonChecked(_hwndDlg, RADIO_REMIND1))
{
_itot(db_get_b(NULL, MODNAME, SET_REMIND_OFFSET, DEFVAL_REMIND_OFFSET), buf, 10);
EnableWindow(GetDlgItem(_hwndDlg, EDIT_REMIND), FALSE);
EnableWindow(GetDlgItem(_hwndDlg, SPIN_REMIND), FALSE);
state = BST_INDETERMINATE;
}
else if (IsDlgButtonChecked(_hwndDlg, RADIO_REMIND2))
{
if (pCurrent->RemindOffset() == (WORD)-1)
{
_itot(db_get_b(NULL, MODNAME, SET_REMIND_OFFSET, DEFVAL_REMIND_OFFSET), buf, 10);
}
else
{
_itot(pCurrent->RemindOffset(), buf, 10);
}
EnableWindow(GetDlgItem(_hwndDlg, EDIT_REMIND), _ReminderEnabled);
EnableWindow(GetDlgItem(_hwndDlg, SPIN_REMIND), _ReminderEnabled);
state = BST_CHECKED;
}
else
{
*buf = 0;
EnableWindow(GetDlgItem(_hwndDlg, EDIT_REMIND), FALSE);
EnableWindow(GetDlgItem(_hwndDlg, SPIN_REMIND), FALSE);
state = BST_UNCHECKED;
}
if (pCurrent->RemindOption() != state)
{
pCurrent->RemindOption(state);
if (!PspIsLocked(_hwndDlg))
{
pCurrent->SetFlags(MAnnivDate::MADF_REMINDER_CHANGED);
SendMessage(GetParent(_hwndDlg), PSM_CHANGED, NULL, NULL);
}
}
SetDlgItemText(_hwndDlg, EDIT_REMIND, buf);
}
}
/**
* name: DeleteDate
* class: CAnnivEditCtrl
* desc: Delete the item on the position identified by wIndex
* param: pDateCtrl - pointer to the date control's data structure
* wIndex - index of the item to delete
* return: 0 on success 1 otherwise
**/
INT_PTR CAnnivEditCtrl::DeleteDate(WORD wIndex)
{
if (!ItemValid(wIndex)) return 1;
// only delete values, but not the item
if (_pDates[wIndex]->Id() == ANID_BIRTHDAY) {
MCONTACT hContact;
LPCSTR pszProto;
PSGetContact(_hwndDlg, hContact);
PSGetBaseProto(_hwndDlg, pszProto);
// protocol value exists?
if (_pDates[wIndex]->DBGetDate(hContact, pszProto, SET_CONTACT_BIRTHDAY, SET_CONTACT_BIRTHMONTH, SET_CONTACT_BIRTHYEAR)) {
_pDates[wIndex]->SetFlags(MAnnivDate::MADF_HASPROTO);
}
else {
_pDates[wIndex]->ZeroDate();
}
_pDates[wIndex]->RemindOption(BST_INDETERMINATE);
_pDates[wIndex]->RemindOffset((WORD)-1);
_pDates[wIndex]->RemoveFlags(MAnnivDate::MADF_HASCUSTOM);
_pDates[wIndex]->SetFlags(MAnnivDate::MADF_CHANGED|MAnnivDate::MADF_REMINDER_CHANGED);
}
else {
delete _pDates[wIndex];
_numDates--;
if (wIndex < _numDates)
memmove(_pDates + wIndex, _pDates + wIndex + 1, (_numDates - wIndex) * sizeof(*_pDates));
memset((_pDates + _numDates), 0, sizeof(*_pDates)); // XXX: check me: sizeof(*_pDates) -> (sizeof(*_pDates) - _numDates)
if (_curDate >= _numDates)
_curDate = _numDates - 1;
}
SendMessage(GetParent(_hwndDlg), PSM_CHANGED, NULL, NULL);
SetCurSel(_curDate);
return 0;
}
/**
* name: DlgProcPspAbout()
* desc: dialog procedure
*
* return: 0 or 1
**/
INT_PTR CALLBACK PSPProcContactProfile(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
HWND hList = GetDlgItem(hDlg, LIST_PROFILE);
LPLISTCTRL pList;
switch (uMsg) {
case WM_INITDIALOG:
{
LVCOLUMN lvc;
RECT rc;
LOGFONT lf;
HFONT hFont;
TOOLINFO ti;
if (!hList || !(pList = (LPLISTCTRL)mir_alloc(sizeof(LISTCTRL))))
return FALSE;
ZeroMemory(pList, sizeof(LISTCTRL));
TranslateDialogDefault(hDlg);
Ctrl_InitTextColours();
// init info structure
pList->hList = hList;
pList->nType = CTRL_LIST_PROFILE;
ZeroMemory(&pList->labelEdit, sizeof(pList->labelEdit));
SetUserData(hList, pList);
// set new window procedure
OldListViewProc = (WNDPROC)SetWindowLongPtr(hList, GWLP_WNDPROC, (LONG_PTR)&ProfileList_SubclassProc);
// remove static edge in aero mode
if (IsAeroMode())
SetWindowLongPtr(hList, GWL_EXSTYLE, GetWindowLongPtr(hList, GWL_EXSTYLE)&~WS_EX_STATICEDGE);
// insert columns into the listboxes
ListView_SetExtendedListViewStyle(hList, LVS_EX_FULLROWSELECT);
PSGetBoldFont(hDlg, hFont);
SendDlgItemMessage(hDlg, IDC_PAGETITLE, WM_SETFONT, (WPARAM)hFont, 0);
// set listfont
pList->hFont = (HFONT)SendMessage(hList, WM_GETFONT, 0, 0);
pList->wFlags |= LVF_EDITLABEL;
GetObject(pList->hFont, sizeof(lf), &lf);
lf.lfHeight -= 6;
hFont = CreateFontIndirect(&lf);
SendMessage(hList, WM_SETFONT, (WPARAM)hFont, 0);
GetClientRect(hList, &rc);
rc.right -= GetSystemMetrics(SM_CXVSCROLL);
// initiate the tooltips
pList->hTip = CreateWindowEx(WS_EX_TOPMOST, TOOLTIPS_CLASS, NULL,
WS_POPUP|TTS_BALLOON|TTS_NOPREFIX|TTS_ALWAYSTIP,
CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
hList, NULL, ghInst, NULL);
if (pList->hTip) {
SetWindowPos(pList->hTip, HWND_TOPMOST,
CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
ZeroMemory(&ti, sizeof(TOOLINFO));
ti.cbSize = sizeof(TOOLINFO);
ti.uFlags = TTF_IDISHWND|TTF_SUBCLASS|TTF_TRANSPARENT;
ti.hinst = ghInst;
ti.hwnd = hList;
ti.uId = (UINT_PTR)hList;
SendMessage(pList->hTip, TTM_ADDTOOL, NULL, (LPARAM)&ti);
SendMessage(pList->hTip, TTM_ACTIVATE, FALSE, (LPARAM)&ti);
}
// insert columns into the listboxes
lvc.mask = LVCF_WIDTH;
lvc.cx = rc.right / 8 * 3;
ListView_InsertColumn(hList, 0, &lvc);
lvc.cx = rc.right / 8 * 5;
ListView_InsertColumn(hList, 1, &lvc);
return TRUE;
}
case WM_CTLCOLORSTATIC:
case WM_CTLCOLORDLG:
if (IsAeroMode())
return (INT_PTR)GetStockBrush(WHITE_BRUSH);
break;
case WM_NOTIFY:
switch (((LPNMHDR)lParam)->idFrom) {
case 0:
{
HANDLE hContact = (HANDLE)((LPPSHNOTIFY)lParam)->lParam;
LPCSTR pszProto;
if (!PtrIsValid(pList = (LPLISTCTRL)GetUserData(hList))) break;
switch (((LPNMHDR)lParam)->code) {
// some account data may have changed so reread database
case PSN_INFOCHANGED:
{
BYTE msgResult = 0;
LPIDSTRLIST idList;
UINT nList;
BYTE i;
INT iItem = 0,
iGrp = 0,
numProtoItems,
numUserItems;
if (!(pList->wFlags & CTRLF_CHANGED) && PSGetBaseProto(hDlg, pszProto) && *pszProto != 0) {
ProfileList_Clear(hList);
// insert the past information
for (i = 0; i < 3; i++) {
pFmt[i].GetList((WPARAM)&nList, (LPARAM)&idList);
if ((numProtoItems = ProfileList_AddItemlistFromDB(pList, iItem, idList, nList, hContact, pszProto, pFmt[i].szCatFmt, pFmt[i].szValFmt, CTRLF_HASPROTO)) < 0)
return FALSE;
// scan all basic protocols for the subcontacts
if (DB::Module::IsMetaAndScan(pszProto)) {
INT iDefault = CallService(MS_MC_GETDEFAULTCONTACTNUM, (WPARAM)hContact, NULL);
HANDLE hSubContact, hDefContact;
LPCSTR pszSubBaseProto;
INT j, numSubs;
if ((hDefContact = (HANDLE)CallService(MS_MC_GETSUBCONTACT, (WPARAM)hContact, iDefault)) &&
(pszSubBaseProto = DB::Contact::Proto(hDefContact)))
{
if ((numProtoItems += ProfileList_AddItemlistFromDB(pList, iItem, idList, nList, hDefContact, pszSubBaseProto, pFmt[i].szCatFmt, pFmt[i].szValFmt, CTRLF_HASMETA|CTRLF_HASPROTO)) < 0)
return FALSE;
// copy the missing settings from the other subcontacts
numSubs = CallService(MS_MC_GETNUMCONTACTS, (WPARAM)hContact, NULL);
for (j = 0; j < numSubs; j++) {
if (j == iDefault) continue;
if (!(hSubContact = (HANDLE)CallService(MS_MC_GETSUBCONTACT, (WPARAM)hContact, j))) continue;
if (!(pszSubBaseProto = DB::Contact::Proto(hSubContact))) continue;
if ((numProtoItems += ProfileList_AddItemlistFromDB(pList, iItem, idList, nList, hSubContact, pszSubBaseProto, pFmt[i].szCatFmt, pFmt[i].szValFmt, CTRLF_HASMETA|CTRLF_HASPROTO)) < 0)
return FALSE;
//if ((numUserItems += ProfileList_AddItemlistFromDB(pList, iItem, idList, nList, hSubContact, USERINFO, pFmt[i].szCatFmt, pFmt[i].szValFmt, CTRLF_HASMETA|CTRLF_HASPROTO)) < 0)
// return FALSE;
}
}
}
if ((numUserItems = ProfileList_AddItemlistFromDB(pList, iItem, idList, nList, hContact, USERINFO, pFmt[i].szCatFmt, pFmt[i].szValFmt, CTRLF_HASCUSTOM)) < 0)
return FALSE;
if (numUserItems || numProtoItems) {
msgResult = PSP_CHANGED;
ProfileList_AddGroup(hList, pFmt[i].szGroup, iGrp);
iGrp = ++iItem;
}
}
}
SetWindowLongPtr(hDlg, DWLP_MSGRESULT, msgResult);
break;
}
// user swiches to another propertysheetpage
case PSN_KILLACTIVE:
ProfileList_EndLabelEdit(hList, TRUE);
break;
// user selected to apply settings to the database
case PSN_APPLY:
if (pList->wFlags & CTRLF_CHANGED) {
BYTE iFmt = -1;
INT iItem;
LVITEM lvi;
TCHAR szGroup[MAX_PATH];
CHAR pszSetting[MAXSETTING];
LPLCITEM pItem;
LPSTR pszModule = USERINFO;
if (!hContact) PSGetBaseProto(hDlg, pszModule);
*szGroup = 0;
lvi.mask = LVIF_TEXT|LVIF_PARAM;
lvi.pszText = szGroup;
lvi.cchTextMax = MAX_PATH;
for (iItem = lvi.iItem = lvi.iSubItem = 0; ListView_GetItem(hList, &lvi); lvi.iItem++) {
if (!PtrIsValid(pItem = (LPLCITEM)lvi.lParam)) {
// delete reluctant items
if (iFmt >= 0 && iFmt < SIZEOF(pFmt)) {
DB::Setting::DeleteArray(hContact, pszModule, pFmt[iFmt].szCatFmt, iItem);
DB::Setting::DeleteArray(hContact, pszModule, pFmt[iFmt].szValFmt, iItem);
}
// find information about the group
for (iFmt = 0; iFmt < SIZEOF(pFmt); iFmt++) {
if (!_tcscmp(szGroup, pFmt[iFmt].szGroup)) {
break;
}
}
// indicate, no group was found. should not happen!!
if (iFmt == SIZEOF(pFmt)) {
*szGroup = 0;
iFmt = -1;
}
iItem = 0;
}
else
if (iFmt >= 0 && iFmt < SIZEOF(pFmt)) {
// save value
if (!pItem->pszText[1] || !*pItem->pszText[1])
continue;
if (!(pItem->wFlags & (CTRLF_HASPROTO|CTRLF_HASMETA))) {
mir_snprintf(pszSetting, MAXSETTING, pFmt[iFmt].szValFmt, iItem);
DB::Setting::WriteTString(hContact, pszModule, pszSetting, pItem->pszText[1]);
// save category
mir_snprintf(pszSetting, MAXSETTING, pFmt[iFmt].szCatFmt, iItem);
if (pItem->idstrList && pItem->iListItem > 0 && pItem->iListItem < pItem->idstrListCount)
DB::Setting::WriteAString(hContact, pszModule, pszSetting, (LPSTR)pItem->idstrList[pItem->iListItem].pszText);
else
if (pItem->pszText[0] && *pItem->pszText[0])
DB::Setting::WriteTString(hContact, pszModule, pszSetting, (LPTSTR)pItem->pszText[0]);
else
DB::Setting::Delete(hContact, pszModule, pszSetting);
// redraw the item if required
if (pItem->wFlags & CTRLF_CHANGED) {
pItem->wFlags &= ~CTRLF_CHANGED;
ListView_RedrawItems(hList, lvi.iItem, lvi.iItem);
}
iItem++;
}
}
}
// delete reluctant items
if (iFmt >= 0 && iFmt < SIZEOF(pFmt)) {
DB::Setting::DeleteArray(hContact, pszModule, pFmt[iFmt].szCatFmt, iItem);
DB::Setting::DeleteArray(hContact, pszModule, pFmt[iFmt].szValFmt, iItem);
}
pList->wFlags &= ~CTRLF_CHANGED;
}
break;
}
break;
}
//
// handle notification messages from the list control
//
case LIST_PROFILE:
{
LPLISTCTRL pList = (LPLISTCTRL)GetUserData(((LPNMHDR)lParam)->hwndFrom);
switch (((LPNMHDR)lParam)->code) {
case NM_RCLICK:
{
HMENU hMenu = CreatePopupMenu();
MENUITEMINFO mii;
HANDLE hContact;
LVHITTESTINFO hi;
LPLCITEM pItem;
POINT pt;
if (!hMenu) return 1;
PSGetContact(hDlg, hContact);
GetCursorPos(&pt);
hi.pt = pt;
ScreenToClient(((LPNMHDR)lParam)->hwndFrom, &hi.pt);
ListView_SubItemHitTest(((LPNMHDR)lParam)->hwndFrom, &hi);
pItem = ProfileList_GetItemData(((LPNMHDR)lParam)->hwndFrom, hi.iItem);
// insert menuitems
ZeroMemory(&mii, sizeof(MENUITEMINFO));
mii.cbSize = sizeof(MENUITEMINFO);
mii.fMask = MIIM_ID|MIIM_STRING;
// insert "Add" Menuitem
mii.wID = BTN_ADD_intEREST;
mii.dwTypeData = TranslateT("Add Interest");
InsertMenuItem(hMenu, 0, TRUE, &mii);
mii.wID = BTN_ADD_AFFLIATION;
mii.dwTypeData = TranslateT("Add Affliation");
InsertMenuItem(hMenu, 1, TRUE, &mii);
mii.wID = BTN_ADD_PAST;
mii.dwTypeData = TranslateT("Add Past");
InsertMenuItem(hMenu, 2, TRUE, &mii);
if (hi.iItem != -1 && PtrIsValid(pItem) && !(hContact && (pItem->wFlags & CTRLF_HASPROTO))) {
// insert separator
mii.fMask = MIIM_FTYPE;
mii.fType = MFT_SEPARATOR;
InsertMenuItem(hMenu, 3, TRUE, &mii);
// insert "Delete" Menuitem
mii.fMask = MIIM_ID|MIIM_STRING;
mii.wID = BTN_EDIT_CAT;
mii.dwTypeData = TranslateT("Edit Category");
InsertMenuItem(hMenu, 4, TRUE, &mii);
mii.wID = BTN_EDIT_VAL;
mii.dwTypeData = TranslateT("Edit Value");
InsertMenuItem(hMenu, 5, TRUE, &mii);
mii.fMask = MIIM_FTYPE;
mii.fType = MFT_SEPARATOR;
InsertMenuItem(hMenu, 6, TRUE, &mii);
// insert "Delete" Menuitem
mii.fMask = MIIM_ID|MIIM_STRING;
mii.wID = BTN_DEL;
mii.dwTypeData = TranslateT("Delete");
InsertMenuItem(hMenu, 7, TRUE, &mii);
}
TrackPopupMenu(hMenu, 0, pt.x, pt.y, 0, hDlg, 0);
DestroyMenu(hMenu);
return 0;
}
/*case LVN_BEGINSCROLL:
SetFocus(((LPNMHDR)lParam)->hwndFrom);
break;
*/
case LVN_GETDISPINFO:
if (pList->labelEdit.iTopIndex != ListView_GetTopIndex(hList))
ProfileList_EndLabelEdit(((LPNMHDR)lParam)->hwndFrom, FALSE);
break;
case NM_CUSTOMDRAW:
{
LPNMLVCUSTOMDRAW cd = (LPNMLVCUSTOMDRAW)lParam;
LPLCITEM pItem = (LPLCITEM)cd->nmcd.lItemlParam;
RECT rc;
switch (cd->nmcd.dwDrawStage) {
case CDDS_PREPAINT:
SetWindowLongPtr(hDlg, DWLP_MSGRESULT, CDRF_NOTIFYITEMDRAW);
return TRUE;
case CDDS_ITEMPREPAINT:
ListView_GetItemRect(cd->nmcd.hdr.hwndFrom, cd->nmcd.dwItemSpec, &rc, LVIR_BOUNDS);
if (!PtrIsValid(pItem)) {
HFONT hBold, hFont;
TCHAR szText[MAX_PATH];
PSGetBoldFont(hDlg, hBold);
hFont = (HFONT)SelectObject(cd->nmcd.hdc, hBold);
SetTextColor(cd->nmcd.hdc, GetSysColor(COLOR_3DSHADOW));
ProfileList_GetItemText(cd->nmcd.hdr.hwndFrom, cd->nmcd.dwItemSpec, 0, szText, MAX_PATH);
rc.left += 6;
DrawText(cd->nmcd.hdc, TranslateTS(szText), -1, &rc, DT_NOCLIP|DT_NOPREFIX|DT_SINGLELINE|DT_VCENTER);
rc.bottom -= 2;
rc.top = rc.bottom - 1;
rc.left -= 6;
DrawEdge(cd->nmcd.hdc, &rc, BDR_SUNKENOUTER, BF_RECT);
SelectObject(cd->nmcd.hdc, hFont);
SetWindowLongPtr(hDlg, DWLP_MSGRESULT, CDRF_SKIPDEFAULT);
return TRUE;
}
// draw selected item
if ((cd->nmcd.uItemState & CDIS_SELECTED) || (pList->labelEdit.iItem == cd->nmcd.dwItemSpec)) {
SetTextColor(cd->nmcd.hdc, GetSysColor(COLOR_HIGHLIGHTTEXT));
FillRect(cd->nmcd.hdc, &rc, GetSysColorBrush(COLOR_HIGHLIGHT));
}
// draw background of unselected item
else {
SetTextColor(cd->nmcd.hdc,
(pItem->wFlags & CTRLF_CHANGED)
? clrChanged : (pItem->wFlags & CTRLF_HASMETA)
? clrMeta : ((pItem->wFlags & (CTRLF_HASCUSTOM)) && (pItem->wFlags & CTRLF_HASPROTO))
? clrBoth : (pItem->wFlags & CTRLF_HASCUSTOM)
? clrCustom : clrNormal);
FillRect(cd->nmcd.hdc, &rc, GetSysColorBrush(COLOR_WINDOW));
}
SetWindowLongPtr(hDlg, DWLP_MSGRESULT, CDRF_NEWFONT|CDRF_NOTIFYSUBITEMDRAW);
return TRUE;
case CDDS_SUBITEM|CDDS_ITEMPREPAINT:
{
HFONT hoFont = (HFONT)SelectObject(cd->nmcd.hdc, pList->hFont);
ListView_GetSubItemRect(cd->nmcd.hdr.hwndFrom, cd->nmcd.dwItemSpec, cd->iSubItem, LVIR_BOUNDS, &rc);
if (cd->iSubItem == 0) {
RECT rc2;
ListView_GetSubItemRect(cd->nmcd.hdr.hwndFrom, cd->nmcd.dwItemSpec, 1, LVIR_BOUNDS, &rc2);
rc.right = rc2.left;
}
rc.left += 3;
DrawText(cd->nmcd.hdc,
pItem->pszText[cd->iSubItem]
? pItem->pszText[cd->iSubItem]
: (cd->iSubItem == 0 && pItem->idstrList && pItem->iListItem > 0 && pItem->iListItem < pItem->idstrListCount)
? pItem->idstrList[pItem->iListItem].ptszTranslated
: TranslateT("<empty>"),
-1, &rc, DT_END_ELLIPSIS|DT_NOCLIP|DT_NOPREFIX|DT_SINGLELINE|DT_VCENTER);
SetWindowLongPtr(hDlg, DWLP_MSGRESULT, CDRF_SKIPDEFAULT);
return TRUE;
}
} /* switch (cd->nmcd.dwDrawStage) */
break;
} /* case NM_CUSTOMDRAW: */
} /* (((LPNMHDR)lParam)->code) */
break;
}
}
break; /* case WM_NOTIFY: */
case WM_COMMAND:
{
switch (LOWORD(wParam)) {
case BTN_ADD_intEREST:
return ProfileList_AddNewItem(hDlg, (LPLISTCTRL)GetUserData(hList), &pFmt[2]);
case BTN_ADD_AFFLIATION:
return ProfileList_AddNewItem(hDlg, (LPLISTCTRL)GetUserData(hList), &pFmt[1]);
case BTN_ADD_PAST:
return ProfileList_AddNewItem(hDlg, (LPLISTCTRL)GetUserData(hList), &pFmt[0]);
case BTN_EDIT_CAT:
ProfileList_BeginLabelEdit(hList, ListView_GetSelectionMark(hList), 0);
break;
case BTN_EDIT_VAL:
ProfileList_BeginLabelEdit(hList, ListView_GetSelectionMark(hList), 1);
break;
case BTN_DEL:
if (IDYES == MsgBox(hDlg, MB_YESNO|MB_ICON_QUESTION, LPGENT("Question"), LPGENT("Delete an entry"), LPGENT("Do you really want to delete this entry?"))) {
INT iItem = ListView_GetSelectionMark(hList);
LPLISTCTRL pList = (LPLISTCTRL)GetUserData(hList);
ProfileList_DeleteItem(hList, iItem);
if (PtrIsValid(pList)) pList->wFlags |= CTRLF_CHANGED;
SendMessage(GetParent(hDlg), PSM_CHANGED, NULL, NULL);
// check if to delete any devider
if (!ProfileList_GetItemData(hList, iItem--) && !ProfileList_GetItemData(hList, iItem))
ListView_DeleteItem(hList, iItem);
}
break;
}
break;
}
}
return FALSE;
}
/**
* This is the dialog procedure for the advanced contact information propertysheetpage.
*
* @param hDlg - handle to the dialog window
* @param uMsg - the message to handle
* @param wParam - parameter
* @param lParam - parameter
*
* @return different values
**/
INT_PTR CALLBACK PSPProcOrigin(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
switch (uMsg) {
case WM_INITDIALOG:
{
CCtrlList *pCtrlList = CCtrlList::CreateObj(hDlg);
if (pCtrlList) {
LPIDSTRLIST pList;
UINT nList;
HFONT hBoldFont;
PSGetBoldFont(hDlg, hBoldFont);
SendDlgItemMessage(hDlg, IDC_PAGETITLE, WM_SETFONT, (WPARAM)hBoldFont, 0);
TranslateDialogDefault(hDlg);
SetTimer(hDlg, 1, 5000, NULL);
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_STREET, SET_CONTACT_ORIGIN_STREET, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_ZIP, SET_CONTACT_ORIGIN_ZIP, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_CITY, SET_CONTACT_ORIGIN_CITY, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_STATE, SET_CONTACT_ORIGIN_STATE, DBVT_TCHAR));
GetCountryList(&nList, &pList);
pCtrlList->insert(CCombo::CreateObj(hDlg, EDIT_COUNTRY, SET_CONTACT_ORIGIN_COUNTRY, DBVT_WORD, pList, nList));
pCtrlList->insert(CTzCombo::CreateObj(hDlg, EDIT_TIMEZONE, NULL));
}
}
break;
case WM_NOTIFY:
{
switch (((LPNMHDR) lParam)->idFrom) {
case 0:
{
MCONTACT hContact = (MCONTACT)((LPPSHNOTIFY)lParam)->lParam;
LPCSTR pszProto;
switch (((LPNMHDR) lParam)->code) {
case PSN_INFOCHANGED:
{
if (!PSGetBaseProto(hDlg, pszProto) || *pszProto == 0)
break;
if (hContact) {
MTime mt;
if (mt.DBGetStamp(hContact, USERINFO, SET_CONTACT_ADDEDTIME) && strstr(pszProto, "ICQ")) {
DWORD dwStamp;
dwStamp = DB::Contact::WhenAdded(db_get_dw(hContact, pszProto, "UIN", 0), pszProto);
if (dwStamp > 0)
mt.FromStampAsUTC(dwStamp);
}
if (mt.IsValid()) {
TCHAR szTime[MAX_PATH];
LPTSTR ptr;
mt.UTCToLocal();
mt.DateFormatLong(szTime, _countof(szTime));
mir_tstrcat(szTime, _T(" - "));
ptr = szTime + mir_tstrlen(szTime);
mt.TimeFormat(ptr, _countof(szTime) - (ptr - szTime));
SetDlgItemText(hDlg, TXT_DATEADDED, szTime);
}
}
SetWindowLongPtr(hDlg, DWLP_MSGRESULT, 0);
}
break;
case PSN_ICONCHANGED:
{
const ICONCTRL idIcon[] = {
{ ICO_COMMON_ADDRESS, STM_SETIMAGE, ICO_ADDRESS },
{ ICO_COMMON_CLOCK, STM_SETIMAGE, ICO_CLOCK },
};
IcoLib_SetCtrlIcons(hDlg, idIcon, _countof(idIcon));
}
}
}
} /* switch (((LPNMHDR)lParam)->idFrom) */
}
break;
case WM_COMMAND:
{
switch (LOWORD(wParam)) {
case EDIT_COUNTRY:
if (HIWORD(wParam) == CBN_SELCHANGE) {
LPIDSTRLIST pd = (LPIDSTRLIST)ComboBox_GetItemData((HWND)lParam, ComboBox_GetCurSel((HWND)lParam));
UpDate_CountryIcon(GetDlgItem(hDlg, ICO_COUNTRY), pd->nID);
}
break;
}
}
break;
case WM_TIMER:
{
TCHAR szTime[32];
CTzCombo::GetObj(hDlg, EDIT_TIMEZONE)->GetTime(szTime, _countof(szTime));
SetDlgItemText(hDlg, TXT_TIME, szTime);
break;
}
case WM_DESTROY:
KillTimer(hDlg, 1);
}
return PSPBaseProc(hDlg, uMsg, wParam, lParam);
}
/**
* Dialog procedure for the contact information propertysheetpage
*
* @param hDlg - handle to the dialog window
* @param uMsg - the message to handle
* @param wParam - parameter
* @param lParam - parameter
*
* @return different values
**/
INT_PTR CALLBACK PSPProcGeneral(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
switch (uMsg) {
case WM_INITDIALOG:
{
CCtrlList *pCtrlList = CCtrlList::CreateObj(hDlg);
if (pCtrlList) {
LPIDSTRLIST pList;
UINT nList;
HFONT hBoldFont;
PSGetBoldFont(hDlg, hBoldFont);
SendDlgItemMessage(hDlg, IDC_PAGETITLE, WM_SETFONT, (WPARAM)hBoldFont, 0);
TranslateDialogDefault(hDlg);
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_TITLE, SET_CONTACT_TITLE, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_FIRSTNAME, SET_CONTACT_FIRSTNAME, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_SECONDNAME, SET_CONTACT_SECONDNAME, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_LASTNAME, SET_CONTACT_LASTNAME, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_NICK, SET_CONTACT_NICK, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_DISPLAYNAME, "CList", SET_CONTACT_MYHANDLE, DBVT_TCHAR));
pCtrlList->insert(CEditCtrl::CreateObj(hDlg, EDIT_PARTNER, SET_CONTACT_PARTNER, DBVT_TCHAR));
GetNamePrefixList(&nList, &pList);
pCtrlList->insert(CCombo::CreateObj(hDlg, EDIT_PREFIX, SET_CONTACT_PREFIX, DBVT_BYTE, pList, nList));
// marital groupbox
GetMaritalList(&nList, &pList);
pCtrlList->insert(CCombo::CreateObj(hDlg, EDIT_MARITAL, SET_CONTACT_MARITAL, DBVT_BYTE, pList, nList));
GetLanguageList(&nList, &pList);
pCtrlList->insert(CCombo::CreateObj(hDlg, EDIT_LANG1, SET_CONTACT_LANG1, DBVT_TCHAR, pList, nList));
pCtrlList->insert(CCombo::CreateObj(hDlg, EDIT_LANG2, SET_CONTACT_LANG2, DBVT_TCHAR, pList, nList));
pCtrlList->insert(CCombo::CreateObj(hDlg, EDIT_LANG3, SET_CONTACT_LANG3, DBVT_TCHAR, pList, nList));
}
}
break;
case WM_NOTIFY:
{
switch (((LPNMHDR)lParam)->idFrom) {
case 0:
{
MCONTACT hContact = (MCONTACT)((LPPSHNOTIFY)lParam)->lParam;
char* pszProto;
switch (((LPNMHDR)lParam)->code) {
case PSN_INFOCHANGED:
{
BYTE bEnable;
DBVARIANT dbv;
CCtrlFlags Flags;
if (PSGetBaseProto(hDlg, pszProto) && *pszProto) {
Flags.W = DB::Setting::GetTStringCtrl(hContact, USERINFO, USERINFO, pszProto, SET_CONTACT_GENDER, &dbv);
if (Flags.B.hasCustom || Flags.B.hasProto || Flags.B.hasMeta) {
if (dbv.type == DBVT_BYTE) {
CheckDlgButton(hDlg, RADIO_FEMALE, (dbv.bVal == 'F'));
CheckDlgButton(hDlg, RADIO_MALE, (dbv.bVal == 'M'));
bEnable = !hContact || Flags.B.hasCustom || !db_get_b(NULL, MODNAME, SET_PROPSHEET_PCBIREADONLY, 0);
EnableWindow(GetDlgItem(hDlg, RADIO_FEMALE), bEnable);
EnableWindow(GetDlgItem(hDlg, RADIO_MALE), bEnable);
}
else
db_free(&dbv);
}
}
}
break;
case PSN_APPLY:
{
if (!PSGetBaseProto(hDlg, pszProto) || *pszProto == 0)
break;
// gender
{
BYTE gender
= SendDlgItemMessage(hDlg, RADIO_FEMALE, BM_GETCHECK, NULL, NULL)
? 'F'
: SendDlgItemMessage(hDlg, RADIO_MALE, BM_GETCHECK, NULL, NULL)
? 'M'
: 0;
if (gender)
db_set_b(hContact, hContact ? USERINFO : pszProto, SET_CONTACT_GENDER, gender);
else
db_unset(hContact, hContact ? USERINFO : pszProto, SET_CONTACT_GENDER);
}
}
break;
case PSN_ICONCHANGED:
{
const ICONCTRL idIcon[] = {
{ ICO_COMMON_FEMALE, STM_SETIMAGE, ICO_FEMALE },
{ ICO_COMMON_MALE, STM_SETIMAGE, ICO_MALE },
{ ICO_COMMON_MARITAL, STM_SETIMAGE, ICO_MARITAL },
};
IcoLib_SetCtrlIcons(hDlg, idIcon, SIZEOF(idIcon));
}
}
}
}
}
break;
case WM_COMMAND:
{
MCONTACT hContact;
LPCSTR pszProto;
switch (LOWORD(wParam)) {
case RADIO_FEMALE:
{
if (!PspIsLocked(hDlg) && HIWORD(wParam) == BN_CLICKED) {
DBVARIANT dbv;
PSGetContact(hDlg, hContact);
PSGetBaseProto(hDlg, pszProto);
if (!DB::Setting::GetAsIsCtrl(hContact, USERINFO, USERINFO, pszProto, SET_CONTACT_GENDER, &dbv)
|| dbv.type != DBVT_BYTE
|| (dbv.bVal != 'F' && SendMessage((HWND)lParam, BM_GETCHECK, NULL, NULL)))
SendMessage(GetParent(hDlg), PSM_CHANGED, NULL, NULL);
}
}
break;
case RADIO_MALE:
{
if (!PspIsLocked(hDlg) && HIWORD(wParam) == BN_CLICKED) {
DBVARIANT dbv;
PSGetContact(hDlg, hContact);
PSGetBaseProto(hDlg, pszProto);
if (!DB::Setting::GetAsIsCtrl(hContact, USERINFO, USERINFO, pszProto, SET_CONTACT_GENDER, &dbv)
|| dbv.type != DBVT_BYTE
|| (dbv.bVal != 'M' && SendMessage((HWND)lParam, BM_GETCHECK, NULL, NULL)))
SendMessage(GetParent(hDlg), PSM_CHANGED, NULL, NULL);
}
}
}
}
}
return PSPBaseProc(hDlg, uMsg, wParam, lParam);
}
