spy++ 查找要最小化的程序classname

var    Indicador :Integer;begin   // Find the window by Classname  Indicador := FindWindow(PChar(‘notepad‘), nil);  // if finded  if (Indicador <> 0) then begin    // Minimize    ShowWindow(Indicador,SW_MINIMIZE);  end;end;

3.根据程序标题最小化程序

function FindWindowByTitle(WindowTitle: string): Hwnd;    var      NextHandle: Hwnd;      NextTitle: array[0..260] of char;begin      // Get the first window      NextHandle := GetWindow(Application.Handle, GW_HWNDFIRST);      while NextHandle > 0 do      begin        // retrieve its text        GetWindowText(NextHandle, NextTitle, 255);        if Pos(WindowTitle, StrPas(NextTitle)) <> 0 then        begin          Result := NextHandle;          Exit;        end        else          // Get the next window          NextHandle := GetWindow(NextHandle, GW_HWNDNEXT);      end;      Result := 0;end;procedure hideExWindow()var Indicador:Hwnd;begin    // Find the window by Classname    Indicador := FindWindowByTitle(‘MyApp‘);     // if finded    if (Indicador <> 0) then    begin        // Minimize        ShowWindow(Indicador,SW_HIDE); //SW_MINIMIZE    end;end;