Dumme Frage nebenbei: OnClick zur Runtime zuweisen

[Glados]

Ich erstelle zur Runtime ein Label und weise dem ein OnClick-Event zu. Kennt jeder, machen viele.

Gibt es aber eine Möglichkeit unnötigen Code zu vermeiden und sowas wie IN ETWA das hier zu schreiben?
xLabel.OnClick := procedure begin {* Work *} end;