Cerrando otra aplicación

Copyright © 2000 Ernesto De Spirito

PostMessage

Para cerrar otra aplicación puede usar la API PostMessage, declarada en la unidad Windows, para enviar un mensaje WM_CLOSE a su formulario principal. Esta función requiere el manejador (handle) de la ventana a la que le quiere enviar el mensaje. Puede obtener este manejador por ejemplo usando la API FindWindow, también declarada en la unidad Windows:

uses Windows, Messages;

procedure TForm1.Button1Click(Sender: TObject);
var
  h: HWND;
begin
  h := FindWindow(nil, 'Título Ventana Principal');
  if h <> 0 then PostMessage(h, WM_CLOSE, 0, 0);
end;

En lugar de 'Título Ventana Principal' debe escribir el título (caption) de la ventana principal de la aplicación de la aplicación que quiere cerrar. Asegúrese que este nombre sea único o podría terminar cerrando otra aplicación (por ejemplo no sería bueno un nombre como 'Form1').