Du kannst auch, wenn du die Komponenten entsprechend benannt hast, erstmal schauen, wie die Komponente heißt und dann auf den Komp.typ schließen.
Delphi-Quellcode:
function SiS(s,SubStr:string):boolean; //StringInString prüft, ob ein String in einem längeren vorkommt
begin
result:=false;
if Pos(SubStr,s)>0 then
result:=true;
end;
function TypBestimmen(AComp:TComponent):string;
var s:string;
begin
s:=AComp.Name;
if SiS('edit',s) then result:='Editfeld'
else if SiS('Checkbox',s) then result:='Checkbox'
else if ...
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Showmessage(TypBestimmen(Editfeld{ as TComponent}));
end;
Was ich aber machen würde, ist, dass du eine globale Variable namens "geaendert" nimmst und sie auf true setzt, wenn der Anwender etwas irgendwo rein schreibt.