Fórum Inserção de data, se o cliente não digitar a data do comput. #335322

28/12/2006

0

olá, bom dia a todos.

Estou com uma duvida aqui no delphi e gostaria de compartilhar com vcs...

é uma tela de cadastro de produtos, eu inclui um campo data da implantação, antes de gravar preciso validar essa data:
Estava pensando assim, mas está totalmente errado, depois q fui ver:
If (cdsPadrao.State = dsInsert) and (cdsPadraoPROD_DATAIMPLANTACAO.AsDateTime <> ) then
cdsPadraoPROD_DATAIMPLANTACAO.AsDateTime := Date;

EU SEI Q ESSE COMANDO ESTÁ ERRADO...MAS AINDA N ACHEI A MANEIRA CORRETA DE RESOLVER, POR FAVOR, QUEM SOUBER, ME DE UMA DICA.....
GRANDE ABRAÇO

MARCIA OLIVEIRA.


Placido

Placido

Responder

Posts

28/12/2006

Macario

Olá placido,

tente:


If (cdsPadrao.State in [dsInsert,dsEdit]) and (cdsPadraoPROD_DATAIMPLANTACAO.isNull ) then 
cdsPadraoPROD_DATAIMPLANTACAO.AsDateTime := Date; 


Espero que ajude.


Responder

Gostei + 0

30/12/2006

Aroldo Zanela

Colega,

Normalmente faço isso no manipulador de eventos OnNewRecord:

OnNewRecord

TabelaXColunaDataCadastro.Value := Now;


Desta forma, sempre será ´sugerida´ como padrão a data do PC. Dependendo do SGBD e da criticidade dessa informação, recorrer a funções do banco de dados.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar