请问如何让 popupmenu 的子菜单默认在左边显示啊，当然，最好哪个小箭头也到左边?

Question

如题...

Answer 1

Procedure Mymessage(Var   Message:Tmessage);Message   WM_RBUTTONDOWN;procedure TForm1.Mymessage(var Message: Tmessage);
var
  MousePos:TPOINT;
begin
  if   (GetCursorPos(MousePos)) then
  begin
    PopupMenu1.PopupComponent:=Form1;
    SetForegroundWindow(Handle);
    PopupMenu1.Popup(MousePos.x-60,MousePos.y);//60为菜单的宽度，看看你的是多少，可能有别的办法直接获得
  end;
end;

Answer 2

我晕！~~~设置PopupMenu1的Alignment属性为paRight 就可以了

Answer 3

楼主的意思是: 要求popupmenu菜单里的子菜单,即Submenu在左边显示,黑色的箭头最好也在左边。
为什么要改变正常的操作方式呢？ 通过自画可能可以。

Answer 4

楼上的兄弟们，我要的效果如HsWong() 所说，是子菜单显示在左边，是submenu啊，自画好象不能实现啊