Создание, уничтожение и очистка памяти от динамического массива

@tmorov · Регистрация: 06.05.2015

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

Здравствуйте.
Создаю динамический массив, задаю размерность через SetLength(). Очищаю через присвоение каждому элементу массива значения nil.
Создаю его опять... и так несколько раз, а приложение все больше и больше ест оперативки. Как правильно очищать занятую память?

Delphi

  
  field : array of array of integer;
 
  ....
 
  //освобождаем ранее созданное поле
  if field <> nil then
    begin
      for i := 0 to High(field) do
        field[i] := nil;
      field := nil;
    end;
  //создаем новое поле
  SetLength(field, sizeField);
  for i := 0 to High(field) do
    begin
      SetLength(field[i], sizeField);
    end;

Upd: Хотел тему создать в разделе "Delphi - для начинающих", а создал почему то в разделе посвященному С++. Как перенести тему? Помогите.

@SpBerkut · 24.03.2016, 13:03

Delphi

1	SetLength(field, 0); // не?

Или Вам принципиально удалить и значения, хранящиеся в массиве?

@tmorov · 25.03.2016, 04:38 **[ТС]**

Или Вам принципиально удалить и значения, хранящиеся в массиве?

Конечно же не принципиально. Просто запускаю приложение и диспетчер задач, после например 10 пере созданий массива приложение начинает больше памяти занимать. как это можно обойти

@SpBerkut · 25.03.2016, 07:38

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

как это можно обойти

В Вашем случае будет так:

Delphi

//Думаю, что на nil можно не проверять
for i := 0 to Length(field)-1 do  //переменная i обязательно знаковая
  SetLength(field[i], 0);
SetLength(field, 0);

@tmorov · 25.03.2016, 08:57 **[ТС]**

Что то у мну походу руки не от туда растут...
Все равно растет, на 13 пересоздании памяти больше на 8 килобайт начинает занимать, потом на 21-ой +4Кб...

@planetoxod · 25.03.2016, 11:12

К чему все эти мастурбации ?

@tmorov · 25.03.2016, 11:17 **[ТС]**

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

К чему все эти мастурбации ?

интересно почему же она не освобождается

@mss · 25.03.2016, 12:03

Delphi

SetLength(field, много);
for i := 0 to Length(field) do
   SetLength(field[i], много);
SetLength(field, 0); // память [U]обязана[/U] быть отдана назад в кучу

@tmorov · 28.03.2016, 05:00 **[ТС]**

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

SetLength(field, много);

что означает "много"?

@mss · 28.03.2016, 08:09

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

что означает "много"?

заведомо не ноль

@tmorov · 28.03.2016, 12:30 **[ТС]**

Всем спасибо за помощь. Нашел я свою ошибку...
Не в массиве дело было, я картинку создавал а память при пересоздании не освобождал

@tmorov 0 / 0 / 0 Регистрация: 06.05.2015 Сообщений: 11
	25.03.2016, 04:38 [ТС]	3
	Или Вам принципиально удалить и значения, хранящиеся в массиве? Конечно же не принципиально. Просто запускаю приложение и диспетчер задач, после например 10 пере созданий массива приложение начинает больше памяти занимать. как это можно обойти 0

@tmorov 0 / 0 / 0 Регистрация: 06.05.2015 Сообщений: 11
	25.03.2016, 08:57 [ТС]	5
	Что то у мну походу руки не от туда растут... Все равно растет, на 13 пересоздании памяти больше на 8 килобайт начинает занимать, потом на 21-ой +4Кб... 0

@planetoxod 251 / 162 / 24 Регистрация: 22.08.2014 Сообщений: 1,598 Записей в блоге: 1
	25.03.2016, 11:12	6
	К чему все эти мастурбации ? 0

@tmorov 0 / 0 / 0 Регистрация: 06.05.2015 Сообщений: 11
	25.03.2016, 11:17 [ТС]	7
	Сообщение от planetoxod К чему все эти мастурбации ? интересно почему же она не освобождается 0

@tmorov 0 / 0 / 0 Регистрация: 06.05.2015 Сообщений: 11
	28.03.2016, 05:00 [ТС]	9
	Сообщение от mss SetLength(field, много); что означает "много"? 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	28.03.2016, 08:09	10
	Сообщение от tmorov что означает "много"? заведомо не ноль 0

@tmorov 0 / 0 / 0 Регистрация: 06.05.2015 Сообщений: 11
	28.03.2016, 12:30 [ТС]	11
	Всем спасибо за помощь. Нашел я свою ошибку... Не в массиве дело было, я картинку создавал а память при пересоздании не освобождал 0