Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #15  
Antiguo 12-09-2006
atani123 atani123 is offline
Miembro
 
Registrado: jul 2006
Posts: 63
Poder: 20
atani123 Va por buen camino
Atencion, mas informacion he puesto esta parte de codigo.

Código Delphi [-]
If dm.trsTransaction.InTransaction Then
Begin
nSize := GetFileSize( dm.IBDB.DatabaseName);
dm.trsTransaction.CommitRetaining;
AssignFile( pFile, 'C:\tamanos.txt');
If FileExists( 'C:\tamanos.txt') Then Append( pFile)
Else ReWrite( pFile);
Writeln( pFile, Format( 'Antes: %0.12d -> Despues: %0.12d = Incremento : %0.12d', [ nSize, GetFileSize( dm.IBDB.DatabaseName), GetFileSize( dm.IBDB.DatabaseName)-nSize]));
CloseFile( pFile);
End;

Resumo, lo que hace es mirar el tamaño de la base de datos antes del commitretaining, despues lo ejecuta y vuelve a mirar el tamaño. Luego almacena los tamaños en un fichero txt. Y este es el fichero obtenido despues de varias grabaciones.


Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040050688 = Incremento : 000000000000
Antes: 000040050688 -> Despues: 000040058880 = Incremento : 000000008192
Antes: 000040058880 -> Despues: 000041844736 = Incremento : 000001785856
Antes: 000041844736 -> Despues: 000043622400 = Incremento : 000001777664
Antes: 000043622400 -> Despues: 000045404160 = Incremento : 000001781760
Antes: 000045404160 -> Despues: 000047181824 = Incremento : 000001777664
Antes: 000047181824 -> Despues: 000048963584 = Incremento : 000001781760
Antes: 000048963584 -> Despues: 000050741248 = Incremento : 000001777664
Antes: 000050741248 -> Despues: 000052523008 = Incremento : 000001781760
Antes: 000052523008 -> Despues: 000054300672 = Incremento : 000001777664
Antes: 000054300672 -> Despues: 000056082432 = Incremento : 000001781760
Antes: 000056082432 -> Despues: 000057860096 = Incremento : 000001777664
Antes: 000057860096 -> Despues: 000059641856 = Incremento : 000001781760
Antes: 000059641856 -> Despues: 000061419520 = Incremento : 000001777664
Antes: 000061419520 -> Despues: 000063201280 = Incremento : 000001781760
Antes: 000063201280 -> Despues: 000064978944 = Incremento : 000001777664
Antes: 000064978944 -> Despues: 000066760704 = Incremento : 000001781760
Antes: 000066760704 -> Despues: 000068538368 = Incremento : 000001777664
Antes: 000068538368 -> Despues: 000070320128 = Incremento : 000001781760
Antes: 000072101888 -> Despues: 000072101888 = Incremento : 000000000000
Antes: 000072101888 -> Despues: 000073883648 = Incremento : 000001781760
Antes: 000073883648 -> Despues: 000075665408 = Incremento : 000001781760
Antes: 000075665408 -> Despues: 000077447168 = Incremento : 000001781760
Antes: 000077447168 -> Despues: 000079224832 = Incremento : 000001777664
Antes: 000079224832 -> Despues: 000081006592 = Incremento : 000001781760
Antes: 000081006592 -> Despues: 000082788352 = Incremento : 000001781760
Antes: 000082788352 -> Despues: 000084570112 = Incremento : 000001781760


Antes del commitretaining se realiza el post de 3 tablas. He probado a eliminar 2 y dejar solamente un post y el resultado es el mismo, solo que al principio en vez de haber n registros que no incrementan tamaño han habido n*3 registros que no incrementan. Luego todo igual.

Última edición por dec fecha: 12-09-2006 a las 10:34:43.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Con que sigo? serfap Varios 6 12-06-2006 18:02:58
Sigo con problemas con los indices Antuan Tablas planas 6 10-10-2005 20:52:11
sigo con MDI pablo OOP 2 27-02-2005 17:42:15
Sigo con mis preguntitas!!! Critter Varios 1 15-12-2004 21:44:05
sigo con la duda ? saps Conexión con bases de datos 1 28-08-2003 11:22:27


La franja horaria es GMT +2. Ahora son las 15:43:29.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi