Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Como puedo hacer que desde el Sistema Operativo cierre Todas la Tablas. (https://www.clubdelphi.com/foros/showthread.php?t=78397)

BPL 16-04-2012 14:52:53

Como puedo hacer que desde el Sistema Operativo cierre Todas la Tablas.
 
Hola a Todos,
tengo un problema, yo trabajo con Advantage 8.1 y Delphi (sobre Windows), necesito apagar los equipo a cierta hora para poder hacer copias de todas la tablas (trabajo aun con DBF)
pues bien, el programar que las maquinas se apagen esta solucionado, pero como hago para que la estacion de trabajo antes de ser apagada cierre las tablas...
saben si existe alguna manera ?
o saben si a traves de Advantage 8.1 puedo hacer algo al respecto.

Agradeceria muchisimo alguna ayuda.....

ecfisa 16-04-2012 21:29:51

Hola BPL.

Como no se requiere intervención del usuario, creo que capturar el mensaje WM_ENDSESSION te va a funcionar:
Código Delphi [-]
type
  TForm1 = class(TForm)
  private
    procedure WMEndSession(var Msg: TWMEndSession); message WM_ENDSESSION;
  ...

implementation

procedure TForm1.WMEndSession(var Msg: TWMEndSession);
begin
  if Msg.EndSession then
  begin
    // Cerrar las tablas sybase
    ShowMessage('Windows se cerrará'); // Quitar (solo como ejemplo)
  end;
end;

Saludos.


La franja horaria es GMT +2. Ahora son las 20:19:08.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi