Перейти к содержанию
Fire Monkey от А до Я
  • 0

как найти и удалить компонент на TabItem


genakust

Вопрос

добрый день,

у меня есть несколько TabItems in FMX- TabControl (как на вложенной картинке) один из которых заполняется динамически:

FindAndDeleteItemContext;
frameIndex:= GetFrameIndexByText(item);
{factory}
FFramesFactory:= TFramesFactory.DefaultFactory;
{Index-> Frame}
aktFrame:= FFramesFactory.GetFrame(frameIndex);
{add to layout}
aktFrame.Parent:= LyContent;
aktFrame.Align:= TAlignLayout.Client;
LyContent.AddObject(aktFrame);
{open tab}
ActionToContentTabExecute(Sender);

я пытаюсь найти фрейм и удалить его только из TabItem но не как Object обследующим способом:

procedure Txxx.FindAndDeleteItemContext;
var
  i: Integer;
begin
  for i:= 0 to Pred(LyContent.ComponentCount) do
  begin
    if LyContent.Controls.Items[i] is TFrame then
      LyContent.RemoveObject(i);
  end;
end

но почему- то LyContent.ComponentCount всегда равен 0.

Подскажите пожалуйста что неправильно?

Спасибо.

Unbenannt.PNG

Изменено пользователем genakust
корректура
Ссылка на комментарий

Рекомендуемые сообщения

  • 0

Вы используете LyContent.AddObject а этот метод добавляет только в LyContent.Children. Для того, чтобы добавить в LyContent.Components надо создавать фрейм с AOwner = LyContent или использовать LyContent.InsertComponent. 

А вообще - не надо заморачиваться с Components. Управляйте отображением фреймов с помощью Parent, а за временем жизни пусть следит Ваш TFramesFactory

Изменено пользователем dnekrasov
Ссылка на комментарий

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

×
×
  • Создать...