![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Здраствуйте. Возникла следующая потребность, мне надо например через цикл массово изменить свойства компонента Tedit, а именно, visible. Т.к. едитов у меня около 60 штук, получится очень долго, да и мне их не 1 раз изменять надо. Так же едиты у меня названы по разному.
1) form2.name их 9 штук, т.е. form2.name2, form2.name3.... 2) form4.idl их 44. 3) form4.klv их то же 44. Дак вот сам я честно говоря пытался сделать, к тому же использовал гугл. Но ничего кроме 1 варианта я не нашёл, там был такой вариант: Через финд компонент изменяем свойство всех Tedit, которые нашли. Но мне надо только с определёнными именами. Пытался написать такой код: Код:
For i := 2 to 10 Do Begin S := ''; e1 := FindComponent('form2.name' + IntToStr(I)) As TEdit; e1.Visible:=false; |