Ver Mensaje Individual
  #1  
Antiguo 23-04-2010
bothy bothy is offline
Miembro
 
Registrado: ene 2010
Posts: 144
Reputación: 15
bothy Va por buen camino
Error al eliminar un registro

hola colegas.
tengo un problemita al eliminar un registro tengo este codigo
Código Delphi [-]
 db.Active :=true;
    db.Delete ;
  db.FieldByName('admin').AsString :=edit3.Text;
  db.FieldByName('pass').AsString :=edit4.Text  ;
  db.Post ;
  db.Cancel;
  application.MessageBox(pchar('Administrador Eliminado'),
      pchar('BIBLIOTECA MOCHICAHUI'), (MB_OK + MB_ICONWARNING));
y me tira este error
Cita:
raised exception class EIBClientError with message'NOt in edit mode'
segun yo el codigo esta bien y me debe eliminar el registro que esta en el
edit3 y edit4 pero no me lo elimina.
tambien tengo este codigo para inserter y modificar
codigo modificar
Código Delphi [-]
db.Active :=true;
  db.Edit ;
  db.FieldByName('admin').AsString :=edit3.Text;
  db.FieldByName('pass').AsString :=edit4.Text ;
  db.Post ;
  db.Cancel;
  application.MessageBox(pchar('Administrador Modificado'),
      pchar('BIBLIOTECA MOCHICAHUI'), (MB_OK + MB_ICONWARNING));
codigo insertar
Código Delphi [-]
db.Active :=true;
db.Append ;
db.FieldByName('admin').AsString :=edit3.Text;
db.FieldByName('pass').AsString :=edit4.Text ;
db.Post ;
     application.MessageBox(pchar('Administrador Registrado'),
      pchar('BIBLIOTECA MOCHICAHUI'), (MB_OK + MB_ICONWARNING));
       db.Cancel ;
de antemano gracias por su ayuda
Responder Con Cita