buenas,
despues de mirar mil veces el codigo no doy con el error, quizas sea una tonteria, pero yo no veo donde falla, decir que el compilador no salta, la aplicacion corre sin problemas, lo unico es que no agrega nuevos registros a la base de datos. El codigo seria este...
Código Delphi
[-]adotabla.Insert;
adotabla.Fields[0].AsString:= lbEdit1.Text;
adotabla.Fields[1].AsString:= lbEdit2.Text;
adotabla.Fields[2].AsString:= lbedit3.Text;
adotabla.Fields[4].AsString:= memo2.Text;
begin
if telf.EditText = '_________' then
adoTabla.Fields[3].AsString := '000000000'
else
adoTabla.Fields[3].AsString := telf.text;
lbEdit1.SetFocus
end;
A ver si vosotros veis donde esta el error.
gracias y saludos.