Delphi - capturar el kill del s.o.

 
Vista:

capturar el kill del s.o.

Publicado por SS (1 intervención) el 14/01/2004 18:33:59
Hola a todos, quisiera saber si alguien tiene idea de si, desde una aplicacion escrita en delphi7, que corre en linux, yo pude capturar el comando del sistema operativo kill "el pid de mi aplicacion", la idea es capturarlo, dandome cuenta que me quieren matar y actuar en consecuencia, desde ya muchas gracias.

SCS
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:capturar el kill del s.o.

Publicado por Fer (269 intervenciones) el 15/01/2004 09:18:55
Desconozco las peculiaridades de Linux, pero la técnica no puede ser muy distinta a la que se utiliza en Windows y que consistiría en capturar el mensaje apropiado del sistema. En el ejemplo que sigue, se captura el mensaje que se produce al cerrar Windows:

TForm1 = class(Tform)

....
private
procedure WMQueryEndSession(var Msg : TWMQueryEndSession); message WM_QueryEndSession;

end;

....
implementation

procedure TForm1.WMQueryEndSession(var Msg : TWMQueryEndSession);
begin
if MessageDlg('Cerrar Windows ?', mtConfirmation, [mbYes,mbNo], 0) = mrNo then
Msg.Result := 0
else
Msg.Result := 1;
end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar