Есть VirtualStringTree, в нём используется только один метод: OnGetText, где

Question

Есть VirtualStringTree, в нём используется только один метод: OnGetText, где

строки дёргаются из двумерного массива строк:
procedure TFormImport.tvPreviewGetText(Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType; var CellText: string);
begin
CellText := Preview[Node.Index][Column];
end;
что я должен финализировать в этом случае в OnFreeNode?
procedure TFormImport.tvPreviewFreeNode(Sender: TBaseVirtualTree; Node: PVirtualNode);
begin
//
end;
т.к. еврикалог сигнализирует об утечке памяти после отображения данных. NodeDataSize = -1, ничего дефолтного не менялось. Т.е. в сам контрол данные не загоняются методами tvPreview.AddChild и прочее
Когда загоняю свои данные, там всё понятно, типа такого:
var Data := PFolderData(Sender.GetNodeData(Node));
Finalize(Data^);

#lazarus #programming #russian

0

27.02.2024

2 ответов

40 просмотров

Alex Egorov Автор вопроса

Александр (Rouse_) Багель
ничего финализировать не надо

Тогда непонятна учечка памяти, на которую жалуется EurekaLog, причём она возникаем именно после отображения данных. Контрол на отдельной вкладке, и если на него не переключаться - всё норм, как только данные посмотрел - утечка. Кроме отображения данных на той вкладке дополнительного ничего не делается

0

9 месяцев назад

Александр (Rouse_) Багель · Accepted Answer

Александр (Rouse_) Багель

ничего финализировать не надо

0

9 месяцев назад

169 похожих чатов

Есть VirtualStringTree, в нём используется только один метод: OnGetText, где

2 ответов

Похожие вопросы