Back

Changing where the PopUp Menu is going to position when it 'Pops Up':

procedure TForm1.PopupMenu1Popup(Sender: TObject);
begin
  PopupMenu1.Alignment := paCenter;
end;

paCenter can be changed to paLeft or paRight.
If you put in paLeft, the PopUp Menu will be positioned to the bottom
right of the cursor when it 'Pops Up'
If you put in paRight, the PopUp Menu will be positioned to the bottom
left of the cursor when it 'Pops Up'
If you put in paCenter, the PopUp Menu's Center will be in line with the
cursors center when the Pop Up menu 'Pops Up'.


Back