Hallo Mathias (NoGAD),
der Ansatz ist nicht schlecht, aber es gibt zumindest unter Windows 11 noch ein weiteres Problemchen.
Die Fensterecken können Rund sein, dein Bereich ist aber immer eckig und das sieht dann etwas komisch aus.
Ich habe noch zusätzlich in deinen Code eingefügt:
Code:
if aParentForm <> nil then
Back.RoundedCorners := Dimm_Values.aParentForm.RoundedCorners;
Ansonsten gut gemacht
LG
DaCoda™