TRadioGroup criados dinamicamente não retornam ItemIndex

<< Click to Display Table of Contents >>

Navigation:  Forum >

TRadioGroup criados dinamicamente não retornam ItemIndex

Forum link

 


 

12-28-2022, 07:32 PM:

 

Ola!

 

Estou criando em runtime diversos componentes TRadioGroup com base em uma TStringList.

 

Code:

 

          tRadio := TIWRadioGroup.Create(Self);

 

          tRadio.Name := 'IWRadioHCMI' + IntToStr(iContHCM);

 

          tRadio.ItemIndex := 0;

 

          tRadio.Items.Add('Inativo   ');

 

          tRadio.Items.Add('Importar   ');

 

          tRadio.Items.Add('Exportar   ');

 

          tRadio.Layout := glHorizontal;

 

          tRadio.Parent := IWRegionI;

 

          tRadio.Height := 13;

 

          tRadio.Width := 200;

 

          tRadio.Left := 20;

 

          tRadio.Top := 33 + (iContHCM * 28);

 

          tRadio.Font.Size := 10;

 

          tRadio.Anchors := [akLeft,akTop];

 

 

 

A criação funciona e os TRadioGroup são exibidos na interface normalmente.

 

Porém, quando tento retornar o itemindex selecionado pelo usuário no HTML, ele sempre retorna -1, como se nada tivesse sido selecionado.

 

Um detalhe interessante, o FindComponent retorna o nome e os itens criados normalmente, o unico problema é retornar a interação do usuário na interface.

 

https://imgur.com/a/529Nyqu

 

(Não consegui anexar a imagem, mas acima em o resultado de um debug)

 

Alguém poderia me ajudar?