Fórum Digitar uma data dd/mm/aa e mostrar num relatório só o dd #178095
28/08/2003
0
QUERO DIGITAR EM NUM TEXT EM UM FORM NORMAL A DATA COMPLETA
EXEMPLO 10/08/85 E EXIBIR NUM RELATÓRIO (QREPORT) SOMENTE O DIA 10
COMO FAÇO ISSO ?
[b:d7a7ea0c3c]Título editado. Gentileza escrever com letras minúsculas, conforme as regras de conduta. - Sandra[/b:d7a7ea0c3c]
EXEMPLO 10/08/85 E EXIBIR NUM RELATÓRIO (QREPORT) SOMENTE O DIA 10
COMO FAÇO ISSO ?
[b:d7a7ea0c3c]Título editado. Gentileza escrever com letras minúsculas, conforme as regras de conduta. - Sandra[/b:d7a7ea0c3c]
Andinho_levita
Curtir tópico
+ 0
Responder
Posts
28/08/2003
Nildo
Copy(SeuEdit.text,1,2)
entao se o cara escrever 10/08/2002 vai retornar 10
entao se o cara escrever 10/08/2002 vai retornar 10
Responder
Gostei + 0
28/08/2003
Janete
Faça o seguinde
decodedate(suadata,Ano,Mes,Dia);
assim ele separa o ano, mes e dia, dai vc pega um qrlabel e faz receber o dia
QRlabel1.Caption:=IntToStr(Dia);
Ps. colocar no início da procedure antes do begin
var Dia,Mes,Ano:Word;
decodedate(suadata,Ano,Mes,Dia);
assim ele separa o ano, mes e dia, dai vc pega um qrlabel e faz receber o dia
QRlabel1.Caption:=IntToStr(Dia);
Ps. colocar no início da procedure antes do begin
var Dia,Mes,Ano:Word;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)