Código Delphi [-]
procedure TFmRegistro.Button1Click(Sender: TObject);
var
i:Integer;
begin
with ScrollB do for i:= 0 to ComponentCount -1 do
if Components[i] is TLabel then
TLabel(Components[i]).Caption := 'Arpeel';
end;
Tal y como lo tenías, mira en la ventana, pero no dentro del ScrollB.
Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
|