Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)

- - Consulta (https://www.clubdelphi.com/foros/showthread.php?t=61215)

chipset

30-10-2008 15:37:22

Consulta

hola amigos del foro, soy nuevo en el manejo de delphi y mi consulta es si se puede al cerrar mi aplicacion que la pantalla se torne de color gris al igual que windows
creo que se podria hacer a travez del evento Onclosequery

de antemano muchas gracias:confused:

Caro	30-10-2008 16:44:31

Hola chipset, como dices puedes utilizar el evento OnCloseQuery de tu formulario y cambiarle el color.

Código Delphi [-]procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
 Self.Color := $00D8DEE2;
 
 if MessageDlg('¿Desea salir?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then
  CanClose := True
else
 begin
  Self.Color := clBtnFace;
  CanClose := False;
 end;
end;

Saluditos

chipset

30-10-2008 17:44:35

OKA se agradece
lo voy a probar hoy

Neftali [Germán.Estévez]

31-10-2008 12:23:42

Puedes buscar en los foros también porque esta petición creo que hace tiempo que se tartó. Incluso creo recordar que fue Domingo (seoane) quien puso un ejemplo utilizando paneles bastante sencillo.
Busca en los foros a ver si lo encuentras y si alguien más lo recuerda a ver si te puede dar más datos.
Yo he hecho una pequeña búsqueda, pero no lo encuentro.

La franja horaria es GMT +2. Ahora son las 14:59:30.