Slette max og min knapperne fra en anden applikation

Mit svar fra http://www.eksperten.dk/spm/597999 :

procedure RemoveMaxMinButtons(Wnd: HWND);
var
  WndStyle: Integer;
begin
  if Wnd = 0 then
    raise Exception.Create('Ikke en gyldig handle.');
  WndStyle := GetWindowLong(Wnd, GWL_STYLE);
  WndStyle := WndStyle and not (WS_MAXIMIZEBOX or WS_MINIMIZEBOX);
  SetWindowLong(Wnd, GWL_STYLE, WndStyle);
end;

RemoveMaxMinButtons(wnd);