Ver Mensaje Individual
  #4  
Antiguo 02-04-2007
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.278
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Para hacerlo bien sería algo así:

Código Delphi [-]
var
  comp:TComponent;
begin
  ...
  // Buscar el componente...
  comp := FindComponent('Updown'+inttostr(a));
  // Encontrado?
  if Assigned(com) then begin
    // Comprobar que es del tipo correcto?
    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).
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita