Cita:
Empezado por Sonic
Cuando digo que mi componente lo quiero hacer VCL lo que quiero decir es que lo quiero incrustar en las barras de herramientas, ahora mismo lo tengo en la barra Samples (lo llamo TSRichEdit y hereda obviamente de TRichEdit), disponible para poder ser arrastrado a la aplicación de cualquier usuario.
|
Vale, ahora te entiendo. Por lo que dices, imagino que lo que ahota tienes es un component template, que lo que hace es pegar el código asignado a los eventos el form donde lo sueltas. Lo que quieres hacer es un componente nuevo que encapsule ese comportamiento.
Cita:
Empezado por Sonic
Lo que yo quiero es que mi componente, cuando alguién lo "pegue" en su aplicación responda al evento OnSelectionChange, primero mediante mi funcion y despus mediante la que él tenga especificada en el Inspector de Objetos.
|
Ok, entonces tienes que cambiar un poco la filosofía. Te pongo un ejemplo en Delphi porque el CB no lo tengo a mano, pero la traducción no es complicada.
Código Delphi
[-]
unit richEdit1;
interface
uses
Windows, Messages, SysUtils, Classes, Controls, StdCtrls, ComCtrls, Dialogs;
type
trichEdit1 = class(trichedit)
private
protected
procedure SelectionChange; override;
public
published
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('NexContr', [trichEdit1]);
end;
procedure trichEdit1.SelectionChange;
begin
ShowMessage('hola');
inherited;
end;
end.