popupmenu popt seltsam auf

[passsy]

ich habe 2 formen und 2 mal die procedure (exact gleich)

Delphi-Quellcode:

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
 point:Tpoint;
begin
if Button=mbRight
    then
    begin
    GetCursorPos(point);
      PopupMenu1.Popup(point.x, point.y);;
end;
end;

so das lustige is nur das ich bei der einen form auch auf labels klicken kann und es popupt und bei der anderen forn passiert beim auf die label drücken nix

ich blick nich an was das liegen könnt