Pegar dia(dd) de uma data..

Delphi

07/03/2003

Ola amigos, como faço para pegar somente o dia de uma data? Tipo, quero mostrar no relatorio QReport somente o dia do aniversario, e nao a data por inteira..
Obrigado..

Renato
[/b]


Anonymous

Anonymous

Curtidas 0

Respostas

Mariana

Mariana

07/03/2003

Ola...

Teste usar a sintaxe:

dia := formatdate(´dd´, campo_data);

aonde dia é uma variável string...

Espero ter ajudado...

Mariana


GOSTEI 0
Anonymous

Anonymous

07/03/2003

Valeu Mariana..
Vou tentar..


GOSTEI 0
Anonymous

Anonymous

07/03/2003

Nao consegui implantar no QReport..
como faço para mostrar no relatorio somente o dia?


GOSTEI 0
Anonymous

Anonymous

07/03/2003

Coloque uma QRLabel onde deve ser mostrado o dia;
Use o codigo abaixo no evento BEFOREPRINT do QRBand onde vc deve mostrar o dia:

var
dia,mes,ano:Integer;
begin
decodedate(query1.FieldByName(´DATA´).AsDateTime,ano,mes,dia);
QRLABEL_Dia.Caption := Format(´00´,dia);
end;


GOSTEI 0
POSTAR