Fenster vom Rendern von Daten abhalten um Applikationsleistung zu optimieren

[shmia]

Ungetestet:

Delphi-Quellcode:

procedure LockWindow(handle:HWND; lock: boolean);
begin
   if handle = 0 then exit;
   if lock then SendMessage(handle, WM_SETREDRAW, 0, 0)
   else begin
      SendMessage(handle, WM_SETREDRAW, 1, 0);
      RedrawWindow(handle, nil, 0,
         RDW_ERASE or RDW_FRAME or RDW_INVALIDATE or RDW_ALLCHILDREN);
   end;
end;