Problemas para gravar data no banco(interbase)
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
Curtidas 0
Respostas
Luciano Pimenta®
20/09/2003
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);
GOSTEI 0