Ähm Sharky...
Du versteckst dort Control.Text.
D.h: diese Klasse wird sich nicht so verhalten wie es der Nutzer erwarten würde.
TEdit(DeinEdit).Text wird ohne die Logik aus deinem Setter sein... (Es würde Text von TControl nehmen...)
Es ist
IMHO nicht möglich einem TControl Nachfahren eine brauchbare eigene Implementierung von Text zu verpassen.
Weder setter noch getter sind virtual protected. Also lässt sich da nicht viel auf eine zumutbare Art machen...
