![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
![]() IniFile:=TIniFile.Create(path+'Inifile.ini');
IniFile.WriteBool('Param', 'A1', a1.Checked); IniFile.WriteBool('Param', 'A2', a2.Checked); IniFile.WriteBool('Param', 'A3', a3.Checked); IniFile.WriteBool('Param', 'A4', a4.Checked); .................. ............. ..............так до A237 Этот код как мне уменшить??? |
#2
|
|||
|
|||
![]() А что, загнать в цикл нельзя? =)
Примерно в таком духе: Код:
P.S. Я так понимаю, что вы записываете состояние флажков CheckBox? |
#3
|
||||
|
||||
![]() Цитата:
но почему то оно выдает ощибку тут chkBox := FindComponent('a' + IntToStr(i)); Код:
В чем проблема?? |
#4
|
|||
|
|||
![]() А, ну я поторопилась немного. Объявите chkBox как переменную типа TComponent
Код:
|