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: delphi-br@yahoogrupos.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]

Responder a