Código Delphi [-]var A:TTime; begin A:=Now; edit1.text:=TimeToStr(A); end;
var A:TTime; begin A:=Now; edit1.text:=TimeToStr(A); end;