FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Ejecucion:No modifica los campos de un Query (Delphi)
Planteo mi problema:
Estoy realizando un pequeño sistema en Delphi con Base de Datos SQL SERVER 2000. Tengo dos tablas BDusuario y otra BDbitacora creadas en SQL, Y el el Módulo de Delphi he creado las respectivas tablas, y tambien estoy usando un Query (<--QbitUsuario), donde selecciono todo los campos de las dos tablas (Usuario y Bitacora) comparando sus llaves en este caso es CiUsuario: Select * From DBusuario,DBbitacora Where CiUsuario=CiU Todo bien hasta esta parte. Pero una vez que ejecuto el sistema, ingreso el password y si es correcta la contraseña pues ahi programe lo sigte, donde Q <--es el Modulo donde esta el Query<--QbitUsuario y su DataSource Q.QbitUsuario.Append; Q.QbitUsuario.Insert; Q.QbitUsuario.Edit; Q.QbitUsuario['CiUsuario']:=DM.Tusuario['CiUsuario']; Q.QbitUsuario['NomUsuario']:=DM.Tusuario['NomUsuario']; Q.QbitUsuario['ApePU']:=DM.Tusuario['ApePU']; Q.QbitUsuario['NivelU']:=DM.Tusuario['NivelU']; Q.QbitUsuario['Fec_Ingreso']:=Date; Q.QbitUsuario['Hr_Ingreso']:=Time; Q.QbitUsuario.Post; Con est código quiero que me registre en QbitUsuario los usuarios que estan ingresando al sistema, la hora y la fecha. Y una vez terminado las tareas, pues debo cerrar el sistema. Y donde esta el boton SalirSistema programe lo siguiente: Recordando "Q" es el Modulo donde esta el Query<--QbitUsuario procedure TFprincipal.SalirSistemaClick(Sender: TObject); begin With Q do Begin QbitUsuario.Append; QbitUsuario.Edit; QbitUsuario.Insert; QbitUsuario['Hr_Salida']:=Time; QbitUsuario.Post; End; Application.Terminate; //close; end; Y justo cuando estoy por terminar la aplicacion me aparece el siguiente error: Project Pbecarios.exe raised exception class EDBEngineError with message 'QbitUsuario:Cannot modify a read-only dataset'.Process stopped. Use Step or Run to continue. Pues revicé en sus propiedades ya no se donde es el error...y luego me aparece el siguiente error, despues de hacer click en OK. QbitUsuario:Cannot modify a read-only dataset Por favor preciso sus ayudas. Gracias! |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
como cargar un Query en tiempo de ejecucion | sancarlos | SQL | 1 | 15-08-2008 05:24:09 |
quickreport con query en ejecucion | lejia | Impresión | 13 | 14-01-2008 22:02:51 |
Ejecución de query sin congelamiento | fryguy | SQL | 3 | 20-07-2005 15:08:58 |
IBDataset no modifica | istradlin | Conexión con bases de datos | 2 | 19-04-2005 23:44:22 |
Campos de una Query | silviodp | Impresión | 1 | 18-05-2004 17:30:42 |
|