Hola, tengo una duda existencial, a ver si me logro explicar bien
Yo tengo un Form, con 10 Label, que van de Label1 a Label10 respectivamente, hay alguna forma en la que yo pueda asignar el caption a todas ellas en un solo procedimiento? pongo un ejemplo:
Código:
procedure RellenaCaptions(Texto:string);
var n:integer;
begin
for n:=1 to 10 do
Label[n].caption:=Texto;
end;
end;
Ya que, podria hacer lo siguiente
Código:
procedure RellenaCaptions(Texto:string);
var n:integer;
begin
for n:=1 to 10 do
TLabel(components[n]).caption:=Texto;
end;
end;
Y lo tendria resuelto, pero mi problema es que, los Labels estan todos cambiados de nombre a desc1,desc2,desc3......desc10 y no se me ocurre como hacerlo.
Saludos