for i:=1 to 3 do TScrollbar(findcomponent('sb'+inttostr(i))).position:=0;
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionfor x :=0 to Form1.ComponentCount-1 do if Components[x] is TScrollbar then (Components[x] as TScrollbar).position:=0;