Hi, weiss zwar nicht was Lazarus ist, es scheint jedoch nur um die Zuweisung des Ereignisses OnMousUp während der Laufzeit zu gehen.
Falls das der Fall ist lass die
IDE für dich arbeiten und erzeuge einfach, wie du ja schon getan hast, die Erreigbehandlung.
Kopiere diese und benenne sie um, die lassen sich dann problemlos zuweisen.
OnMouseUp:=FormMouseUp1;
OnMouseUp:=FormMouseUp2;
Hängt irgendwie mit der Deklaration TMouseEvent=Procedure .... of Object zusammen.
Hoffe das ist's was du gesucht hast.
mfg Otto