bueno estoy desarrollando un modelo de un aplicativo en el que visualizo el contenido de una base de datos en un columnview, esto lo hago sin problema, pero cuando quiero que al presionar la tecla suprimir se elimine el registro selesccionado no se que sucede lo he intentado con la instruccion sql y con .delete: espero puedan ayudarme
PRIVATE FUNCTION ConectarBase() AS Boolean
IF hconn <> NULL THEN RETURN FALSE
hconn = NEW Connection
hconn.Host = Application.Path
hconn.name = "ejemplo"
hconn.type = "sqlite"
TRY hconn.Open()
IF ERROR THEN
hconn = NULL
Message.Error("error al conectar con la base")
RETURN TRUE
ENDIF
RETURN FALSE
END
PUBLIC SUB tabla_KeyRelease()
IF Key.Code = Key.Delete THEN 'Comprobamos si la tecla es Suprimir
IF tabla.Current = NULL THEN RETURN
IF tabla.Current.Selected = FALSE THEN RETURN
IF ConectarBase() THEN RETURN
hconn.Begin
TRY hconn.Delete("usuarios", "id=&1", tabla.Current.Key)
IF ERROR THEN
Message.Error("Imposible borrar el registro")
ELSE
tabla.Current.Delete()
ENDIF
ENDIF
END
en un principio no tenia la linea hconn.begin, entonces entraba al ciclo de error y siempre salia "imposible borrar registro", al colocarlo no siguio saliendo y se borra el registro del columnview pero al ir a la base de datos el registro no se ha eliminado, intente tambien con hconn.exec("delete from usuarios where id=&1",tabla.current.key)
espero me ayuden compañeros
gracias
