[Resolvido] Erro na Conversão de Variantes.

[Sérgio_BR 0]

Esse código abaixo, foi digitado no evento OnGetText, campo "SubTotal", tipo "Float".

 

 

Text:=FormatFloat('###0.00',qrItensVenda.FieldByName('Quantidade').Value * qrItensVenda.FieldByName('Preco').Value);

 

 

 

Messagem do sistema:

 

Project SysVendas.exe raised exception class EVariantTypeCastError with message "Could not convert variant of type(Null) into type(Double)'.Process stopped. Use Step or Run to Continue.

 

Já revi o código, digitei novamente mas a mensagem de erro persiste...

Como posso corrigir isso?

 

Bom, o Natal se aproxima e eu gostaria, de uma maneira bem simples mas sincera, desejar que todos os participantes desse indispensável Fórum, todos mesmo, tenham um excelente natal e um novo ano, sem crise financeira, com muita saúde, segurança, paz e harmonia junto a seus amigos e familiares.

Deus os abençoe!!! http://forum.imasters.com.br/public/style_emoticons/default/natal_biggrin.gif

 

Obrigado pelas dicas que recebi no transcorrer desse ano!

 

Valeu!!!!!!

 

Um abraço!

Sérgio.

[Chrnos 30]

Sérgio, pela mensagem de erro retornada, o que estou vendo é que o seu programa está tentando converter um valor que está vindo como Null do banco, o que gera o erro. Faça o seguinte para resolver seu problema.

 

try
	 Text:=FormatFloat('###0.00',qrItensVenda.FieldByName('Quantidade').Value * qrItensVenda.FieldByName('Preco').Value);
except
	 Text := '0.00';
end;

Usando um try..except você consegue controlar erros como este e setar comandos para tratar os mesmos quando ocorrem. Outra coisa: coloque um breakpoint nesta linha e verifique o valor que está sendo retornado do banco. Valores nulos não são convertidos e geram erros neste tipo de conversão de valores.

 

Uma dica: sempre que trabalhar com comandos do tipo IntToStr, StrToInt, etc.., use o try except para evitar erros que travem sua aplicação.

 

[]'s

[Sérgio_BR 0]

Valeu, cara, vou fazer a correção.

 

Obrigado!

[Sérgio_BR 0]

Cara, usei o código e continuou dando erro...voltei a ler todo código do form e descobri uma falha de digitação e com isso avancei um pouco....depois das festas volto a ver o aplicativo.

 

Valeu!