Fórum Trocar todos os Datasets de um Form #327566

Ola amigos.
Preciso mudar o Dataset de todos os Controles do Form em tempo de execução.
Consigo acessar as propriedades básicas de todos assim.
for I := 0 to Self.ComponentCount - 1 do
if Self.Components[I] is TControl then
if ((Self.Components[I] is TCustomEdit) or (Self.Components[I] is TCustomComboBox)) then TCustomControl(Self.Components[I]).OnEnter := ControleEnter;
Beleza para as propriedades de cor , fonte e etc.
Como faço para alterar o DataSet do componente , neste mesmo loop.
Alguem já passou por isto ?
Agradeço antecipadamente.