Cerra MessageBox....

[diegofhernando]

Que tal foro... en esta ocasion lo que me ocupa es cerrar algunos messagebox por codigo, como le digo a mi aplicacion que cierre estos sin importar el resultado que retornen...

Gracias y Salu2

[roman]

Puedes usar FindWindow para encontrar el identificador de la ventana del MessageBox y mandarle el mensaje WM_CLOSE. Por ejemplo, si el título de la ventana es 'Abrir archivo' usarías:

var
  VentanaId: HWnd;

begin
  VentanaId := FindWindow(nil, 'Abrir archivo');
  if VentanaId <> 0 then
    SendMessage(VentanaId, WM_COSE, 0, 0);
end;

// Saludos

[obiwuan]

En mi webo tienes el TMessageDlg el cual, entre otras cosas, permite poner una cuenta atrás para cerrar un cuadro diálogo, así como definir el tipo de letras que quieras. Mis aplicaciones (LLBackup, etc) hacen uso de este TMsgDlg, con lo que puedes ver un ejemplo de su uso y ver si te interesa o no.