Hi;
Ich habe folgenden Code:
Delphi-Quellcode:
type TProfilDetails =
class
public
Name:
String;
end;
type TProfil =
class
public
File_version: integer;
Profile:
array of TProfilDetails;
end;
// TCP Servereinstellungen
type TTcpServerPreferencesBindings =
class
public
IP:
String;
Port: integer;
end;
type TTcpServerPreferences =
class
public
File_version: integer;
Bindings:
array of TTcpServerPreferencesBindings;
end;
var
Profil: TProfil;
TcpServerPreferences: TTcpServerPreferences;
Profil_bak: TProfil;
TcpServerPreferences_bak: TTcpServerPreferences;
Mit der Klasse "Profil" und "TcpServerPreferences" arbeite ich ständig. Diese Daten verändern sich häufig in kurzen Zeitabständen. Wie kann ich die Werte von "Profil" nach "Profil_bak" am leichtesten kopieren?
Ich will nicht darauf verweisen, wie ich mit:
Profil_bak := Profil;
tun würde. Ich will in beiden Klassen unabhängig voneinander Werte ändern können. Nur muss die Klasse Anfangs erst alle Werte der anderen Klasse kopiert bekommen... wie geht das am leichtesten?
Gruß
Martin W.