/*----------------------------------------------------------------------------------------------
Save changes that have been made to the current editor.
@return true if edit saved successfully
----------------------------------------------------------------------------------------------*/
bool AfDeFeCliRef::SaveEdit()
{
if (m_fDelFromDialog)
{
m_fDelFromDialog = false;
return true;
}
EndTempEdit();
if (IsDirty())
{
CustViewDaPtr qcvd;
GetDataAccess(&qcvd);
AssertPtr(qcvd);
// Check if the record has been edited by someone else since we first loaded the data.
HRESULT hr;
CheckHr(hr = qcvd->CheckTimeStamp(m_hvoObj));
if (hr != S_OK)
{
// If it was changed and the user does not want to overwrite it, perform a refresh
// so the displayed field will revert to it's original value.
m_qadsc->UpdateAllDEWindows(m_hvoObj, m_flid);
qcvd->PropChanged(NULL, kpctNotifyAll, m_hvoObj, m_flid, 0, 1, 1);
}
else
{
// Update the value in the cache and refresh views.
BeginChangesToLabel();
qcvd->SetObjProp(m_hvoObj, m_flid, m_pss);
m_qadsc->UpdateAllDEWindows(m_hvoObj, m_flid);
qcvd->PropChanged(NULL, kpctNotifyAll, m_hvoObj, m_flid, 0, 1, 1);
CheckHr(qcvd->EndUndoTask());
}
}
// We need to leave in a state that cancels undo actions since this may be called
// without actually closing the edit box.
BeginTempEdit();
return true;
}
/*----------------------------------------------------------------------------------------------
Make an edit box to allow editing. hwnd is the parent hwnd. rc is the size of the child
window. Store the hwnd and return true.
@param hwnd
@param rc
@param dxpCursor
@param fTopCursor
@param tpte
@return true if successful
TODO: To handle extra long field contents (and RTL?) the button cannot be a child of the
edit control, because they must occupy seperate rectangles inside the field proper.
----------------------------------------------------------------------------------------------*/
bool AfDeFeEdBoxBut::BeginEdit(HWND hwnd, Rect &rc, int dxpCursor, bool fTopCursor,
TptEditable tpte)
{
if (!SuperClass::BeginEdit(hwnd, rc, dxpCursor, fTopCursor))
return false;
DeEditPtr qde;
qde.Create();
qde->SetEditable(tpte);
qde->m_pdee = this;
IActionHandler * pacth = BeginTempEdit();
ILgWritingSystemFactoryPtr qwsf;
GetLpInfo()->GetDbInfo()->GetLgWritingSystemFactory(&qwsf);
AssertPtr(qwsf);
#if 1
int nRet = 0;
ComBool fRTL = FALSE;
IWritingSystemPtr qws;
CheckHr(qwsf->get_EngineOrNull(m_ws, &qws));
if (qws)
CheckHr(qws->get_RightToLeft(&fRTL));
if (fRTL)
qde->Create(hwnd, kwidEditChild, WS_CHILD | ES_RIGHT | ES_AUTOHSCROLL, NULL, m_qtss,
qwsf, m_ws, pacth);
else
#endif
qde->Create(hwnd, kwidEditChild, WS_CHILD | ES_LEFT | ES_AUTOHSCROLL, NULL, m_qtss,
qwsf, m_ws, pacth);
m_hwnd = qde->Hwnd();
Rect rcT(rc.left + 2, rc.top + 1, rc.right, rc.bottom);
nRet = ::MoveWindow(m_hwnd, rcT.left, rcT.top, rcT.Width(), rcT.Height(), true);
#if 99-99
Rect rcParentClient;
Rect rcParent;
::GetClientRect(hwnd, &rcParentClient);
::GetWindowRect(hwnd, &rcParent);
Rect rcEdit;
Rect rcEditClient;
::GetWindowRect(m_hwnd, &rcEdit);
::GetClientRect(m_hwnd, &rcEditClient);
#endif
Rect rcTb;
::GetClientRect(m_hwnd, &rcTb);
rcTb.left = rcTb.right - 16;
rcTb.bottom = rcTb.top + Min((int)rcTb.bottom - (int)rcTb.top, (int)kdxpButtonHeight);
WndCreateStruct wcsButton;
wcsButton.InitChild(_T("BUTTON"), m_hwnd, kwidEditChild);
wcsButton.style |= WS_VISIBLE | BS_OWNERDRAW;
wcsButton.SetRect(rcTb);
DeButtonPtr qdb;
qdb.Create();
qdb->CreateAndSubclassHwnd(wcsButton);
qdb->m_pdee = this;
m_hwndButton = qdb->Hwnd();
#if 1-1
// Resize the edit control window to exclude the button
nRet = ::MoveWindow(m_hwnd, rcT.left, rcT.top, rcT.Width() - 18, rcT.Height(), true);
#endif
// Add text to the window.
::SendMessage(m_hwnd, FW_EM_SETSTYLE, m_chrp.clrBack, (LPARAM)&m_qfsp->m_stuSty);
::SendMessage(m_hwnd, EM_SETMARGINS, EC_RIGHTMARGIN | EC_LEFTMARGIN, MAKELPARAM(0, 18));
::ShowWindow(m_hwnd, SW_SHOW);
//::SendMessage(m_hwnd, WM_SETFONT, (WPARAM)::GetStockObject(DEFAULT_GUI_FONT), 0);
// Foreground/background colors are set via WM_CTLCOLOREDIT in AfDeFeWnd.
// Set cursor to desired offset.
//int ich;
//ich = LOWORD(::SendMessage(m_hwnd, EM_CHARFROMPOS, 0, dxpCursor));
// For some reason the above always comes back with -1 instead of the correct index.
// Is this a bug in TssEdit or am I doing something wrong?
//::SendMessage(m_hwnd, EM_SETSEL, ich, ich);
//::mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0); // Send LButton to place cursor in edit ctrl.
#if 99-99
Rect rcEditNew;
Rect rcEditNewClient;
Rect rcBut;
Rect rcButClient;
::GetWindowRect(m_hwnd, &rcEditNew);
::GetClientRect(m_hwnd, &rcEditNewClient);
::GetWindowRect(m_hwndButton, &rcBut);
::GetClientRect(m_hwndButton, &rcButClient);
#endif
return true;
}
