static void NextPage(WndForm* pForm, int Step){
if(!pForm) {
return;
}
TCHAR buffer[200];
page += Step;
if (page>=nLists) {
page=0;
}
if (page<0) {
page= nLists-1;
}
WndOwnerDrawFrame* wDetailsEntry = (WndOwnerDrawFrame*)pForm->FindByName(TEXT("frmDetailsEntry"));
if(!wDetailsEntry) {
return;
}
LKWindowSurface Surface(*wDetailsEntry);
Surface.SelectObject(wDetailsEntry->GetFont());
aTextLine.update(Surface, wDetailsEntry->GetWidth(), ChecklistText[page]);
switch(nLists) {
case 0:
_stprintf(buffer, _T("%s %s"),NoteModeTitle,MsgToken(1750)); // empty
break;
case 1:
_stprintf(buffer, _T("%s"),NoteModeTitle);
break;
default:
_stprintf(buffer, _T("%s %d/%d"),NoteModeTitle,page+1,nLists);
break;
}
if (ChecklistTitle[page] &&
(_tcslen(ChecklistTitle[page])>0)
&& (_tcslen(ChecklistTitle[page])<60)) {
_tcscat(buffer, TEXT(": "));
_tcscat(buffer, ChecklistTitle[page]);
}
pForm->SetCaption(buffer);
WndListFrame* wDetails = (WndListFrame*)pForm->FindByName(TEXT("frmDetails"));
if(wDetails) {
wDetails->ResetList();
wDetails->Redraw();
}
}
void dlgHelpShowModal(const TCHAR* Caption, const TCHAR* HelpText) {
if (!Caption || !HelpText) {
return;
}
std::unique_ptr<WndForm> wf(dlgLoadFromXML(CallBackTable, ScreenLandscape ? IDR_XML_HELP_L : IDR_XML_HELP_P));
if(!wf) {
return;
}
WndListFrame* wHelp = static_cast<WndListFrame*>(wf->FindByName(TEXT("frmDetails")));
if(!wHelp) {
return;
}
wHelp->SetBorderKind(BORDERLEFT);
WndOwnerDrawFrame* wHelpEntry = static_cast<WndOwnerDrawFrame*>(wf->FindByName(TEXT("frmDetailsEntry")));
if (!wHelpEntry) {
return;
};
wHelpEntry->SetCanFocus(true);
DrawListIndex=0;
TCHAR fullcaption[100];
_stprintf(fullcaption,TEXT("%s: %s"), MsgToken(336), Caption); // Help
wf->SetCaption(fullcaption);
aTextLine.clear();
{
LKWindowSurface Surface(*wHelpEntry);
const auto oldFont = Surface.SelectObject(wHelpEntry->GetFont());
const int minHeight = Surface.GetTextHeight(_T("dp")) + 2 * DLGSCALE(2);
const int wHeight = wHelpEntry->GetHeight();
if(minHeight != wHeight) {
wHelpEntry->SetHeight(minHeight);
}
aTextLine.update(Surface, wHelpEntry->GetWidth(), LKgethelptext(HelpText));
Surface.SelectObject(oldFont);
}
wHelp->ResetList();
wHelp->Redraw();
wf->ShowModal();
aTextLine.clear();
}