// TestVC0Dlg.cpp : implementation file
//
...
.............................................................................................................................................
.............................................................................................................................................
void CTestVC0Dlg::OnSelchangeComboChapter()
{
CString varcombo;
CString vcombbook1, vcombchapter1;
long varrecno;
//Record corresponding to the item selected of the chapter conbobox
m_pRS->MoveFirst();
m_combochapterrecno.SetCurSel(m_combochapter.GetCurSel());
m_combochapterrecno.GetLBText(m_combochapterrecno.GetCurSel(),varcombo);
varrecno = atol(varcombo.GetBuffer(80));
m_pRS->Move(varrecno);
CalculValue();
SetSituation();
//Recordset declaration
if (m_pRSW0)
if (m_pRSW0->IsOpen())
m_pRSW0->Close();
delete m_pRSW0;
m_pRSW0 = new CDaoRecordset(m_pDB);
m_pRSW0->Open(dbOpenDynaset, "SELECT * from BibleTable", 0);
//Clear these comboboxes
m_comboverse.ResetContent();
m_comboverserecno.ResetContent();
//Verse combobox stores all verses orders of this chapter
m_combobook.GetLBText(m_combobook.GetCurSel(),vcombbook1);
m_combochapter.GetLBText(m_combochapter.GetCurSel(),vcombchapter1);
m_pRSW0->Move(varrecno);
while (!m_pRSW0->IsEOF())
{
m_pRSW0->GetFieldValue(_T("Book"), varbook0);
m_pRSW0->GetFieldValue(_T("Chapter"), varchapter0);
pos = m_pRSW0->GetAbsolutePosition();
ltoa(pos,chrrecno,10);
if ((CString(V_BSTRT(&varbook0)) == vcombbook1) && (CString(V_BSTRT(&varchapter0)) == vcombchapter1))
{
m_pRSW0->GetFieldValue(_T("Verse"), varverse0);
m_comboverse.AddString(CString(V_BSTRT(&varverse0)));
m_comboverserecno.AddString(CString(chrrecno));
}
m_pRSW0->MoveNext();
}
//In the current string of the verse coombobox displays the first verse order of this chapter
m_comboverse.SetCurSel(0);
UpdateData(FALSE);
// TODO: Add your control notification handler code here
}
.............................................................................................................................................
.............................................................................................................................................
...
|