Fórum time do delphi #474679

31/03/2014

0

Olá , pessoal. Boa noite!
Se possível quero uma ajuda de vocês, sou iniciante em delphi e estou tentando fazer um programa que fique aparecendo uma janela de mensagem a cada 5 min. Vi que no delphi tem o TIMER, não não estou conseguindo isso acontecer. Estou usando a verão do delphi XE3.
Até agora só fiz isto.

procedure TForm1.Timer1Timer(Sender: TObject);
var Hora_agora:String;

begin
if Hora_agora = Timetostr(Now) then
begin
ShowModal(TForm1);
end;
end;
end.
Frederico Lima

Frederico Lima

Responder

Posts

01/04/2014

Marcos Oliveira

Frederico,

Tente usar o Timer. Programe a propriedade "Interval" com 300000 (trezentos mil), uma vez que o intervalo dele é em milisegundos.
Ou seja: Um segundo = 1000. Um minuto: 60000. Cinco minutos: 300000.
Deixe a propriedade Enabled como True e programe seu código no evendo OnTimer. Creio que isso irá funcionar.

Att,

Marcos
Responder

Gostei + 0

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

Aceitar