Olá galera,

"Eu acho" que seria assim:

-------
procedure TForm1.Button1Click(Sender: TObject);
var
  Tempo: TTime;
begin
  Tempo := Now + IncSecond(Tempo, 195);
  label2.Caption := TimeToStr(Tempo);
end;
-------

Faça o teste.
________________________________
[]'s, Silvio Clécio
---
Linux User: #481900
Skype: silvioprog
ICQ: 432519902
E-mail, Y! Messenger: silviop...@yahoo.com.br
Gmail, GTalk: silviop...@gmail.com
Hotmail, MSN: silviop...@hotmail.com
BlogSpot: http://silvioclecio.blogspot.com/
BlogSite: http://silvioprog.blogspot.com/
°oO| Seja livre, use Linux! |Oo°





________________________________
De: Roberto <wa...@oi.com.br>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 2 de Abril de 2009 15:33:06
Assunto: [delphi-br] Somar horas, minutos e segundos em now()


procedure TForm1.Button1Click (Sender: TObject);

var

Tempo : TTime;

Begin

//  Necessito somar now() + 3 minutos e 25 segundos . COMO FAÇO ISSO? POR
FAVOR 

Tempo := Now( ) +         2h3m:25s;

label2.Caption := TimetoStr(tempo) ;

end;

Roberto   


      Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]

Responder a