Удаление динамически созданных объектов

@delete1991 · Регистрация: 05.02.2011

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

Помогите плз. Пишу курсач по МИО. Вот ща работаю над интерфейсом. Я по нажатию кнопку создаю динамически объект edit. Хочу теперь при нажатии другой кнопки удалять этот объект, но не пойму как это реализовать. Помогите плз.
Вот мой код клавиши по которой создается объект. Всего может создатся 6 динамических объектов

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (i_e<=6) { //дин.создание edit (ограничение 6 дин.созданных edit)
        top_edit+=30;
        height_group+=30;
        GroupBox1->Height=height_group;
        TEdit *edit=new TEdit(this);
        edit->Parent=GroupBox1;
        edit->Name="Edit"+AnsiString(i);
        edit->Text="";
        edit->Width=337;
        edit->Height=27;
        edit->Left=8;
        edit->Top=top_edit;
        i++;
        i_e++;
        }
        else ShowMessage("Превышен лимит создаваемых полей ввода");
}

cpp_developer · 06.02.2011, 01:17

Для прммера

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
TForm1 *Form1;
TEdit *edit;
...
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (i_e<=6) { //дин.создание edit (ограничение 6 дин.созданных edit)
top_edit+=30;
height_group+=30;
GroupBox1->Height=height_group;
edit=new TEdit(this);
...
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  delete edit;
}

НО, если ты указываешь владельца, в данном случае this = Form1, то самостоятельно - delete edit; - делать нужды нет, потому что он будет разрушен при разрушении владельца, то есть delete edit; - лишнее. Другое дело, когда, например, делаешь

C++
1
TString *list = new TStringList; // (this) - отсутствует

тогда необходимо указать

C++
1
delete list;

, например, при разрушении формы.

Ну да, если самостоятельно - тогда

C++
1
2
3
4
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  delete edit;
}

если у тебя массив - тогда

C++
1
2
3
4
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  delete[] edit;
}

@delete1991 · 06.02.2011, 01:34 **[ТС]**

вот я исправил как вы мне написали кнопку создания объекта

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (i_e<=6) { //дин.создание edit (ограничение 6 дин.созданных edit)
        top_edit+=30;
        height_group+=30;
        GroupBox1->Height=height_group;
        edit=new TEdit(GroupBox1);
        edit->Parent=GroupBox1;
        edit->Name="Edit"+AnsiString(i);
        edit->Text="";
        edit->Width=337;
        edit->Height=27;
        edit->Left=8;
        edit->Top=top_edit;
        i++;
        i_e++;
        }
        else ShowMessage("Превышен лимит создаваемых полей ввода");
}

Вот кнопка удаления объекта

C++
1
2
3
4
5
6
7
8
9
void __fastcall TForm1::Button1Click(TObject *Sender)
{
delete edit;
top_edit-=30;
height_group-=30;
GroupBox1->Height=height_group;
i--;
i_e--;
}

но есть проблемка. Пусть я создал 3 объекта. При нажатии удаления 2 раз, вылетает ошибка "Access violation at address 00000037. Read of address 00000037.
Что я не так сделал??? как можно сделать так чтобы небыло этой ошибки?

cpp_developer · 06.02.2011, 01:45

вы удаляете не "физический" объект на форме !!! - а указатель в памяти !!!

При нажатии удаления 2 раз, вылетает ошибка "Access violation at address 00000037. Read of address 00000037.
Что я не так сделал??? как можно сделать так чтобы небыло этой ошибки?

Правильно, потому что вы уже удалили указатель при первом нажатии

@delete1991 · 06.02.2011, 01:49 **[ТС]**

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

вы удаляете не "физический" объект на форме !!! - а указатель в памяти !!!
Правильно, потому что вы уже удалили указатель при первом нажатии

а как тогда сделать так, чтобы я мог при нажатии удалять последне созданный объект, и без ошибки, т.е нажал - удалил, еще раз нажал, удалил еще объект и т.д..

cpp_developer · 06.02.2011, 01:58

если будете использовать тег для кода : [ CPP][ /CPP] (без пробелов) - тогда скажу

@kzru_hunter · 06.02.2011, 01:59

у меня в проге вот так реализовано:
edit->Free();

@delete1991 · 06.02.2011, 02:00 **[ТС]**

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

если будете использовать тег для кода : [ CPP][ /CPP] (без пробелов) - тогда скажу

C++
1
эээ, вы эт имели введу?

cpp_developer · 06.02.2011, 02:14

ага

, теперь подождите

Добавлено через 1 минуту
edit->Free(); - это наследие паскаля - к употреблению крайне не рекомендуется - используйте delete .

Добавлено через 11 минут
как-то так

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
.H
private:  // User declarations
  TComponentList *DEditList; // список дин. эдитов
//
.CPP
void __fastcall TForm1::FormCreate(TObject *Sender)
{
// TComponentList;
  DEditList = new TComponentList; // создаем список
  DEditList->OwnsObjects = true;
...  
//
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (i_e<=6) { //дин.создание edit (ограничение 6 дин.созданных edit)
top_edit+=30;
height_group+=30;
GroupBox1->Height=height_group;
edit=new TEdit(GroupBox1);
DEditList->Add(edit); // Добавляем в список
...
//
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if (DEditList->Count == 0) {
    ShowMessage("Поля ввода отсутствуют");
  }
  else {
    DEditList->Delete(DEditList->Count); // удаление последнего эдита
    // (или порядковый_номер_вашего_edit_начиная_с_нуля);
  }
{
// удалить конкретный эдит -
// ставите на форму эдит с палитры компонентов - 
// не динамически созданный !
  int number = StrToInt(Edit145->Text);
  if (DEditList->Count == 0) {
    ShowMessage("Поля ввода отсутствуют");
  }
  else {
    DEditList->Delete(number); // удаление эдита с номером number
  }

@delete1991 · 06.02.2011, 02:24 **[ТС]**

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

ага

, теперь подождите

Добавлено через 1 минуту
edit->Free(); - это наследие паскаля - к употреблению крайне не рекомендуется - используйте delete .

Добавлено через 11 минут
как-то так

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
.H
private:  // User declarations
  TComponentList *DEditList; // список дин. эдитов
//
.CPP
void __fastcall TForm1::FormCreate(TObject *Sender)
{
// TComponentList;
  DEditList = new TComponentList; // создаем список
  DEditList->OwnsObjects = true;
...  
//
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (i_e<=6) { //дин.создание edit (ограничение 6 дин.созданных edit)
top_edit+=30;
height_group+=30;
GroupBox1->Height=height_group;
edit=new TEdit(GroupBox1);
DEditList->Add(edit); // Добавляем в список
...
//
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if (DEditList->Count == 0) {
    ShowMessage("Поля ввода отсутствуют");
  }
  else {
    DEditList->Delete(DEditList->Count); // удаление последнего эдита
    // (или порядковый_номер_вашего_edit_начиная_с_нуля);
  }
{
// удалить конкретный эдит -
// ставите на форму эдит с палитры компонентов - 
// не динамически созданный !
  int number = StrToInt(Edit145->Text);
  if (DEditList->Count == 0) {
    ShowMessage("Поля ввода отсутствуют");
  }
  else {
    DEditList->Delete(number); // удаление эдита с номером number
  }

спасибо) буду пробывать)

cpp_developer · 06.02.2011, 07:32

Да, и не забудьте, например, в OnFormDestroy, освободить память :

C++
1
2
3
4
5
void __fastcall TForm1::FormDestroy(TObject *Sender)
{
  delete DEditList; // освобождаете память
  DEditList = NULL; // обнуляете укзатель, не объязательно, но хороший тон 
}

@delete1991 · 06.02.2011, 16:48 **[ТС]**

Теперь снова ошибка. Пусть я создал два едита, и тогда выдает ошибка List index out of bounds (2)
Они в список добавляются, но почему не удаляются?
Вот код как я сделал, т.е дописал ваш код:
Добавление в список

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
if (i_e<=6) { //дин.создание edit (ограничение 6 дин.созданных edit)
        top_edit+=30;
        height_group+=30;
        GroupBox1->Height=height_group;
        edit=new TEdit(this);
        DEditList->Add(edit); //добавляем в список
        edit->Parent=GroupBox1;
        edit->Name="Edit"+AnsiString(i);
        edit->Text="";
        edit->Width=337;
        edit->Height=27;
        edit->Left=8;
        edit->Top=top_edit;
        i++;
        i_e++;
        }
        else ShowMessage("Превышен лимит создаваемых полей ввода");
}

Удаление

C++
1
2
3
4
5
6
7
8
9
10
if (DEditList->Count==0) ShowMessage("Добавленные поля ввода отсутствуют");
else {
        DEditList->Delete(DEditList->Count);
        top_edit-=30;
        height_group-=30;
        GroupBox1->Height=height_group;
        i--;
        i_e--;
        }
}

и где объявлял

C++
1
2
3
4
5
6
7
8
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TComponentList *DEditList; //список дин. едитов

как же все таки будет правильно сделать чтобы удалялись элементы))) помогите кто-нить)

@kzru_hunter · 06.02.2011, 17:43

delete1991, не парься и используй метод Free, у меня он безотказно работает.
Вот как в моей программе всё реализовано, никаких проблем при этом не было за многократное использование:
1) Объявление:

C++
1
TEdit *gEdit[21];

2) Создание:

C++
1
gEdit[i] = new TEdit(this);

или если не сработает, то

C++
1
gEdit[i] = new TEdit(Form1->Handle);

3) Удаление:

C++
1
gEdit[i]->Free();

@delete1991 · 06.02.2011, 20:33 **[ТС]**

все равно идет ошибка. Он теперь удаляет объекты, по очереди, ну если я удалил хоть один объект, он при создании другого выдает ошибку. В чем проблема.
Можеш кинуть свой код

cpp_developer · 06.02.2011, 22:13

C++
1
DEditList->Delete(DEditList->Count-1);

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

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

все равно идет ошибка. Он теперь удаляет объекты, по очереди, ну если я удалил хоть один объект, он при создании другого выдает ошибку. В чем проблема.
Можеш кинуть свой код

- потому что ты уже удалил указатель, создавай снова

C++
1
gEdit[i] = new TEdit(this);

, и делать надо правильно, а не лишь бы работало.

@delete1991 · 06.02.2011, 22:33 **[ТС]**

эт да, нужно делать правильно вполне согласен. Но я ток начинаю изучать С++ Builder, и еще во многом не разбераюсь(((
Спасибо, теперь работает)

cpp_developer · 06.02.2011, 22:50

какой вариант работает ?

@delete1991 · 07.02.2011, 00:33 **[ТС]**

я попробывал этот:

C++
1
DEditList->Delete(DEditList->Count-1);

cpp_developer · 07.02.2011, 00:55

ага, я так и думал

Вот, прикинь

1. Нумерация в списках начинается с 0.
2. Предположим - у нас в списке - Count = 6 строк - с номерами 0,1,2,3,4,5.
3. Тогда порядковый номер 6-й строки будет: 6-1=5 , для это и нужно Count-1

.
Задачка по арифметике для ученика 1-го класса, а не программиста

.

@delete1991 · 07.02.2011, 01:01 **[ТС]**

Я понял что где-то лишняя 1, но не понял где..
ну ты же мне сам сначала написал без -1

C++
1
DEditList->Delete(DEditList->Count);

а потом уже дописал

C++
1
DEditList->Delete(DEditList->Count-1)

Новые блоги и статьи Все статьи Все блоги /
Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	06.02.2011, 01:58
	если будете использовать тег для кода : [ CPP][ /CPP] (без пробелов) - тогда скажу 0

@kzru_hunter 1124 / 795 / 101 Регистрация: 01.02.2011 Сообщений: 1,887 Записей в блоге: 1
	06.02.2011, 01:59
	у меня в проге вот так реализовано: edit->Free(); 0

@delete1991 2 / 2 / 0 Регистрация: 05.02.2011 Сообщений: 82
	06.02.2011, 20:33 [ТС]
	все равно идет ошибка. Он теперь удаляет объекты, по очереди, ну если я удалил хоть один объект, он при создании другого выдает ошибку. В чем проблема. Можеш кинуть свой код 0

@delete1991 2 / 2 / 0 Регистрация: 05.02.2011 Сообщений: 82
	06.02.2011, 22:33 [ТС]
	эт да, нужно делать правильно вполне согласен. Но я ток начинаю изучать С++ Builder, и еще во многом не разбераюсь((( Спасибо, теперь работает) 0

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	06.02.2011, 22:50
	какой вариант работает ? 0

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	07.02.2011, 00:55
	ага, я так и думал Вот, прикинь 1. Нумерация в списках начинается с 0. 2. Предположим - у нас в списке - Count = 6 строк - с номерами 0,1,2,3,4,5. 3. Тогда порядковый номер 6-й строки будет: 6-1=5 , для это и нужно Count-1 . Задачка по арифметике для ученика 1-го класса, а не программиста . 0