Fórum função executando numa data determinada #363899
15/09/2008
0
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=²
Curtir tópico
+ 0Posts
15/09/2008
²=nixo=²
uso o delphi 7
vlw
Gostei + 0
15/09/2008
Luiz Henrique
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+
Gostei + 0
15/09/2008
²=nixo=²
Gostei + 0
15/09/2008
Adoniram
procedure TForm1.OnTimer(Sender:TObject);
begin
if Now = DataSelecionadaParaExecuçãoDaRotina then
ExecutarRotina();
end;
Gostei + 0
15/09/2008
²=nixo=²
aki e que vai minha função? vlw pela ajuda
Gostei + 0
15/09/2008
Adoniram
Gostei + 0
16/09/2008
²=nixo=²
Gostei + 0
16/09/2008
Adoniram
Gostei + 0
16/09/2008
Adoniram
Gostei + 0
16/09/2008
Digaopachesen
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
Gostei + 0
18/09/2008
²=nixo=²
Gostei + 0
18/09/2008
Adoniram
Ex.:
´18/09/2008 12:59:15´
Gostei + 0
19/09/2008
²=nixo=²
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;
Gostei + 0
19/09/2008
²=nixo=²
procedure TForm1.Timer1Timer(Sender: TObject); begin if Now >= StrToDateTime(´19/09/2008 13:03´) then close; end;
Gostei + 0
19/09/2008
Marco Salles
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 ..
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)