Ver Mensaje Individual
  #20  
Antiguo 10-07-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.275
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
Ya te han puesto el código que funciona correctamente:

Cita:
Empezado por joanajj
...pero claro no consigo que el string quien[10] sea el nombre del objeto. Haceros a la idea de algo así : quien[10].left:=21;
por supuesto no funciona, pero es la idea gral.
Si tienes el combre del componente en un string, con este código puedes acceder al componente:

Código Delphi [-]
procedure BotonVisible;
begin
  BotonGeneral := nil;
  BotonGeneral := FindComponent(nombreboton[5]);
  if BotonGeneral <> nil then
    TButton(BotonGeneral).Visible := False;
end;

Sólo que en tu caso debes cambiar el Button por un Tjvimage.

Algo así:

Código Delphi [-]
procedure CambiarFicha;
begin
  FichaGeneral := nil;
  FichaGeneral := FindComponent(quien[10]);
  if FichaGeneral <> nil then
    TJVImage(FichaGeneral).Left := 5;  
    TJVImage(FichaGeneral).Top := 100;
    ....
end;

Nota: Yo utlizaría parámetros en esta función para pasar nombre, Left, Top,...
__________________
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