[fleming]

Empezado por escafandra

Código Delphi [-]
h := FindWindow(nil, PCHAR(s)); 
if (h <> 0) and (MessageBox(0, 'Programa Prohibido Detectado!'+#13+'¿Cerrarlo?', 'Alerta', +MB_YESNO + mb_ICONWARNING) = IDYES) then
   PostMessage(h, WM_CLOSE, 0, 0);

Saludos.

me salen un millon de ventanas alertas