В рейтинге участвует:

групп:

каналов:

Виртуальный сервер на SSD - недорого!

Аренда выделенных и виртуальных серверов (VDS/VPS), хостинг, аренда IP-адресов, администрирование, круглосуточная поддержка

qwarta.ru подробнее

Резервное копирование с проверкой на вирусы!!!

Удобный сервис создания резервных копий на любой сервер сети интернет. Отслеживайте изменения, проверяйте на вирусы. Надежно защитите свой бизнес!

go.backupland.com

Выбираете сервер? Любая конфигурация на заказ!

Аренда физических серверов любых конфигураций под любые запросы - 1С бухгалтерия, игровые сервера, нагруженные проекты, интернет-магазины!

qwarta.ru подробнее

Size: a a a

Delphi & Lazarus

402 membersпожаловаться на группу
2020 February 08

KB

Kit Bayun in Delphi & Lazarus
Создание объекта и добавление его в список.
RegionsList.Add(0, TUniCellAttribs.Create(True));
Вопрос. А нужно ли потом в цикле уничтожать каждый объект TUniCellAttribs? Или он самоуничтожиться?
источник
00:22пожаловаться#1

KB

Kit Bayun in Delphi & Lazarus
источник
00:23пожаловаться#2

GB

George Bakhtadze in Delphi & Lazarus
Kit Bayun
Создание объекта и добавление его в список.
RegionsList.Add(0, TUniCellAttribs.Create(True));
Вопрос. А нужно ли потом в цикле уничтожать каждый объект TUniCellAttribs? Или он самоуничтожиться?
нужно, если в документации к TObjectDictionary не написано, что он, при уничтожении, уничтожает и объекты, лежащие в нем. что врядли
источник
00:25пожаловаться#3

KB

Kit Bayun in Delphi & Lazarus
George Bakhtadze
нужно, если в документации к TObjectDictionary не написано, что он, при уничтожении, уничтожает и объекты, лежащие в нем. что врядли
Use a TObjectDictionary when using objects if you want to automatically free the values, use the [doOwnsValues] when creating the dictionary
источник
00:26пожаловаться#4

KB

Kit Bayun in Delphi & Lazarus
Я так понял, что если я создаю с использованием doOwnsValues, то заботиться об уничтожении не нужно.
источник
00:28пожаловаться#5

GB

George Bakhtadze in Delphi & Lazarus
Kit Bayun
Use a TObjectDictionary when using objects if you want to automatically free the values, use the [doOwnsValues] when creating the dictionary
значит, если это включить, он сам пробегает и уничтожает. но у самого инстанса TObjectDictionary деструктор не вызовется. надо в деструкторе объекта, реализующего интерфейс его уничтожать
источник
00:28пожаловаться#6

KB

Kit Bayun in Delphi & Lazarus
у меня в коде есть:
destructor TKvxListsStyles.Destroy;
begin
 if Assigned(TypesList) then
 begin
   TypesList.Clear;
   TypesList.Free;
 end;

 if Assigned(RegionsList) then
 begin
   RegionsList.Clear;
   RegionsList.Free;
 end;

 inherited;
end;
источник
00:29пожаловаться#7

GB

George Bakhtadze in Delphi & Lazarus
все что делается, когда счетчик ссылок интерфейса становится нулевым - вызывается деструктор класса, реализующего интерфейс
источник
00:29пожаловаться#8

KB

Kit Bayun in Delphi & Lazarus
ставлю бряку и destructor TKvxListsStyles.Destroy; НЕ выполняется
источник
00:29пожаловаться#9

GB

George Bakhtadze in Delphi & Lazarus
а при вызове .Clear() точно происходит очистка объектов? или только при .free()?
источник
00:29пожаловаться#10

KB

Kit Bayun in Delphi & Lazarus
если верить (https://stackoverflow.com/questions/32221454/delphi-dictionary-freeing) то можно даже и без clear
источник
00:30пожаловаться#11

GB

George Bakhtadze in Delphi & Lazarus
Kit Bayun
если верить (https://stackoverflow.com/questions/32221454/delphi-dictionary-freeing) то можно даже и без clear
если при clear не чистятся, то при free их уже не будет
источник
00:31пожаловаться#12

GB

George Bakhtadze in Delphi & Lazarus
Kit Bayun
ставлю бряку и destructor TKvxListsStyles.Destroy; НЕ выполняется
значит что-то не так делаешь. кажи код
источник
00:31пожаловаться#13

KB

Kit Bayun in Delphi & Lazarus
George Bakhtadze
если при clear не чистятся, то при free их уже не будет
как я уже показал, то я и то, и другое вызываю
источник
00:31пожаловаться#14

KB

Kit Bayun in Delphi & Lazarus
George Bakhtadze
значит что-то не так делаешь. кажи код
какой именно?
источник
00:32пожаловаться#15

GB

George Bakhtadze in Delphi & Lazarus
Kit Bayun
как я уже показал, то я и то, и другое вызываю
я о том и говорю, что это неверно
источник
00:32пожаловаться#16

KB

Kit Bayun in Delphi & Lazarus
в глобальном модуле я пишу один раз:
KvxListsStyles := TKvxListsStyles.Create;
источник
00:32пожаловаться#17

SB

Sergey Bodrov in Delphi & Lazarus
Переменная с интерфейсом глобальная, сама себя не освободит
источник
00:32пожаловаться#18

GB

George Bakhtadze in Delphi & Lazarus
Kit Bayun
какой именно?
ипользования интерфейса, когда не выполняется деструктор
источник
00:32пожаловаться#19

GB

George Bakhtadze in Delphi & Lazarus
Kit Bayun
в глобальном модуле я пишу один раз:
KvxListsStyles := TKvxListsStyles.Create;
и когда по-твоему он должен освободиться?
источник
00:32пожаловаться#20