como gravar só o ano no sistema

[wilsoncrescencio 1]

Olá Pessoal Feliz 2007... a todos!Delphi7 - ADO Connection - BD ACCESSEstou desenvolvendo um sistema e preciso gravar apenas o ano corrente(2007) em um campo e a data tipo 02/01/2007 em outro campo.Isso de maneira automática.Como posso fazer isso?Sem usar SQL.

[Hugo Slepicka 0]

Cria um campo Integer ou string para o Ano...

 

ai você faz um DECODEDATE... pega o ano e grva na tabela, e no outro campo do tipo data mesmo você grava a data normal!!!

 

flw aew! http://forum.imasters.com.br/public/style_emoticons/default/natal_noel.gif

[wilsoncrescencio 1]

Hugo... desculpa a ignorância cara... mas fiquei de ar...Como eu faço isso? Decodate?

[Vinicius Callegaro 0]

no BeforePost da sua tabela coloque:

 

Tabela.FieldByName('CampoDataAno').AsInteger:=YearOf(Tabela.FieldByName('CampoDataCompleta.AsDate'));

[marcio.theis 3]

Uma outra dica seria criar este campo de ano do tipo integer, assim fica mais simples para se um dia precisar fazer um SQL e mandar ordenar pelo ano, outra forma de fazer, quase a mesma coisa que os demais passaram seria:

 

TabelaCampoANO.Value:=YearOf(Date); //Pega o ano da data corrente do sistema.TabelaCampoDATA.Value:=Date; //Pega a data corrente do sistema.

[wilsoncrescencio 1]

Eu nem sei quantos obrigados seriam necessários para agradece-los.Vcs estão sempre ajudando... muito obrigado

[marcio.theis 3]

Falow... http://forum.imasters.com.br/public/style_emoticons/default/bye1.gif