Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 01-05-2007
Avatar de droguerman
droguerman droguerman is offline
Miembro
 
Registrado: abr 2005
Ubicación: tierra
Posts: 999
Poder: 20
droguerman Va por buen camino
al llamar al constructor estás reservando memoria en el heap, la variable solo sirve en este caso para no perder la referencia de donde está esa clase, luego cuando la asignamos como un nuevo elemento de TList (en el ejemplo que te dí), aun recordamos la referencia a memoria
__________________
self.free;
Responder Con Cita
  #2  
Antiguo 01-05-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 29
Lepe Va por buen camino
Las variables de ese tipo "no están bien vistas" . Pero vamos... se siguen usando.

Tendrás que ver donde necesitas la variable y la visibilidad, me explico:
Código Delphi [-]
unit clases;

interface

uses ....

Type Cliente = class (Tobject)


var pepe: TCliente;

implementation 

uses ...

var jose :TCliente



initialization 
  pepe := TObject.Create;

finalization
  pepe.Free;

Si necesitas que fuera de la unidad, se pueda hacer uso de pepe,
tendrás que declarar la variable pepe en la zona de interface.

Si solo usas la variable temporalmente y no quieres que sea accesible desde fuera de la unidad "Clases", entonces, usa una variable del tipo jose (en la zona de implementación).

En ambos casos, debes llamar al constructor de la clase para crear el objeto. Una de las formas, te la muestro con pepe, creando dicha variable cuando se haga uso de la unidad por primera vez (initialization), y manteniéndolo en memoria hasta que la unidad ya no haga falta (cuando cierres el programa).

Si necesitas más control de si está creada o no, puedes hacerlo así:
Código Delphi [-]
unit clases;

interface

uses ....

Type Cliente = class (Tobject)


var pepe: TCliente;

implementation 

uses ...

var jose :TCliente

procedure uno;
begin
  if not assigned(jose) then // preguntamos si jose ha sido creado en memoria
    jose := TCliente.Create;// no está creado, así que lo creamos
  jose.nombre := 'jose';
  // trabajar con jose

  FreeAndNil(jose); // lo destruimos asegurando que se asigna un nulo, para 
// que la proxima vez que se ejecute este procedimiento funcione
// la pregunta "not assigned(jose)
end;

Lo que si espero que quede claro, es que "pepe" no es lo mismo que "jose"

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #3  
Antiguo 02-05-2007
Avatar de juangiron
juangiron juangiron is offline
Miembro
 
Registrado: ene 2007
Posts: 26
Poder: 0
juangiron Va por buen camino
Thumbs up Gracias!!

ya me quedo claro.. MIL GRACIAS PARA TODOS,,, CHEVERE QUE SE PREOCUPEN POR AYUDAR A LA DEMAS GENTE... POR ULTIMO ME QUEDA PREGUNTARLES si existe algún libro que me puedan recomendar para comprarlo... o donde encuentren ebooks sobre delphi....
Responder Con Cita
  #4  
Antiguo 02-05-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 29
Lepe Va por buen camino
la cara oculta de delphi 4 es gratuito y podrás encontrarlo rápidamente en google.

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #5  
Antiguo 02-05-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por Lepe
Las variables de ese tipo "no están bien vistas" . Pero vamos... se siguen usando.
¿A qué te refieres?

// Saludos
Responder Con Cita
  #6  
Antiguo 02-05-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 29
Lepe Va por buen camino
Ahora que lo mencionas, he suspuesto mucho, de hecho, he supuesto que se trata de variables globales, pero pensaba en otras cosas. Ahora mismo recuerdo las variables:

ShortdateTime, LongDateTime, DecimalSeparator, etc de la unidad SysUtils, así que... tendré que rectractarme de lo dicho :P


OFFTOPIC: joo.. no se puede tener un lapsus de memoria en estos foros...

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
Respuesta



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
ayuda paso a paso Shared Connection eangeles Providers 0 09-11-2006 02:06:04
Novato (Paso a Paso de una consulta) enecumene Conexión con bases de datos 2 29-05-2006 20:52:19
Paso de Array en variable $_POST mieltxo PHP 4 16-06-2005 08:22:51
como paso variables entre paginas.php sarga PHP 5 22-08-2004 02:06:40
Paso de parametros entre delphi y c++ jsb C++ Builder 0 16-02-2004 16:22:49


La franja horaria es GMT +2. Ahora son las 08:10:25.


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