como agendar para ativar ou desativar
23/07/2008
0
Fiz uma aplicação em delphi 7 e estou com o seguinte problema eu conecto no servidor de banco de dados e minha maquina fica 24h ligada junto ao servidor, qual tenho um procedimento que realiza bkp do banco de dados a noite, mas como minha aplicação esta ativa o bkp não completa, alguém sabe de algum script para agendar a hora de ativar a aplicação as 06:00 e desativar as 18:30?
Grato,
Sérgio
Motoqueiro10
Posts
23/07/2008
Motoqueiro10
Tentei fazer algo assim mas não tenho o minimo de conhecimento de como fazer fincionar.
procedure TForm1.Timer1Timer(Sender: TObject);
var
ativar,desativar:real;
begin
ativar:=´06:30:00´;
desativar:=´18:30:00´;
statusbar1.Panels[0].Text := timetostr (time);
if statusbar1.Panels[0].Text = ativar then
WinExec(´L:\pormade\MensagemOS.exe´, SW_SHOWNORMAL)
else
if statusbar1.Panels[0].Text = desativar then
ShowWindow(Application.Handle, HTCLOSE);
end;
25/07/2008
Motoqueiro10
Clique aqui para fazer login e interagir na Comunidade :)