Hola pelaorb68
Creo que, para solucionar el error de 'Control Has No Parent Window', basataría con esto:
Código Delphi
[-]
constructor TCustomComboIData.Create(AOwner: TComponent);
begin
inherited;
ParentWindow := AOwner; end;
destructor TCustomComboIData.Destroy;
var i:integer;
begin
for Self.Items.Count-1 downto 0 do begin
TString(Items.Objects[i]).Free;
Items.Objects[i]:= nil;
end;
inherited Destroy;
end;
Espero que te sirva... y ¡bienvenido!
Saludos.