Para hacerlo bien sería algo así:
Código Delphi
[-]
var
comp:TComponent;
begin
...
comp := FindComponent('Updown'+inttostr(a));
if Assigned(com) then begin
if (comp is TUpDown) then begin
TUpDown(comp).Position := 999;
end;
end;
...
De forma similar para el otro.
Una vez que has encontrado el componente (que se devuelve como tipo generico) hay que hacer el CAST, para poder acceder a el con el tipo correcto (en este caso TUpDown).