Recuerda que Delphi no es un lenguaje de esos interpretados que hay por ahí
No puedes
crear funciones durante la ejecución. El evento debes declararlo como te comenté anteriormente, en la declaración del formulario, e implementarlo en la zona
interface.
// Saludos