Associar DataSource a property Components

for i := 0 to ComponentCount do
if Components[i].Tag = 1 then
begin

end;

Dentro do If preciso associar o Data Source a cada componente.