Ver Mensaje Individual
  #2  
Antiguo 17-06-2008
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.282
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Puedes echarle un vistazo a la clase TComponent de la VCL, a ver qué cosas puedes redefinir.

Por ejemplo, al crear un nuevo componente, se genera una notificación del tipo:

Código Delphi [-]
  ....  Al insertar el TImage..
  AOwner.InsertComponent(Self);

  ...
  Notification(AComponent, opInsert);

Este método Notification se puede sobreescribir; Puedes probar por ahí.

También hay un método:
Código Delphi [-]
  procedure ValidateInsert(AComponent: TComponent); dynamic;

que podrías capturar y que se ajecutará (si no me equivoco) al intantar insertar el nuevo componente sobre el plano.

Otra opción podría ser que modifiques la Clase TPlano para añadirle un método que llames cuando se añada un nuevo elemento.

Código Delphi [-]
  imagen:=TImage(plano); // Aqui se genera algun evento en Plano ?
  plano.UpdateElements;
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita