Fórum Preciso Separa data e hora #314416
26/02/2006
0
Eu gostaria de separar a data e a hora do sistema, ou seja, gostaria de ter 5 edit, onde na suas propriedades text cada um recebesse respectivamente:
edit1 = dia
edit2 = mes
edit3 = ano
edit5 = hora
edit6 = minuto
Fico no aguardo ai de um a apoio.
Abraço
Wagner
Wagnermarrane
Curtir tópico
+ 0Posts
26/02/2006
Edilcimar
Gostei + 0
26/02/2006
Wagnermarrane
boa noite Edicilmar, mas não faço muito ideia de como usa-lo. poderia exemplificar por favor
Gostei + 0
26/02/2006
Marco Salles
procedure TForm1.Button1Click(Sender: TObject); var dt:TdateTime; h,m,s,ms:word; ano,mes,dia:Word; begin dt:=date+time; decodetime(dt,h,m,s,ms); decodeDate(dt,ano,mes,dia); editano.text:=inttostr(ano); editmes.text:=inttostr(mes); editdia.text:=inttostr(dia); edithora.text:=inttostr(h); editmin.text:=inttostr(m); editseg.text:=inttostr(s); end;
[b:2ee9d3b5dc]voce pode melhorar a gosto[/b:2ee9d3b5dc]
Gostei + 0
26/02/2006
Wagnermarrane
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)