Extraído de los ejemplos de Delphi:
Código Delphi
[-]
procedure Register;
begin
RegisterComponents('Samples',[TPie]);
end;
En el directorio de Delphi hay una carpeta
Demos.
Busca dentro de esa carpeta, ficheros
.PAS que tengan el texto
RegisterComponents. Verás que hay unos cuantos que te pueden servir de ejemplo.