Fórum função executando numa data determinada #363899

15/09/2008

0

ola pessoal sou novo no forum tenho uma duvida

como posso fazer uma função em meu programa que seja executada numa determinada data e hora estou prescisando disso se alguem puder me ajuda vlw fico no aguardo...


²=nixo=²

²=nixo=²

Responder

Posts

15/09/2008

²=nixo=²

nao tem como editar esqueci de informar ^^
uso o delphi 7

vlw


Responder

Gostei + 0

15/09/2008

Luiz Henrique

Bom dia nixo, blz

Cara, nunca necessitei implementar uma funcao que este procedimento, mas enquanto nao aparece ninguem com uma solucao mais detalhada, vai tentando com o componente Timer da paleta System.

Espero que ajude T+


Responder

Gostei + 0

15/09/2008

²=nixo=²

tipo eu usei mas no caso do windows reinicar o tempo estaria começando de novo entende


Responder

Gostei + 0

15/09/2008

Adoniram

Cara, já tentou usar com a função Now?

procedure TForm1.OnTimer(Sender:TObject);
begin
if Now = DataSelecionadaParaExecuçãoDaRotina then
ExecutarRotina();
end;


Responder

Gostei + 0

15/09/2008

²=nixo=²

ExecutarRotina();
aki e que vai minha função? vlw pela ajuda


Responder

Gostei + 0

15/09/2008

Adoniram

sim, isso mesmo.


Responder

Gostei + 0

16/09/2008

²=nixo=²

po mas nao executou sabe se tem como implementar colocando uma hora junto? vlw pela ajuda


Responder

Gostei + 0

16/09/2008

Adoniram

Como assim?


Responder

Gostei + 0

16/09/2008

Adoniram

E qual o tempo vc está colocando no timer?


Responder

Gostei + 0

16/09/2008

Digaopachesen

Cara é assim, no time vc informa a quantos segundos ele ira rodar o codigo, ai no codigo vc faz um if pegando a data atual e a hora e virificando se é a data hora desejada caso seja executa tua rotina,
caso nao seja ele nao fara nada e assim por diante ate que realmente a data e hora seja as desejada. Nas propriedades do Time, tem o interval se nao me engando se vc colocar nele 1000 sera = a 1 segundo, entao a cada 1 segundo vc pega data e hora e verifica se é o desejado se for executa rotina... Espero ter ajudado e nao exagerado!!! Flw


Responder

Gostei + 0

18/09/2008

²=nixo=²

tipo qual seria o formato da data xx/xx/xxxx ? vlw


Responder

Gostei + 0

18/09/2008

Adoniram

´xx/xx/xxxx xx:xx:xx´
Ex.:
´18/09/2008 12:59:15´


Responder

Gostei + 0

19/09/2008

²=nixo=²

quando uso a hora assim 18/09/2008 12:59:15 nao compila no delphi /=

um amigo me deu esse exemplo mas tb nao funciona

procedure TForm1.Timer1Timer(Sender: TObject);
var
haha: TDateTime;
begin
if haha = 19/09/2008 then
close;
end;


Responder

Gostei + 0

19/09/2008

²=nixo=²

ola pessoal obrigado pela ajuda um amigo da comunidade universo delphi do orkut me passou um exemplo e funcionou irei colocar aki se alguem + prescisar vlw pode feichar o topico

procedure TForm1.Timer1Timer(Sender: TObject);
begin
   if Now >= StrToDateTime(´19/09/2008 13:03´) then
   close;
end;



Responder

Gostei + 0

19/09/2008

Marco Salles

como posso fazer uma função em meu programa que seja executada numa determinada data e hora estou prescisando disso se alguem puder me ajuda vlw fico no aguardo...


sei não , mas a maneira mas indicada para isto é usando THreads e Processos ... Nun Timer consome processamento e nun fica bom não
Esta é minha Opinião ..


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar