Fórum ocultar programas ativos #293550

procedure HideTaskBar(Visivel: Boolean);
var
wndHandle : THandle;
wndClass : array[0..50] of Char;
begin
StrPCopy(@wndClass[0],´Shell_TrayWnd´);
wndHandle := FindWindow(@wndClass[0], nil);
if Visivel = True then
begin
ShowWindow(wndHandle, SW_RESTORE);
end
else
begin
ShowWindow(wndHandle, SW_HIDE);
end;
end;

Essa aqui é uma função bem legal, ela esconde a barra de tarefas do windows e exibe novamente use dois botões e teste, não deve ser exatamente isso q vc precisa, mas vc já tem uma idéia, é só melhorar, vc pode escrever uma func. utilizando as API do Windows q vão te mostrar quais são os programas (não os processos) ativos no windows, e vc pode tentar escondê-los, não é muito minha praia esse negócio de API, mas o pessoal aqui pode continuar te ajudando.

Boa Sorte!!!