trl

Спасибо!))) Упрощал код поисках ошибки и не заметил )))

Однако заметил другую особенность: FindStyleResource не работает для корневого элемента (в моем случае это был TLayout), однако для всех элементов в этом контейнере Ok

Не нашел ответа на форуме.  не могу понять почему FindStyleResource  не возвращает объекта.

procedure TMainForm.Button1Click(Sender: TObject);
var item :  TListBoxItem;
      lbName:TLabel;
begin
    Item := TListBoxItem.Create(Self);
    Item.Parent := ListBox; 
    Item.StyleLookup := 'lyItemBoxDetail';   

    lbName := Self.FindStyleResource('lbname') as TLabel; // Здесь получаю nil

    ShowMessage(  Item.StylesData['lbname.Text'].AsString) // А этот код работает
end;