Navigation keys in the context help.

Добавлен по страничный скроллинг (PgDn,PgUp), строчный (Up,Down) и начало,конец текста (Home,End).
This commit is contained in:
lsv 2025-12-03 15:14:56 +05:00
parent 8df9354b4c
commit d64fe4d6c2
2 changed files with 13 additions and 1 deletions

View file

@ -173,6 +173,14 @@ public:
p.y=p.y-50;
//this->Move(p);
}
if (event.GetKeyCode() == WXK_PAGEDOWN) htmlWindow->ScrollPages(1);
if (event.GetKeyCode() == WXK_PAGEUP) htmlWindow->ScrollPages(-1);
if (event.GetKeyCode() == WXK_DOWN) htmlWindow->ScrollLines(1);
if (event.GetKeyCode() == WXK_UP) htmlWindow->ScrollLines(-1);
if (event.GetKeyCode() == WXK_HOME) htmlWindow->ScrollPages(-1000);
if (event.GetKeyCode() == WXK_END) htmlWindow->ScrollPages(1000);
});
htmlWindow->Bind(wxEVT_RIGHT_UP, [&](wxMouseEvent& event) {
wxString name;

View file

@ -262,6 +262,11 @@ wxString FunctionPGHelper::getSqlCommandHelp(wxString fnd) {
wxUniChar sep = wxFileName::GetPathSeparator();
fnd.Replace(" ", "");
wxString f = wxFindFirstFile(path + sep + "sql-" + fnd + "*.html");
if (f.empty()) {
fnd.Replace("_", "-");
f = wxFindFirstFile(path + sep + "view-" + fnd + "*.html");
if (f.empty()) f = wxFindFirstFile(path + sep + "catalog-" + fnd + "*.html");
}
wxString last, txt;
int c = 0;
@ -389,7 +394,6 @@ void FunctionPGHelper::loadfile() {
body.clear();
path = settings->GetPgHelpPath();
wxString tempDir = path + "_func.txt";
//tempDir="C:\\Users\\lsv\\Source\\Repos\\wxHtmlhint\\1";
if (!wxFileExists(tempDir)) return;
wxTextFile tfile;
tfile.Open(tempDir);