IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Работа с компонентми формы в цикле
сообщение
Сообщение #1


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


 j := 0;
for i := 0 to ComponentCount - 1 do
if components[i] is TCheckBox then
with (components[i] as TCheckBox) do begin
inc(j);
new.d[j] := Checked;
end;


Скорее всего в таком случае значение j не будет совпадать со значение номера компоненты TCheckBox и лучьше делать вручную ?

Мне нужно следующее

d[1] := CheckBox1.Checked;
d[2] := CheckBox2.Checked;
...


спсибо.


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов(1 - 2)
сообщение
Сообщение #2


Гость






Ты создаешь CheckBox-ы в Run-Time? Или в Design-Time?

Если в RunTime, то очень удобно в свойство Tag записать при создании номер, а потом в элемент массива с этим номером сохранять значение Checked... В Design-Time с этим больше мороки, надо всем чекбоксам вручную значение Tag присваивать... unsure.gif
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


в Design-Time, спасибо.


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 19.04.2024 9:11
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name