Como obtener las variables de un objeto

[TEO127]

Hola Roman, la finalidad es que me estoy fabricando un recolector de basura, no lo queria mencionar porque las respuestas se podrian desvirtuar (ej: se podria prestar para que hicieran comentarios de como maneja la memoria delphi, los modelos de memoria, que delphi no necesita un garbage collector,etc. y ese tipo de cosas) y apuntar a otro punto el cual tengo cubierto.

Vamos Roman como en esa gran sabiduria acumulada de mas de 11.000 mensajes no habra algo que me ayude .

Saludos.

[TEO127]

Roman y Dec se han fijado en el Code Explorer de Delphi 7?

hay tres secciones

private

public

published


En esta ventana muestra las variables que quiero recuperar, si el IDE de delphi lo puede mostrar y el IDE esta hecho en Delphi enconces se puede hacer , el problema es como.

Saludos.

[dec]

Hola,

Bueno. Si no quieres que entremos, pues no entramos. Pero, se supone que un objeto que se encarga de inicializar ciertas variables debe encargarse de su destrucción. Para eso están los métodos constructores y destructores de un objeto. ¿No?

Entonces el "garbage colection" que planteas (según a mí se me ocurre) en qué consiste, ¿en liberar determinadas variables de un objeto (o varios) desde fuera de estos? ¿Pero no es más natural destruir los propios objetos que a su vez se encargarán de liberar las variables que sean menester?

Ahora, que si no quieres entrar... no entramos.

[TEO127]

Ves Dec que sucedio lo que yo dije, no queria caer en la discucion de quien debe o no liberar la memoria (en lo cual estamos totalmente de acuerdo) y porque es necesario un recolector de basura. ahora estoy obligado a explicar mas en detalle lo que intento hacer, pretendo liberar de la memoria variables u objetos Activex que estan declarados dentro de un formulario o un objeto cualquiera. y tu me diras pero no se supone que estos Activex se liberan por si solos o con un metodo dispose? y yo te dire que lo que sucede es que estos activex generan un memory Leak ya que no estan muy bien implementados o carecen de un dispose y encontre una forma de liberarlos, pero quiero automatizar el proceso y no estar referenciandolos uno a uno, es por eso que necesito recorrer cualquier objeto y comprobar si hay en el una variable u objeto de tipo "activex" y si es asi lo libero.

Saludos.

[Neftali [Germán.Estévez]]

El truco 42 se titula: "Mostrar las propiedades de uncomponente en Runtime", aunque vale perfectamente para cualquier otro objeto.
Usa RTTI que es la única forma de hacerlo sin programar nada especial (NOTA1); Lo más importante para hacerlo así es que las propiedades que deseas recorrer sean published.

En el caso que has puesto:

Código Delphi [-]
TFormExtb :  TClass  = (TForm)
.
.
Private
.
.
Public
  d : Tipox;//-> esta variable quiero capturar 
  e : Tipoy;//-> esta variable quiero capturar
  f  : Tipoz;//-> esta variable quiero capturar
end;

Habría que modificarlo para que fuera así:

Código Delphi [-]
TFormExtb :  TClass  = (TForm)
.
.
Private
  _d : Tipox;//-> esta variable quiero capturar 
  _e : Tipoy;//-> esta variable quiero capturar
  _f  : Tipoz;//-> esta variable quiero capturar
Published
  property d:Tipox read _d write _d;
  property e:Tipoy read _e write _e;
  property f:Tipoz read _f write _f;
end;

Aunque habría que saber más de lo que necesitas hacer.
(NOTA1) La otra opción, si consigues que todas las clases deriven de una clase base, es programar en la clase Base una lista de variables/propiedades y que cada una de las clases derivadas añada las suyas en el Create (por ejemplo). En la clase basedeberás programar el método que recorra la lista y te las devuelve (no se si me explico...)

[[maeyanes]]

Empezado por TEO127

Roman y Dec se han fijado en el Code Explorer de Delphi 7?

hay tres secciones

private

public

published


En esta ventana muestra las variables que quiero recuperar, si el IDE de delphi lo puede mostrar y el IDE esta hecho en Delphi enconces se puede hacer , el problema es como.

Saludos.

Según tengo entendido, el Code Explorer de Delphi lo que hace es interpretar el código fuente del archivo que está activo en el editor.


Saludos...

[Neftali [Germán.Estévez]]

Empezado por TEO127

...En esta ventana muestra las variables que quiero recuperar, si el IDE de delphi lo puede mostrar y el IDE esta hecho en Delphi enconces se puede hacer, el problema es como.

La diferencia es que el IDE lo hace en Diseño y tú lo quieres hacer en ejecución.
No es lo mismo.
Aunque no lo se de cierto, estoy casi seguro de que maeyanes tiene razón. En ese caso se hace "parseando" los .PAS

[roman]

Más que el Code Explorer, supongo que se refiere al Browser. Y éste sí que muestra las secciones privadas, protegidas, públicas y publicadas, aun en ausencia del .pas

¿Cómo hace esto?

// Saludos

[Neftali [Germán.Estévez]]

Empezado por roman

Y éste sí que muestra las secciones privadas, protegidas, públicas y publicadas, aun en ausencia del .pas

No se a qué te refieres cuando dices "en ausencia del PAS".
Yo creo que debe hacer algo similar a este.
(1) Pulsad Load para cargar el PAS.
(2) Pulsad el botón que pone "Code Tree".

[roman]

Empezado por Neftali

No se a qué te refieres cuando dices "en ausencia del PAS".

Me refiero a eso, a que si inserto una componente en el formulario, del cual sólo tengo los dcus, el browser sí me lista todas las propiedades de la componente.

Empezado por Neftali

Yo creo que debe hacer algo similar a este.
(1) Pulsad Load para cargar el PAS.
(2) Pulsad el botón que pone "Code Tree".

Lo probaría encantado, pero desafortunadamente, todo el ancho de banda disponible está reservado a sus usuarios premium ¿No tenías tú un ftp en el club?

// Saludos

[Neftali [Germán.Estévez]]

Empezado por roman

¿No tenías tú un ftp en el club?

Sí veo que Megaupload los últimos días está dando problemas de este tipo... Habrá que cambiar a otro...
No lo había subido al FTP, porque no es algo que tenga interés fuera de este hilo; De todas formas he creado una carpeta temporal para este tipo de cosas; link.

[Neftali [Germán.Estévez]]

Empezado por roman

Me refiero a eso, a que si inserto una componente en el formulario, del cual sólo tengo los dcus

Bueno con los DCU's también se puede hacer algo similar. Link. Se hace de otra forma, pero sigue siendo un "parseo".