Ich habe noch zusätzlich in deinen Code eingefügt:
Code:
if aParentForm <> nil then
Back.RoundedCorners := Dimm_Values.aParentForm.RoundedCorners;
Ich konnte es unter Windows 11 nicht testen, ist der Feier mit deinem zusätzlichen Code behoben?
LG Mathias