Das läßt sich auch für 'ne ganz einfache Komponentenerkennung nutzen.
Man könnte z.B. mehrere Editfelder mit 'nem anderen Wert im Tag versehen und dann:
Delphi-Quellcode:
Edit1.Tag = 1
Edit2.Tag = 2
Edit3.Tag = 3
...
procedure TForm1.Edit1Change(Sender: TObject);
begin
case TEdit(Sender).Tag of
1: ... //cool, da hat jemand was in Edit1 geändert
2: ... //und jetzt in Edit2
3: ... //also jetzt reicht es aber ... einfach so Edit3 zu ändern
...
end;
end;