jogar os valores de um edit para uma tabela

[hhmelina 0]

Preciso jogar os valores de um edit para uma tabela, fiz assim, mas deu erro, porque alguns edits não tinham valores coloquei um if, mas acho que está errado, alguém poderia me ajudar???If FProcessos.edit_cancelado.Text=' ' Then Begin Q_Valor.sql.add('update valor set concluidos = :P _Concluido'); Q_valor.ParamByName('P_Cancelado').value :=0 End Else Begin Q_Valor.sql.add('update valor set concluidos = :P _Concluido'); Q_valor.ParamByName('P_Cancelado').value :=strtofloat(FProcessos.edit_cancelado.Text); End;

[Pezzin 0]

Acho que você trocou o nome dos parâmetros:

 

If FProcessos.edit_cancelado.Text=' ' ThenBeginQ_Valor.sql.add('update valor set concluidos = :P_Concluido');Q_valor.ParamByName('P_Concluido').value :=0Q_Valor.ExecSQL;EndElseBeginQ_Valor.sql.add('update valor set concluidos = :P_Concluido');Q_valor.ParamByName('P_Concluido').value :=strtofloat(FProcessos.edit_cancelado.Text);Q_Valor.ExecSQL;End;

[hhmelina 0]

Fiz assim:Q_Valor.sql.add('update valor set deliberado_CRH = 0, remanejamento=0, cancelados=0, concluidos=0, pago=0, pagar=0, analise=0, deliberado=0, fehidro=0, financiamento=0, contratado=0, liberado=0, liberar=0 where ano = 2004'); Q_Valor.Active:=True; Q_Valor.active:=false; Q_Valor.sql.clear; // If FProcessos.edit_cancelado.Text='' Then FProcessos.edit_cancelado.Text:='0'; Q_Valor.sql.add('update valor set concluidos = :P _Cancelado'); Q_valor.ParamByName('P_Cancelado').value :=strtofloat(FProcessos.edit_cancelado.Text);mas agora dá erro SQL...Socorro!!!!

[botaffonso 0]

pra fazer o update você tem q colocar o execSQL, se naum num funciona.... e veja o tipo do campo ano do primeiro sql....