Saber cuanto ocupa un objeto en memoria

[AFilth]

Buenos días,

hay alguna forma de saber lo que ocupa un objeto creado en memoria?

Me explico.

Si tengo este código:

Código Delphi [-]
  TClase2 = class
    public
      Aux: String;
      constructor Create(A: String);
  end;

  TClase1 = class
    N: String;
    Numero: integer;
    Lista: TObjectList;
    constructor Create();
  end;

procedure TForm1.Button1Click(Sender: TObject);
var
  a: TClase1;
  b, c, d: TClase2;
begin
  a := TClase1.Create;
  b := TClase2.Create('cosa1');
  c := TClase2.Create('cosa2');
  d := TClase2.Create('cosa3');
  a.N := 'Clase1';
  a.Numero := 1;
  a.Lista.Add(b);
  a.Lista.Add(c);
  a.
  ShowMessage(intToStr(a.InstanceSize));
end;

{ TClase2 }

constructor TClase2.Create(A: String);
begin
  Aux := A;
end;

{ TClase1 }

constructor TClase1.Create;
begin
  Lista := TObjectList.Create;
end;

Da igual cuantos objetos añada a la Lista del objeto a que siempre me va a devolver 16 bytes. Que es la suma de 4 bytes del puntero a la clase, + 4 del String, +4 del entero + 4 del puntero a la objectlist. Pero esa objectlist e incluso el string pueden variar en tamaño. Como puedo saber realmente lo q ocupa en un momento dado????

[[coso]]

hola, echale un vistazo a la funcion sizeof (aunque ahora mirando la ayuda no estoy seguro si te dara el tamaño del objeto o del puntero...). Saludos.

[poyo]

no creo que eso sea tarea sencilla. Es muy necesario? hay alguna que otra estructura interna en los objetos como ser la VMT.
Necesitas saber la instancia o los datos de la instancia?
De ser esto último, las propiedades "published" y "Stored" es suficiente? si es así, bastará con recorrer el objeto Rtti mediante... también debes recorrer a todo lo persistente que cuelgue de él.

[[Al González]]

Hola AFilth.

Te hago las mismas preguntas que Poyo, solicitándote que nos plantees cuál es el propósito de conocer el tamaño de toda la rama de datos (o aclares si es otra cosa lo que buscas). ¿Algo que ver con el almacenamiento de los mismos en algún medio? Danos más detalles de tu caso, por favor.

Empezado por poyo

hay alguna que otra estructura interna en los objetos como ser la VMT.

Secundando el comentario de Poyo, en la RTTI muchas clases tienen algo llamado "tabla de inicialización" (initialization table), en el desplazamiento negativo vmtInitTable de su VMT (ver unidad System.pas). Su existencia permite que los objetos automáticamente liberen campos ("variables" de datos) de tipos que usan contadores de referencia, cuando las instancias son destruidas. Gracias a esa información es posible conocer más sobre la memoria que ocupan ciertos campos, como los de tipo String, pero no puedes conocer del todo las ramificaciones de punteros como los campos de tipo objeto (a menos que éstos estén representados por propiedades publicadas).

Sin adentrarnos más en el lado "tenebroso" del compilador, te invito a dar algo más de contexto sobre tu caso.

Saludos.

Al González.

[[Chris]]

Se me ocurre una idea, serviría escribir todo el contenido del objeto a un TStream y luego obtener el tamaño de este Stream?

Saludos.

[[Al González]]

Empezado por D&W

Se me ocurre una idea, serviría escribir todo el contenido del objeto a un TStream y luego obtener el tamaño de este Stream?

Saludos.

Si es a través de los mecanismos estándares de la VCL, el problema con eso sería que sólo se escribirían las partes publicadas (published) y todo aquello que estuviera explícitamente programado para poder ser escrito a un flujo (stream).

Saludos.

[JXJ]

Empezado por AFilth

Buenos días,

hay alguna forma de saber lo que ocupa un objeto creado en memoria?
Como puedo saber realmente lo q ocupa en un momento dado????

lo que quiere saber es cuanto ocupa su objeto que creo.
para saber cuanto consume de memoria su programa, al hacer varias operaciones del mismo tipo que nos pone de ejemplo.
y hacer un bien programa que consuma pocos recursos sea eficiente.

¿yo tambien me pregunto como medir la memoria que consume mis programas?

[[Al González]]

Empezado por JXJ

lo que quiere saber es cuanto ocupa su objeto que creo.
para saber cuanto consume de memoria su programa, al hacer varias operaciones del mismo tipo que nos pone de ejemplo.
y hacer un bien programa que consuma pocos recursos sea eficiente.

Es posible, pero AFilth todavía no responde a las dudas que nos surgieron de su comentario inicial.

[poyo]

Al, si bien esto se está tornando "Off topic", he leido tu mensaje y me puse de inmediato a ello... curiosidad, vio?
Así que decidí habrir otro nuevo hilo para que este no se vaya por las ramas:

http://www.clubdelphi.com/foros/showthread.php?p=336279