[Aleca]

El código del onclick ponelo dentro de un procedimiento (ej: procedure MiClick(Sender:TObject)) y donde creas el componente pones lo siguiente:

Código Delphi [-]
  Edit1.OnClick := MiClick;