Fenster nicht minimieren

[jfheins]

So ungefähr:

Delphi-Quellcode:

var 
  OldWndProc: Pointer; 

begin // Change WndProc 
  OldWndProc := SetWindowLong({Handle}, GWLP_WNDPROC, @NewWndProc);  
end; 

function NewWndProc(hWnd: HWND; uMsg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; 
begin 
  if ({Message}) 
    // Handle Message 
  else // Call old WndProc 
    CallWindowProc(OldWndProc, hWnd, uMsg, wParam, lParam); 
end;

Das Handle bekommst du über FindWindow