Quem eh o AOwner do TPData que vc ta criando? Eh nil? []´s Sergio _____
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Djonatas Tenfen Enviada em: terça-feira, 24 de abril de 2007 14:30 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Criação de Componente Conjunto Justamente isso que eu estava tentando mas continua o mesmo erro, até por isso que está comentado o fPanel2 Não funciono continuo a dar o mesmo erro. L De: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br [mailto:[EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br] Em nome de Marcio Enviada em: terça-feira, 24 de abril de 2007 14:14 Para: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br Assunto: Res: [delphi-br] Criação de Componente Conjunto Nao resolve voce mudando a propriedade abaixo? fCombo.Parent := fpanel2; Márcio Cristiano Tenreiro Programador Pleno Universidade de Marília/SP (14) 2105-4129 -------Mensagem original------- De: Djonatas Tenfen Data: 24/04/2007 14:02:30 Para: [EMAIL PROTECTED] <mailto:delphi-br%40yahoogrupos.com.br> os.com.br <mailto:delphi-br%40yahoogrupos.com.br> Assunto: [delphi-br] Criação de Componente Conjunto Olá Amigos estou criando um componente onde que tem uma Panel e dentro desta Panel tem uma Combo, Até ai tudo bem mas quero que no Create do componente incluir alguns items dentro da propriedade Items do mesmo mas ele está me retornando um erro que ainda não consegui resolver e se alguém sabe como resolver por favor me ajude ERRO: Control '' has no parent window. Código do component constructor TPData.Create(AOwner: TComponent); begin inherited; // fPanel2 := TPanel.Create( Self ); // fPanel2.Parent := Self; FTopCombo := 3; FWidthCombo := Self.Width-2; fCombo := TComboBox.Create(nil); fCombo.Width := FWidthCombo; fCombo.Top := 3; fCombo.Parent := SELF; fCombo.Items.Add( '1 - Antecessor a 5 Anos' ); fCombo.Items.Add( '2 - Antecessor a 3 Anos' ); [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]