Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Удаление обьектов....


zzz1234vdddrf ©   (2005-02-22 08:36:00) 

Объявление собсно....
class T_main_form : public TForm
{
__published:   // IDE-managed Components
  //компоненты
public:     // User declarations
TStringList *_types_list[2];



В методе Create формы...
................................
for (int i=0; i<=2; i++)
{
_types_list[i] = new TStringList;
}



Память выделяется проверял....все работает т.е.
_types_list[0]->Append("asda");



При закрытии Приложения тобиш главной формы
Вываливается с ошибкой в файле forms.hpp на строке с деструктором (EInvalidPointer)
  /* TCustomForm.Destroy */ inline __fastcall virtual ~TForm(void) { }



В методе Destroy формы...пробовал
void __fastcall T_main_form::FormDestroy(TObject *Sender)
{
delete _types_list[0];
delete _types_list[1];
delete _types_list[2];
}



Ошибка таже....В ЧЕМ СОБАЧКА ПОРЫЛАСЬ ???
Прочитал описание ...цитата
Цитата  

попытка освободить недействительный указатель. Обычно это означает, что указатель уже освобожден


???
Самый прикол то в том что поставил брекпоинт в методе Destroy ... watch list'ом просмотрел содержимое обьектов


zzz1234vdddrf   (2005-02-22 08:56:00) [1]

Только что сам дотумкал.....посмотрел сюдыма ...все правильно ....сенкс


begin...end   (2005-02-22 08:50:00) [2]

> zzz1234vdddrf   (22.02.05 8:36)

У Вас в массиве есть 2элемента, а не 3.


zzz1234vdddrf   (2005-02-22 08:46:00) [3]

Аналогичная ситуация.....изменений нет


Александр Иванов   (2005-02-22 08:42:00) [4]

zzz1234vdddrf   (22.02.05 8:36)
Попробуй уничтожать их в обработчике onClose


Наверх

Титульная страница Поиск, карта сайта Написать письмо