[Fmx] Controls und Children mit Deep Copy clonen

[Rollo62]

Hallo zusammen,

ich möchte unter Fmx ein Control, welches Children enthält kopieren,
am Besten den ganzen Baum mit allen Settings, ImageIndex, OnXxxx Handlern, etc.

Ich mache das z.B. per Write/ReadComponent

Delphi-Quellcode:

        try
            LMs.WriteComponent( SpeedButton1 );

            LMs.Position := 0;

            LFmx := LMs.ReadComponent(nil) as TFmxObject;
            LFmx.Name := LFmx.Name + 'b';

            FlowLayout1.InsertControl(0, LFmx);

        finally
            LMs.Free;
        end;

Das funktioniert auch für SpeedButton1, nur der Name muss angepasst werden.
Aber die Children des SpeedButton werden nicht mit dupliziert.

Gibt es dafür eine bequeme Einstellung in WriteComponent, oder eine andere fertige Methode ?

Rollo