Moldear una cadena para convertirla en un TLabel

[ecfisa]

Hola Tortuguica.

Código Delphi [-]
...
var
  pedido: string;
begin
   pedido:= Copy((Sender as TSpeedButton).Name, 3 ,Length((Sender as TSpeedButton).Name));
   (FindComponent('pv'+pedido) as TLabel).Font.Color:= clPurple;
   (FindComponent('pd'+pedido) as TLabel).Font.Color:= clPurple;
end;

Saludos.

[Tortuguica]

Muchísimas, muchísimas gracias, Ecfisa :-) Voy a aprovechar, ya que no sé cuándo volveré a colgar un hilo de nuevo (sí, este es el primero), para decir que esto del Club Delphi es maravilloso. ¡Se encuentran todas las soluciones, es increíble! Gracias de nuevo y un saludo desde Elche, España.

[[Al González]]

Empezado por Tortuguica

[...] esto del Club Delphi es maravilloso. ¡Se encuentran todas las soluciones, es increíble! Gracias de nuevo y un saludo desde Elche, España.

Es un gusto observar ese entusiasmo. Me hace pensar que recomendarás este sitio cuando veas a alguien que necesite ayuda con Delphi.

Saludos desde México.

Al.

[Tortuguica]

Creo que antes lo he hecho mal (yo quería contestar a tu respuesta, no a mi pregunta), así que, por si acaso, quiero agradecerte tu respuesta, que, como ya sabrás, ha solucionado mi problema. ¡Jo, yo quiero saber tanto como vosotros...! ;-)

[ecfisa]

Empezado por Tortuguica

para decir que esto del Club Delphi es maravilloso. ¡Se encuentran todas las soluciones, es increíble! Gracias de nuevo y un saludo desde Elche, España.

Hola Tortuguica.

Me alegro mucho que solucionaras tu problema y que te lleves una buena impresión del Club.

Espero que sigamos leyendote, aca estaremos...

Saludos.

[Tortuguica]

Por supuesto que recomendaré esta web. De hecho, los profesores del Instituto donde estudio nos la recomiendan, aunque yo ya la conocía antes de que ellos me lo dijeran por primera vez, ojo. Durante los 14 meses que llevo programando en Delphi, el Club me ha solucionado, que yo recuerde, unos 20 problemas, más o menos. Pero esta ha sido la primera vez que he hecho una consulta en Google (siempre la hago en Google, y el primer resultado siempre conduce al Club) y no he encontrado la solución, así que por eso me decidí a colgar un hilo, y lo que me ha sorprendido, claro, ha sido la rapidez de la respuesta, así que estoy encantado :-)
Gracias de nuevo a los dos. De verdad que es un gustazo encontrarse con gente tan preparada y que, además, sea tan amable como para dedicar su tiempo a resolver los problemas de los demás. Un saludo.

[[Al González]]

Bienvenido Tortuguica.

Debes usar FindComponent como te sugiere ecfisa (si es que el formulario es el dueño de los componentes que creas en tiempo de ejecución), ya que los moldes de tipo como el que intentabas no realizan operaciones de búsqueda, son simplemente para tratar un bloque de memoria bajo la forma que tenga una clase o tipo diferente.

Sólo cambiaría la sentencia:

Código Delphi [-]
pedido:= Copy((Sender as TSpeedButton).Name, 3 ,Length((Sender as TSpeedButton).Name));

por:

Código Delphi [-]
pedido:= Copy((Sender as TSpeedButton).Name, 3, MaxInt);

Saludos.

Al González.