Error al eliminar un registro

[bothy]

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

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