Creación de componentes VCL (I) - ¿Y cómo se hace todo esto?

Lo más normal es que cada componente se codifique en su propia unidad, aunque esto en absoluto es imprescindible, y muchas veces es necesario codificar varios componentes en una misma unidad (la VCL de Borland lo hace así). En nuestro caso vamos a crear la unidad ConversorMonedas.pas para definir el componente.

Ya hemos dicho que un componente es una clase como cualquier otra, aunque no hemos dicho que debemos heredarla a partir de la clase TComponent, o cualquiera de sus descendientes. Esta clase nos proporciona todos los métodos y propiedades para que el componente pueda ser manejado y registrado dentro del entorno de desarrollo.

Así, con lo que ya sabemos podemos escribir nuestra primera aproximación del componente TConversorMonedas, en la que definiremos una clase heredada de TComponent:

type
  TConversorMonedas = class(TComponent)
  
  end;
 

Esto es un componente, aunque por ahora no hace nada interesante. Para probarlo debemos registrarlo en el entorno de desarrollo y así podremos verlo dentro de la paleta de componentes. Esto se hace a través del procedimiento RegisterComponents definido dentro de la unidad Classes. Es fácil de utilizar: debemos crear un procedimiento llamado Register en la misma unidad que el componente. En este procedimiento, tenemos que hacer una llamada al procedimiento RegisterComponent, indicando, en este orden, la solapa en la que mostrar el componente, y la clase que lo representa. La unidad completa, con el procedimiento Register, quedaría como vemos en el siguiente listado:

unit ConversorModenas;
 
 interface
 
 uses classes;
 
 type
  TConversorMonedas = class(TComponent)
  
  end;
 
  procedure Register;
 
 implementation
 
 procedure Register;
 begin
  RegisterComponents('Mis componentes', [TConversorMonedas]);
 end;
 
 end.
 

Bien, ya podemos registrar nuestro componente, a través de la opción de menú Component - Install Component. En la ventana que se mostará, seleccionamos la unidad ConversorMonedas.pas en el campo Unit file name y hacemos clic sobre el botón OK.
Acto seguido se procederá a compilar el componente y si todo va bien, aparecerá un nuevo icono en la paleta de componentes, dentro de una nueva solapa llamada "Mis componentes".

Estos pasos que hemos dado son comunes a todos los componentes que hagamos en un futuro, así que debemos entenderlos bien.