Ver Mensaje Individual
  #3  
Antiguo 12-08-2006
Avatar de xEsk
[xEsk] xEsk is offline
Miembro Premium
 
Registrado: feb 2006
Posts: 454
Reputación: 21
xEsk Va por buen camino
A mi tb me costo escribirlo, a ver si puedo definirlo de otra forma, hehe

Me refiero a q se cree una segunda instancia, q sea una copia de la primera (vamos con los mismos valores) pero q si elimino la primera, esta segunda (la nueva) no se vea afectada de ninguna forma y siga funcionando tranquilamente.

No se si me he explicado mejor (en mi cabeza lo tengo muy claro, pero me cuesta definirlo de una forma q se entienda bien xDD)

El mismo ejemplo, pero mostrado de otra forma:
Código Delphi [-]
var
  obj1, obj2: TMyObject;
  puntero1, puntero2: Pointer;

begin
  obj1:=TMyObject.Create;   
  puntero1:=obj1;
  obj2:=obj1; 
  puntero2:=obj2;

  if puntero1 = puntero2 then
    ShowMessage('Vaya, apuntamos al mismo sitio de memoria!!');    

  obj1.Free;
  // El obj2, no hace falta liberarlo... xD

Saludos.

Última edición por xEsk fecha: 12-08-2006 a las 16:33:59.
Responder Con Cita