Objekt kopieren

[Lhid]

Also jetzt siehts so aus:

Code:

neuer.Assign(alter);

jedoch wird der alte dann unsichtbar und der andere hat auch nicht die gleichen eigenschaften...


Lhid

[Lhid]

irgendwie müsste ich das neue Objekt noch von dem alten Objekt loslösen, hat dafür jemand ne idee? mit xyobjectxy.free; klappts nicht *g*



Lhid

[Shaman]

Hoi

Kannst Du mal ein ein wenig mehr Code posten? Sofern es funktioniert, arbeitet Assign schon richtig und es muss nichts losgelöst werden.

Gruss
Shaman

[Lhid]

sieht ungefähr so aus:

Delphi-Quellcode:

Tbutton2:=Tbutton2.Create(Self);
Tbutton2.Assign(tbutton1);

Lhid

[Binärbaum]

Wenn schon, dann müsste der Code so lauten:

Delphi-Quellcode:

Button2:=TButton.Create(Self);
Button2.Assign(Button1);

Oder nicht?

MfG
Binärbaum

[Lhid]

Jo klar, aber das löst trotzdem nicht mein prob...



Lhid

[maximov]

Möglicherweise hilft es, wenn du dein problem ein biischen genauer beschreibst oder mehr code zeigst, denn zum kopieren der objekte benötigt man eigentlich nix weiter. Was dann das korrekte einfügen in den komponentenbaum angeht, so ist möglicherweise noch mehr nötig (owner und parent setzen etc.).

Man kann das klonen auch automatisch gestalten. Voraussetzung ist natürlich eine korrekte implementierung von AssignTo:

Delphi-Quellcode:

function ClonePersistent(const source:TPersitent):TPersisten;
begin
  result := source.classType.create;
  result.assign(source); 
end;

Dann gäb es noch die möglichkeit über RTTI zu klonen, wobei nur published properties kopiert würden und somit ein eigenhängies definieren, jeder einzelnen kopieraktion, gesparrt wird.

[Lhid]

Das ist ein Button der hin und her springt, und dann kopiert wird, allerdings klappt das loslössen vom alten Button nicht, also wenn ich sag button1.visible:= false, button2.visible:=true dann sind beide unsichtbar...


Lhid

[maximov]

Zitat von Lhid:

Das ist ein Button der hin und her springt, und dann kopiert wird, allerdings klappt das loslössen vom alten Button nicht, also wenn ich sag button1.visible:= false, button2.visible:=true dann sind beide unsichtbar...


Lhid

du sprichst in Rätseln! Woher sollen wir wissen woran es leigt, wenn du keine genauen information preisgibst