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

[解决办法]
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;
[解决办法]
楼主的意思是: 要求popupmenu菜单里的子菜单,即Submenu在左边显示,黑色的箭头最好也在左边。
为什么要改变正常的操作方式呢？ 通过自画可能可以。
[解决办法]
如果菜单在屏幕右边,子菜单在右边显示不下,自然到显示在左边
呵呵^