![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|
|
#1
|
||||
|
||||
|
Pues depende de con que ataques la base de datos...
Si no estoy mal, las IBX por ejemplo... traen algo como un ibxSQLMonitor con el que podrias generar el log. Hasta luego. ![]()
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
|
#2
|
|||
|
|||
|
Respuesta para jachguate!!!
Hola, gracias por responderme!!
Pues veras, yo utilizo TTables y TQuerys que están ligadas con un TDatabase en un formulario de tipo module (y las bases de datos son de tipo PARADOX). Puedes seguir ayudándome (o alguien que esté por aquí)? Gracias anticipadas de nuevo ![]() |
|
#3
|
|||
|
|||
|
Puedes hacer una función genérica y llamarla desde el evento AfterPost de los TTables o TQuerys aprovechando que reciben como parámetro un Dataset
Lo pongo de cabeza y sin comprobar el funcionamiento, para que pilles la idea Código:
procedure TForm1.CrearLog(DataSet: TDataSet);
var
i : integer;
F: TextFile;
begin
// gestión de abertura de fichero
.......
// gestión del Dataset
for i := 0 to DataSet.Fields.Count - 1 do
Writeln(F, DataSet.Fields[i].FieldName + ': ' +
DataSet.FieldByName(DataSet.Fields[i].FieldName).AsString);
// gestión de cierre fichero
.....
end;
procedure TForm1.Tabla1AfterPost(DataSet: TDataSet);
begin
CrearLog(Dataset)
end;
|
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|