Ir para conteúdo
Fórum Script Brasil
  • 0

Comunicação com banco de dados


Livio Neiva

Pergunta

eu fiz um formulario de cadastro com as conexão DBExpress, e quando eu insiro dados e confirmo, ou seja eu dou o post, aparece a seguinte menssagem de erro!!!

projetc siscom.exe raised exception class EdatabaseError whith message 'Data truncated for column 'vltotal' at row 1'. process stopped. Use step or run to continue

vltotal é um campo(registro) do meu banco de dados.

o que faço para resolver????

Link para o comentário
Compartilhar em outros sites

11 respostass a esta questão

Posts Recomendados

  • 0
projetc siscom.exe raised exception class EdatabaseError whith message 'Data truncated for column 'vltotal' at row 1'. process stopped. Use step or run to continue

vltotal é um campo(registro) do meu banco de dados.

O erro é : Dados truncados para coluna 'vltotal' na linha 1

verifique o conteudo deste campo se é string ou integer.

abraço

Link para o comentário
Compartilhar em outros sites

  • 0

O MEU CAMPO ('VLTOTAL' DA TABELA) É VALOR MONETÁRIO (0,00), NA MINHA TABELA ESTAR COMO VALOR MONETARIOS DOUBLE 9,2

ESTOU USANDO UM COMPONENTE EDITNUM PARA ENVIAR DADOS PARA TABELA

E NO MEU PROCEDMENTO DE GRAVAÇAO DO EDIT PARA BANCO DE DADOS TA ASSIM

F_DMExpress.Cds_Pagamento.FieldByName('VLTOTAL').AsString := EditValor.Text;

E NO MEU PROCEDIMENTO QUE ENVIA DO BANCO DE DADOS PARA EDITS ESTAR ASSIM

EditValor.Text := F_DMExpress.Cds_Pagamento.FieldByName('VLTOTAL').AsString;

como faço para resolver??

Link para o comentário
Compartilhar em outros sites

  • 0

Foi feito essa alteração

F_DMExpress.Cds_Pagamento.FieldByName('VLTOTAL').Value := StrToFloat(EditValor.Text);

O PROBLEMA CONTINUA COM A MESMA MENSSAGEM DE ERRO E TEM OUTRA MENSSAGEM TB.

Project Aplicom.exe raised exception class EDatabaseError with message 'Unable to find record. No key specified'. process stopped. Use Step or Run to continue.

o q vocês aconselham a fazer agora???

Link para o comentário
Compartilhar em outros sites

  • 0
’50,00’ is not a valid integer value for Field vltotal

'50,00' não é um valor inteiro válido para o campo vltotal

observe que este valor é uma string .. então faça a conversão

exemplo:

procedure TForm1.Button1Click(Sender: TObject);
var num : real; n : string;
begin
   n := '50,00';
   num := strtofloat(n);
   edit1.text := floattostr(num);
end;

abraço

Link para o comentário
Compartilhar em outros sites

  • 0
e onde eu devo colocar esse procedimento???

num button???

Livio... isto é apenas um exemplo, voce é que deve adptar as suas necessidades ( você está bem fraquinho em programação ) procure ler mais sobre o delphi, no forum voce encontrá apostilas de delphi

abraço

Link para o comentário
Compartilhar em outros sites

  • 0

Creio que você deve fazer isso:

F_DMExpress.Cds_Pagamento.FieldByName('VLTOTAL').Value := FloatToStr(EditValor.Text);

e para o outro erro: 'Unable to find record. No key specified' Você deve ter um primary key no seu banco de dados, no caso seria uma tabela chamada codigo por exemplo!, vá até ela atravez do Cds_Pagamento, então vá em Fields, e ache o seu campo "CODIGO", clique nele, e na propriedade provider flags, você precisa setar a opção 'pfInKey' para True.

Abraços!

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...