Delphi - Ing

Estoy creando los items de un menu, en forma dinamica, y necesito que conforme se vayan creando poder programar su evento onclick para poder operarlo, pero no he hallado la forma.

La forma es la siguiente, creas una procedure donde pones el codigo para este evento y le das un nombre cualquiera como cualquier procedure de usuario q hayas creado antes, luego establecer q esa procedure es la q se tiene q ejecutar al clickear, lo haces de esta manera:
MenuItem1.OnClick := miprocedure;
asegurate de haber creado el item antes de llamar a esa procedure..