[juangabriel1786]

Me gustaria saber como isertar datos sin usar DBedit en la base de datos, intente con esto

Código Delphi [-]
Tunidades.FieldByName('fecha_registro').Value:=DateToStr(Date);
   Tunidades.FieldByName('fecha_modificacion').Value:=DateToStr(Date);
   Tunidades.FieldByName('usuario_registro').Value:=usuario;
   Tunidades.FieldByName('usuario_modificacion').Value:=usuario;

pero me da un error al tratar de guardar los datos con esto

Código Delphi [-]
Tunidades.Edit;
  Tunidades.Post;
  Tunidades.Insert;
  Tunidades.Edit;

row cannot be located for updating, some values may have been changed since it was last read


La base de datos es Mysql usando ADO

este es el procedure de mi boton: que a la vez guarda y actualiza

Código Delphi [-]
procedure TFunidades.Button1Click(Sender: TObject);
var
   s:String;
begin
  s:='';
  //seleccionamos el campo activo o inactivo
  if RadioGroup1.ItemIndex = 0 then
       s:= 'A'
  else
       s:= 'I';
  DBactivo.Text:=s;
  
//aqui se guarda en la base de datos
  Tunidades.Edit;
  Tunidades.Post;
  Tunidades.Insert;
  Tunidades.Edit;

   //aqui estoy tratando de usignar datos a la base de datos, a parte de los datos que se asignan en el form
  
   Tunidades.FieldByName('fecha_registro').Value:=DateToStr(Date);
   Tunidades.FieldByName('fecha_modificacion').Value:=DateToStr(Date);
   Tunidades.FieldByName('usuario_registro').Value:=usuario;
   Tunidades.FieldByName('usuario_modificacion').Value:=usuario;}


  //conteo para llevar el codigo de la unidades contabilizado
  conteo:=conteo + 1;
  Tunidades.FieldByName('cod_unidad').Value:=conteo;

   DBedit2.SetFocus;

  showmessage('El registro se guardo satisfactoriamente');

end;