(Resolvido) COULD NOT CONVERT VARIANT OF TYPE (NULL) INTO TYPE (INTEGE

[HELENO de Sant'Anna]

Galera,

estou precisando muito dessa ajuda.

No meu projeto tenho um formulário cujo nome é frmRequerimentos. Ele vinha funcionando normalmente, mas de uns dias pra cá passou apresentar o seguinte problema: quando clico no botãoNOVO dá um erro com a mensagem: 'Could not convert variant of type (Null) into type (Integer)'.

IMPORTANTE: A seta verde fica posicionada na seguinte linha de código:

dm_dadosSeduc.tbl_requerimentos['NomePeriodo']:=

(IntToStr(dm_dadosSeduc.tbl_requerimentos['REQ_PERIODO'])+' '+'DIAS'+' '+'('+'DE:'+' '+DateToStr(dm_dadosSeduc.tbl_requerimentos['REQ_DATAINICIO'])+

' '+'ATÉ'+' '+DateToStr(dm_dadosSeduc.tbl_requerimentos['REQ_DATATERMINO'])+')');

Acontece que apaguei essa linha de código e continua apresentando o mesmo erro.

Não sei mas como resolver.

Um abraço, por favor me ajudem.

[Jhonas]

'Could not convert variant of type (Null) into type (Integer)'.

Erro: Não foi possível converter variante do tipo (nulo) em tipo (Inteiro)

exemplo do erro

Procedure TForm1.Button1Click(Sender: TObject);
var x : integer; y :variant;
begin
   y := null;
   x := y + 1;
   showmessage(inttostr(x));
end;

nesse código vai ocorrer esse erro: 'Could not convert variant of type (Null) into type (Integer)'.

verifique o seu código

abraço

[HELENO de Sant'Anna]

Muito obrigado Jhonas,

Vou dar uma olhada no meu código, qualquer coisa volto.

[HELENO de Sant'Anna]

Boa tarde,

Não consegui ainda resolver o problema acima descrito. No entanto pensei: se o erro só ocorre quando aciono o botão NOVO então ele (erro) deve estar relacionado ao código desse botão?. Então deletei praticamente todo o código desse botão (numeração automática etc.) e deixei apenas a linha de código:

dm_dadosSeduc.tbl_requerimentos.Append;

Resultado: a mensagem não aparece mais quando aciono o botão NOVO, no entanto, não consigo inserir um novo registro pois digito qualquer valor no primeiro campo do formulário (que é um campo integer) e dou um TAB aí a irritante mensagem retorna a aparecer (Could not convert variant of type (Null) into type (Integer)). Ou seja, é como se existisse um problema de conexão entre o formulário e o banco, mas já olhei todo o código e não consegui descobrir.

IMPORTANTE 01: Diretamente no banco consigo inserir registros normalmente.

IMPORTANTE 02: Quando aciono o botão NOVO do formulário descrito nos posts anteriores, cria-se um registro em branco no DBGrid do formulário, mas não consigo inserir dados nesse registro.

Alguém já teve alguma experiência semelhante?

Aguardo resposta, por favor.

[Jhonas]

amigo, primeira coisa a se levar em conta é a definição dos campos da sua tabela no banco de dados

obs: voce não disse qual é o banco de dados que esta usando

Diretamente no banco consigo inserir registros normalmente.

se no programa voce definiu alguma variavel como ex: ( y :variant; ) voce tem que trabalhar com o tipo especifico ou fazer a devida conversão de tipos

usando o break point ( debugger ) do dephi voce chega extamente onde ocorre o erro no programa

cria-se um registro em branco no DBGrid do formulário, mas não consigo inserir dados nesse registro.

lembre-se que sempre depois de um comando Append ou Insert voce deve usar o comando Edit para que voce possa alterar o registro ( depende de quais componentes voce esta usando para acessar a tabela do banco de dados )

exemplo:

dm_dadosSeduc.tbl_requerimentos.Append;

dm_dadosSeduc.tbl_requerimentos.Edit;

abraço

[HELENO de Sant'Anna]

Boa noite, Jhonas.

Primeiramente obrigado pelo comentário. Acabei de Resolver o problema descrito acima. Era um erro em um CAMPO CALCULADO. Pense numa sofrência. Segui seu conselho e debuguei o Projeto com paciência até identificar com precisão onde estava o erro.

Valeu mesmo!