Ich habe keine Ahnung von FMX, aber gibt es in TSwitch evtl. eine protected SetChecked-Methode? Das wäre IMO der geeignetere Ort für das Setzen des Textes, dann überschreibt man einfach die anstatt neue Setter einzuführen.
BTW: nicht auf true prüfen tun