Agregar edit a ListboxItem

[look]

Hola amigos , estoy tratando de agregar un edit a un ListBox, esto es lo que tengo :

Código Delphi [-]
procedure TForm3.Button1Click(Sender: TObject);
var
  edt: TEdit;
  T: TListBoxItem;
begin

  edt := TEdit.Create(Self);
  edt.Name := 'edt1';
  edt.Text := 'hola';
  edt.Align := TAlignLayout.Client;

  T := TListBoxItem.Create(ListBox1);
  T.AddObject(edt);

  ListBox1.Items.AddObject('', T);

end;

Al probar el codigo agrega el item, pero el edit no aparece en el item.

que podra ser?

[look]

Hola , me respondo a mi mismo.

esta es la solucion:

Código Delphi [-]
  ListBox1.AddObject(ListBoxItem);