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