Ver Mensaje Individual
  #2  
Antiguo 14-01-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Reputación: 27
delphi.com.ar Va por buen camino
La solución es lo que tu propones, fíjate que el código que muestras no este dentro de un with, ten en cuenta que en el create del componente aún no esta asignado el parent del mismo.

Código:
constructor TMiComponente.Create(AOwner: TComponent); override;
begin
  inherited;
  FBoton := TButton.Create(Self);
end;

procedure TMiComponente.SetParent(AParent: TWinControl); override;
begin
  inherited;
  FBoton.Parent := AParent;
end;
en el caso que sea en un procedure como vos decís:

Código:
procedure TMiComponente.CrearBoton;
begin
  FBoton := TButton.Create(Self);
  FBoton.Parent := Parent;
end;
Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita