AkelPad

Code: Select all

==========================================================================
UndoAll.js  http://akelpad.sourceforge.net/forum/viewtopic.php?p=4050#p4050
==========================================================================
var hWndEdit = AkelPad.GetEditWnd();
var oSys = AkelPad.SystemFunction();
...
...
SetRedraw(hWndEdit, false); //запретить перерисовку
AkelPad.SendMessage(hWndEdit, 3185 /*AEM_LOCKSCROLL*/, 3 /*SB_BOTH*/, true); //удерживать от перемотки
... //тут действия с изменением содержимого
AkelPad.SendMessage(hWndEdit, 3185 /*AEM_LOCKSCROLL*/, 3 /*SB_BOTH*/, false); //освободить перемотку
SetRedraw(hWndEdit, true); //разрешить перерисовку
...
...
function SetRedraw(hWnd, bRedraw)
{
   AkelPad.SendMessage(hWnd, 11 /*WM_SETREDRAW*/, bRedraw, 0);
   if (bRedraw) oSys.Call("user32::InvalidateRect", hWnd, 0, true);
} 

======================
Можно так попробовать:
======================
SetRedraw(hWndEdit, false);
...
SetRedraw(hWndEdit, true);
...
function SetRedraw(hWnd, bRedraw)
{
  AkelPad.SendMessage(hWnd, 3185 /*AEM_LOCKSCROLL*/, 3 /*SB_BOTH*/, !bRedraw);
  AkelPad.SendMessage(hWnd, 11 /*WM_SETREDRAW*/, bRedraw, 0);
  if (bRedraw) oSys.Call("user32::InvalidateRect", hWnd, 0, true);
}

===================================================
AkelEdit.h  AEM_LOCKSCROLL  (WM_USER + 2161) = 3185
===================================================
Lock scrolling of an edit control.
(int)wParam  == SB_BOTH  lock horizontal and vertical scroll.
                SB_HORZ  lock horizontal scroll.
                SB_VERT  lock vertical scroll.
                -1       only retrieve current SB_* lock, lParam is ignored.
(BOOL)lParam == TRUE   lock scroll.
                FALSE  unlock scroll.
Return Value
 Previous SB_* lock or -1 if no locking information defined.
Remarks
 Locking is cumulative. If your application locks scroll five times in a row, it must also unlock scroll five times before the scroll unlocks.
Example:
 SendMessage(hWndEdit, AEM_LOCKSCROLL, SB_BOTH, TRUE);
 SendMessage(hWndEdit, EM_SETSEL, (WPARAM)-1, (LPARAM)-1);
 SendMessage(hWndEdit, AEM_LOCKSCROLL, SB_BOTH, FALSE);

==================================================================================
WM_SETREDRAW message
http://msdn.microsoft.com/en-us/library/windows/desktop/dd145219%28v=vs.85%29.aspx
==================================================================================
An application sends the WM_SETREDRAW message to a window to allow changes in that window to be redrawn or to prevent changes in that window from being redrawn.
SendMessage( 
  (HWND) hWnd,              
  WM_SETREDRAW,             
  (WPARAM) wParam,          
  (LPARAM) lParam            
);
   wParam - The redraw state. If this parameter is TRUE, the content can be redrawn after a change. If this parameter is FALSE, the content cannot be redrawn after a change.
   lParam - This parameter is not used.
   Return value
   An application returns zero if it processes this message.

==================================================================================
InvalidateRect function
http://msdn.microsoft.com/en-us/library/windows/desktop/dd145002%28v=vs.85%29.aspx
==================================================================================
The InvalidateRect function adds a rectangle to the specified window's update region. The update region represents the portion of the window's client area that must be redrawn.
BOOL InvalidateRect(
  __in  HWND hWnd,
  __in  const RECT *lpRect,
  __in  BOOL bErase
);
   hWnd [in] - A handle to the window whose update region has changed. If this parameter is NULL, the system invalidates and redraws all windows, not just the windows for this application, and sends the WM_ERASEBKGND and WM_NCPAINT messages before the function returns. Setting this parameter to NULL is not recommended.
   lpRect [in] - A pointer to a RECT structure that contains the client coordinates of the rectangle to be added to the update region. If this parameter is NULL, the entire client area is added to the update region.
   bErase [in] - Specifies whether the background within the update region is to be erased when the update region is processed. If this parameter is TRUE, the background is erased when the BeginPaint function is called. If this parameter is FALSE, the background remains unchanged.
   Return value
   If the function succeeds, the return value is nonzero.
   If the function fails, the return value is zero.

Code: Select all

var oSys = AkelPad.SystemFunction();
var hMainWnd = AkelPad.GetMainWnd();
var hEditWnd = AkelPad.GetEditWnd();
var hNewMainWnd = AkelPad.Command(4102 /*IDM_FILE_CREATENEW*/);
var hNewEditWnd = 0;

if (hNewMainWnd)
{
  if (AkelPad.IsMDI() == 1)
  {
    var hWndMDIClient = oSys.Call("User32::FindWindowEx" + _TCHAR, hNewMainWnd, 0, "MDIClient", 0);
    var hWndFrame = oSys.Call("User32::FindWindowEx" + _TCHAR, hWndMDIClient, 0, "AkelPad MDI Class", 0);
    hNewEditWnd = oSys.Call("User32::FindWindowEx" + _TCHAR, hWndFrame, 0, "AkelEdit" + _TCHAR, 0);
  }
  else
    hNewEditWnd = oSys.Call("User32::FindWindowEx" + _TCHAR, hNewMainWnd, 0, "AkelEdit" + _TCHAR, 0);
}

WScript.Echo("hMainWnd: "    + hMainWnd + "\n" +
             "hEditWnd: "    + hEditWnd + "\n" +
             "hNewMainWnd: " + hNewMainWnd + "\n" +
             "hNewEditWnd: " + hNewEditWnd);