Поиск Checked CheckBox в цикле

@vvspl · Регистрация: 18.07.2011

Студворк — интернет-сервис помощи студентам

Пробую найти Checked CheckBox циклом - выдаёт ошибку Access Violation at adress... Read of adress...
Использую 2 способа-ошибка-одна:

1 способ:

C++
1
2
3
4
5
6
7
8
9
String a="TCheckBox",b;
for (int i=0; i<ScrollBox1->ComponentCount;i++)
  {
   b=ScrollBox1->Components[i]->ClassName();
   if (a==b) {
   if(((TCheckBox*)(Components[i]))->Checked==true)
   ShowMessage("Hallo!");
   }
   }

2 способ:

C++
1
2
3
4
5
6
7
8
TCheckBox* check = new TCheckBox(Form1);
 String s="";
 String a="TCheckBox";
   for(int i=0;i<ScrollBox1->ComponentCount;i++) {
   String b=ScrollBox1->Components[i]->ClassName();
   if (a==b){
   check=(TCheckBox*)(Components[i]);
   if (check->Checked)  ShowMessage(check->Name);

Причём в пошаговой отладке всегда спотыкается на 2ом CheckBox-e. (А на Checked CheckBox - никакой реакции)

@nikitapel · 29.09.2011, 21:11

Почитай вот тут думаю разберешься!
Циклическое создание кнопок на форме

Добавлено через 9 минут

C++
1
2
3
4
5
6
7
8
9
10
  TCheckBox *CheckBox;
  for (int i = 0; i < 10; i++) {
    CheckBox=new TCheckBox(this);
    CheckBox->Parent=this;
    CheckBox->Height=30;    // создаем
    CheckBox->Width=190;
    CheckBox->Top=40*i+10;
    CheckBox->Left=10;
    CheckBox->Caption="=)_"+IntToStr(i+1);
  }

C++
1
2
3
for ( int i = 0; i < this->ComponentCount; i++ )
if ( ((TCheckBox *) this->Components[i])->Checked == true)
 ShowMessage(i);

@vvspl · 29.09.2011, 21:20 **[ТС]**

ОЧЕНЬ ВАЖНО!!! ВСЁ, что написано мной выше - отлично подходит для статических объектов (CheckBox). У меня случай с динамическими Чекбоксами. Кто знает - в чём может быть разница????

@nick42 · 30.09.2011, 19:13

Мне кажется, правильнее работать с контролами, а не с компонентами. Например так:

C++
1
2
3
4
5
     for(int i=0;i<ScrollBox1->ControlCount;i++) {
      if (String(Form1->ScrollBox1->Controls[i]->ClassName())=="TCheckBox")
        if (((TCheckBox *)ScrollBox1->Controls[i])->Checked)
          Label1->Caption = Label1->Caption + IntToStr(i);
     }

cpp_developer · 30.09.2011, 19:47

это конечно ... если родитель у контролов один ...

@Gremlin · 30.09.2011, 20:42

Сообщение от LK

это конечно ... если родитель у контролов один ...

верно, а если Родители у них разные, например у
CheckBox1->Parent ==> Form1
a
CheckBox2->Parent ==> Form2 или Panel или ScrollB...

cpp_developer · 30.09.2011, 21:18

тогда компоненты искать, а не контролы

@Gremlin · 30.09.2011, 21:31

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
void __fastcall GetAllCB(TWinControl *Sender); // ÐÅÊÓÐÑÈß!!!
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall GetAllCB(TWinControl *Sender) // ÐÅÊÓÐÑÈß!!!
{
    TCheckBox *tmp_CB;
    for(int i = 0; i < Sender->ComponentCount; i++)
    {
        tmp_CB = dynamic_cast<TCheckBox*>(Sender-> Components[i] );
        if(tmp_CB)
        {
            Form1->Caption = Form1->Caption + IntToStr(tmp_CB->Checked); // Ñþäà çíà÷åíèÿ!!!
        }
    }
 
    for(int i = 0; i < Sender->ControlCount; i++)
    {
        GetAllCB((TWinControl *)Sender->Controls[i]); // ÐÅÊÓÐÑÈß!!!
    }
 
    tmp_CB = 0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    Form1->Caption = ""; // ñþäà áóäåì âûâîäèòü çíà÷åíèÿ
    GetAllCB(this);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    // íó òóò ìû äèíàìè÷åñêè ñîçäàåì
    TCheckBox *CheckBox;
    int myrand;
    for(int i = 0; i < 5; i++)
    {
        myrand = rand()%3;
        if(myrand == 0)
        {
            CheckBox = new TCheckBox(Form1);
            CheckBox->Parent = Form1;
        }
        if(myrand == 1)
        {
            CheckBox = new TCheckBox(ScrollBox1);
            CheckBox->Parent = ScrollBox1;
        }
        if(myrand == 2)
        {
            CheckBox = new TCheckBox(ScrollBox2);
            CheckBox->Parent = ScrollBox2;
        }
        CheckBox->Height = 30;
        CheckBox->Width = 190;
        CheckBox->Top = rand()%100;
        CheckBox->Left = rand()%100;
        CheckBox->Caption = Time();
 
        CheckBox->Checked = rand()%2;
    }
}
//---------------------------------------------------------------------------

@nick42 · 30.09.2011, 21:31

Тогда подскажите КАК сделать ScrollBox родителем CheckBox`ов; другими словами - сколько бы CheckBox`ов я ни размещал на ScrollBox`е, счётчик компонентов у него на нуле.
И непонятно, почему товарищ не воспользовался CheckListBox`ом, - это вроде более подходящая штука; манипулировать Items, а не создавать чекбоксы... .

cpp_developer · 30.09.2011, 21:59

ага... а не влазяет - тогда CheckListBox на ScrollBox

@vvspl · 01.10.2011, 23:37 **[ТС]**

Я так рад таким обильным вниманием к моей теме!)) Всем огромное спасибо! Никогда не слышал о <dinamic_cast>, - но попробовал-работает. Также получилось через Components[i], но посложнее показалось. Очень понравился метод FindComponent() - мне он показался самым лёгким). С компонентом ListBox не сталкивался. Что такое TWinControl и с чем его едят не знаю))

cpp_developer · 01.10.2011, 23:50

С компонентом ListBox не сталкивался. Что такое TWinControl и с чем его едят не знаю))

вот этим я я бы не хвастал, а и тихонько взял - и почитал, а то в следующий раз пошлют ... читать ...

Новые блоги и статьи Все статьи Все блоги /
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	Влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .

@vvspl 1 / 1 / 1 Регистрация: 18.07.2011 Сообщений: 90
	29.09.2011, 21:20 [ТС]
	ОЧЕНЬ ВАЖНО!!! ВСЁ, что написано мной выше - отлично подходит для статических объектов (CheckBox). У меня случай с динамическими Чекбоксами. Кто знает - в чём может быть разница???? 0

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	30.09.2011, 19:47
	это конечно ... если родитель у контролов один ... 0

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	30.09.2011, 21:18
	тогда компоненты искать, а не контролы 0

@nick42 Практикантроп 4841 / 2726 / 534 Регистрация: 23.09.2011 Сообщений: 5,798
	30.09.2011, 21:31
	Тогда подскажите КАК сделать ScrollBox родителем CheckBox`ов; другими словами - сколько бы CheckBox`ов я ни размещал на ScrollBox`е, счётчик компонентов у него на нуле. И непонятно, почему товарищ не воспользовался CheckListBox`ом, - это вроде более подходящая штука; манипулировать Items, а не создавать чекбоксы... . 1

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	30.09.2011, 21:59
	ага... а не влазяет - тогда CheckListBox на ScrollBox 1

@vvspl 1 / 1 / 1 Регистрация: 18.07.2011 Сообщений: 90
	01.10.2011, 23:37 [ТС]
	Я так рад таким обильным вниманием к моей теме!)) Всем огромное спасибо! Никогда не слышал о <dinamic_cast>, - но попробовал-работает. Также получилось через Components[i], но посложнее показалось. Очень понравился метод FindComponent() - мне он показался самым лёгким). С компонентом ListBox не сталкивался. Что такое TWinControl и с чем его едят не знаю)) 0