Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Освобождение памяти FreeAndNil, массивы кнопок 
:(
    Опции темы
vvkatom
  Дата 6.11.2010, 15:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 27.10.2010

Репутация: нет
Всего: нет



Всем привет. 
Проблема состоит в следующем: 
на форме создаётся несколько групп кнопок, описанных так:
  TopButtons: array [0..20] of TDxButton;
  RButtons: array [0..100] of TDxButton;
  LButtons: array [0..100] of TDxButton;

они формируются в зависимости от действий пользователя в различном количестве и качестве на панелях. Визуально они стираются через очистку панелей, например:
 TopPanel.Free;

Но, как оказалось, память не высвобождается и, на слабеньких машинах, быстро заканчивается. Думал решить эту проблему через процедуру: FreeAndNil, но код: FreeAndNil(TopButtons); высвобождает только первый элемент массива. Можно конечно сделать очистку в цикле, но хотелось бы вычищать весь массив сразу. 
Подскажите пожалуйста, может есть какие-то другие процедуры или возможность очистки массива целиком? Заранее спасибо.
PM MAIL   Вверх
Matematik
Дата 6.11.2010, 15:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1027
Регистрация: 11.3.2006

Репутация: 17
Всего: 50



Вместо массива пользуйся TObjectList
PM MAIL WWW ICQ   Вверх
vvkatom
  Дата 6.11.2010, 16:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 27.10.2010

Репутация: нет
Всего: нет



хорошо, а как мне тогда в коде обратится к свойствам кнопок (цвет, положение и т.д.)?
щас всё идёт:  
    TopButtons[i].Colors.BackgroundTo:=clLime;
    TopButtons[i].Align := Alnone;
    TopButtons[i].Left := 152 * (i mod c);
    TopButtons[i].Top := 52 * (i div c);
...
PM MAIL   Вверх
БелАмор
Дата 6.11.2010, 18:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 10.6.2010
Где: Россия

Репутация: 5
Всего: 17



Посмотрите ссылки (а также ссылки по ссылкам):
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=57952
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=71499
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=60756
Жизнь и смерть в режиме run-time

Цитата(vvkatom @  6.11.2010,  15:27 Найти цитируемый пост)
Думал решить эту проблему через процедуру: FreeAndNil, но код: FreeAndNil(TopButtons); высвобождает только первый элемент массива.

В FreeAndNil следует передавать только ссылки на экземпляры классов. Вы же передали туда ссылку на начало статического массива, которая указывает на первый элемент этого массива. В этом случае, после грубого приведения типа ссылки, фактически выполняется FreeAndNil(TopButtons[0]).

Цитата(vvkatom @  6.11.2010,  15:27 Найти цитируемый пост)
Можно конечно сделать очистку в цикле, но хотелось бы вычищать весь массив сразу.

После прочтения приведённых ссылок предлагаю подумать на тему "а нужны ли вообще массивы со ссылками на динамически создаваемые кнопки?"

Цитата(vvkatom @  6.11.2010,  15:27 Найти цитируемый пост)
Подскажите пожалуйста, может есть какие-то другие процедуры или возможность очистки массива целиком?

Избавиться от массивов как лишнего элемента (если нет другой причины их держать). А кнопки уничтожать, уничтожая панель, на которой они находятся. Либо циклом от конца к началу по Controls панели, если нежелательно уничтожать панель.
PM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0433 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.