Cita:
Empezado por ioco
Tal como dice delphi.com.ar, lo que quería era clonar una instancia. Entiendo que el método que sugieren para la clonación es asignando propiedad a propiedad mediante ":=" ¿me equivoco?.
|
No, me refería a complementar el método
Assign:
Código Delphi
[-]
procedure TMyClass.Assign(Source: TPersistent);
begin
if Source is TMyClass then
with Source as TMyClass do
begin
FField1 := Field1;
FField2 := Field1;
FField3 := Field1;
...
end
else
inherited Assign(Source);
end;
Cita:
Empezado por ioco
Respecto al tema del sangrado, identación o como queramos llamarlo, me tiene un poco mosca porque me fijo bastante en que quede bien claro y agrupado todo por conjuntos y tal y no acabo de entender qué es lo que les resulta incómodo o molesto. Si me lo pudieran aclarar prometo adaptar el código a su explicación
|
Yo
intento escribir como Borland sugirió:
http://edn.embarcadero.com/article/10280
Saludos!