Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #12  
Antiguo 31-10-2012
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
Pero, por ejemplo, si haces:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  c1,c2: TMiClase;

begin
  c1 := TMiClase.Create;
  c1.Cadena:= 'XXXX';

  c2 := c1.Clone;
  c2.Cadena := 'YYYY';

  ShowMessage(c1.Cadena); // Muestra 'YYYY' en lugar de 'XXXX'
end;

Es decir, c2.Cadena y c1.Cadena hacen referencia a la misma cadena. En un clonación, el objeto clonado debería ser inicialmente igual al original en todo aspecto pero cambios posteriores no deberían afectar al otro.

Lo mismo sucedería si tu objeto tuviera otros objetos como propiedades.

Por otra parte, un string lleva un conteo de referencia que, me parece, se alteraría con una asignación usando Move. Es decir, habría dos variables apuntando a la misma cadea pero con un conteo de referencia igual a 1.

Haz la prueba:

Código Delphi [-]
var
  c1,c2: TMiClase;

begin
  c1 := TMiClase.Create;
  c1.Cadena:= 'XX';

  c2 := c1.Clone;
  c1.Free;

  c2.Cadena := 'Hola'; // Genera una violación de acceso porque la cadena origanl ya murió.
  c2.Free;
end;

Y ni qué decir de interfaces, que también llevan un conteo de referencias.

// Saludos
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
Diferencia entre versiones FunBit MySQL 2 18-01-2007 09:45:47
Diferencia entre Delphi emeritos Varios 1 18-11-2006 17:19:50
Diferencia entre Consultas santi33a MS SQL Server 1 08-11-2005 08:19:22
Diferencia entre .GDB y .FDB CarlosHernandez Firebird e Interbase 3 14-09-2005 04:08:49
Diferencia entre fechas.... seb@ OOP 1 21-08-2003 15:57:22


La franja horaria es GMT +2. Ahora son las 12:04:08.


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