Percorrer todos os eventos OnExit dos edits no formulario DELPHI

for i:= 0 to (Self.ComponentCount -1) do begin
    if (Self.Components[i] is TEdit) then begin
      (Self.Components[i] as TEdit).OnExit(Self);
    end;
  end;