Fórum Problemas para gravar data no banco(interbase) #183248
20/09/2003
0
Ola utilizo a seguinte rotina para gravar uma data de nascimento no banco(interbase):
DmlPrincipal.TBFUNCIONARIOS.Fields[8].Value:= EdNascimento.Text;
mas o delphi retorna o seguinte erro quando preencho o campo desta forma 15/08/1983:
Project LSManager.exe raised exception class EVariantTypeCastError with message ´Could not convert variant of type (String) into type (Currency)´. Process stopped.
e o seguinte erro quando não preencho nada no campo:
Project LSManager.exe raised exception class EVariantTypeCastError with message ´Could not convert variant of type (String) into type (Date)´. Process stopped.
como posso resolver esse problema???
obrigado....KANIGGIA
DmlPrincipal.TBFUNCIONARIOS.Fields[8].Value:= EdNascimento.Text;
mas o delphi retorna o seguinte erro quando preencho o campo desta forma 15/08/1983:
Project LSManager.exe raised exception class EVariantTypeCastError with message ´Could not convert variant of type (String) into type (Currency)´. Process stopped.
e o seguinte erro quando não preencho nada no campo:
Project LSManager.exe raised exception class EVariantTypeCastError with message ´Could not convert variant of type (String) into type (Date)´. Process stopped.
como posso resolver esse problema???
obrigado....KANIGGIA
Kaniggia
Curtir tópico
+ 0
Responder
Posts
22/09/2003
Luciano Pimenta®
Vc deve esta indicando um campo diferente do que espera. tente usar assim:
DmlPrincipal.TBFUNCIONARIOSMEUCAMPO.AsTIPO (AsDateTime, AsString, AsCurrency) := EdNascimento.Text;( se for date tem que tranformar StrToDate(EdNascimento.Text);
DmlPrincipal.TBFUNCIONARIOSMEUCAMPO.AsTIPO (AsDateTime, AsString, AsCurrency) := EdNascimento.Text;( se for date tem que tranformar StrToDate(EdNascimento.Text);
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)