Re: Scripts discussion (4)
Posted: Sun Aug 10, 2025 2:22 am
InputBox_function.js не работает на новой версии, даже пример InputBox.js не работает, крашит AkelPad. Может кто поправит?
Code: Select all
nID = oSys.Call("User32::GetDlgCtrlID", oSys.Call("User32::GetFocus"));См. Scripts v19.3
Уведомил KDJ.VladSh wrote: ↑Mon Aug 11, 2025 11:04 am И ещё у меня при попытке вызова FindReplaceFiles.js вылетает сообщение об ошибке...
Code: Select all
nMaxFileSize = parseInt(GetWindowText(lParam), 10);Code: Select all
//+Win11 fix
var sMaxFileSize = GetWindowText(lParam);
if (sMaxFileSize == "")
{
nMaxFileSize = 0;
return 0
}
nMaxFileSize = parseInt(sMaxFileSize, 10);
//nMaxFileSize = parseInt(GetWindowText(lParam), 10);
//-Win11 fixCode: Select all
nID = oSys.Call("User32::GetDlgCtrlID", oSys.Call("User32::GetFocus"));
if (nID == IDFILELV)
nID = IDEDITB;
else if ((nID != IDCURRENTB) && (nID != IDBROWSEB) && (nID != IDHELP1B) && (nID != IDHELP2B) && (nID != IDHELP3B) && (nID < IDSEARCHB))
nID = IDSEARCHB;
oSys.Call("User32::DefDlgProcW", hWnd, 1025 /*DM_SETDEFID*/, nID, 0);
Code: Select all
//+Win11 fix
//nID = oSys.Call("User32::GetDlgCtrlID", oSys.Call("User32::GetFocus"));
//if (nID == IDFILELV)
// nID = IDEDITB;
//else if ((nID != IDCURRENTB) && (nID != IDBROWSEB) && (nID != IDHELP1B) && (nID != IDHELP2B) && (nID != IDHELP3B) && (nID < IDSEARCHB))
// nID = IDSEARCHB;
//oSys.Call("User32::DefDlgProcW", hWnd, 1025 /*DM_SETDEFID*/, nID, 0);
var nDefID = LoWord(oSys.Call("User32::DefDlgProcW", hWnd, 1024 /*DM_GETDEFID*/, 0, 0));
nID = oSys.Call("User32::GetDlgCtrlID", oSys.Call("User32::GetFocus"));
if (nID == IDFILELV)
nID = IDEDITB;
else if ((nID != IDCURRENTB) && (nID != IDBROWSEB) && (nID != IDHELP1B) && (nID != IDHELP2B) && (nID != IDHELP3B) && (nID < IDSEARCHB))
nID = IDSEARCHB;
else
nID = 0;
if (nID && nDefID != nID)
oSys.Call("User32::DefDlgProcW", hWnd, 1025 /*DM_SETDEFID*/, nID, 0);
//-Win11 fixСпасибо, теперь всё работает.
