data no quick

Delphi

20/04/2005

Preciso exibir a data do sistema (date), no quick rep, mas por extenço, ex: 04 de Abril de 2005

Agradeço vcs !!!
Obrigado.


Buck

Buck

Curtidas 0

Respostas

Adriano_servitec

Adriano_servitec

20/04/2005

E ai amigo, naum sei se funciona assim pra vc, mais quando eu quero gravar uma data por extenso eu crio primeiro no db um campo data D e um campo dataextenso A, 30 por exp. no paradox, ai coloco no dbedit1(data) no events onexit assim: DBEDIT2.Text:=uppercase(formatdatetime(´dd´,(STRTODATE(DBEDIT1.TEXT)))+´ DE ´+formatdatetime(´MMMM´,(STRTODATE(DBEDIT1.TEXT)))
+´ DE ´+formatdatetime(´YYYY´,(STRTODATE(DBEDIT1.TEXT))));

e no dbedit2(dataextenso) recebe o valor da data por extenso, ai no qreport no qrdbtext coloco o que foi gravado por extenso.


GOSTEI 0
Gandalf.nho

Gandalf.nho

20/04/2005

[b:562d46715e][color=red:562d46715e]Bloqueado por Infração às Regras de Conduta :[/color:562d46715e][/b:562d46715e]

Triplicidade
[url]http://forum.clubedelphi.net/viewtopic.php?p=197686[/url]
[url]http://forum.clubedelphi.net/viewtopic.php?p=197210[/url]

Para maiores esclarecimentos pode mandar-me uma [url=http://forum.clubedelphi.net/privmsg.php?mode=post&u=8378]Mensagem Particular[/url].


GOSTEI 0
POSTAR