特急，高手请进，关于菜单

[devie]

我用下边的语句，将一个窗体置于另一个窗体的panel上，但菜单总是不能显示，独立时显示正常
Form2->Parent = Panel1;
Form2->Left = 1;
Form2->Top = 1;
Form2->Visible = true;

[killedkiss]

你的菜单是哪个窗体上的？

[gfh21cn]

没有办法达到
除非你做成MDI程序

[gfh21cn]

在MDI程序中只要把设置成true就可以了
再设置一下GroupIndex

[beerxuxu]

为什么不拭拭别的方式，
panel2->visible=false;
然后再：
panel2->left=l_x;
panel2->right=l_y;
panel2->visible=true;
panel1->visible=false;
...............

[Hawk_sun]

看了半天，估计你是想实现窗体的Dock功能，即是把一个窗体的停靠在另一个窗体的Pannel上，但是你的做法欠佳，推荐你直接使用Dock这个属性。
void __fastcall TConjoinDockHost::FormUnDock(TObject *Sender, TControl *Client, TWinControl *NewTarget, bool &Allow)
{
//only 2 dock clients means the host must be destroyed and
//the remaining window undocked to its old position and size.
//(Recall that OnUnDock gets called before the undocking actually occurs)
if (Client->InheritsFrom(__classid(TDockableForm))
((TDockableForm *)Client)->DockSite = true;
if ((DockClientCount == 2) && (NewTarget != (TWinControl *)&this))

PostMessage(Handle, WM_CLOSE, 0, 0);
UpdateCaption(Client);
}

[devie]

我确实是想实现停靠，但不是简单的停靠，我不想要那个小×号和两条线，但是无法实现，谁有好的办法。而且不能用鼠标拖动这个窗体。

[bcb_fans]

这个问题被问了N遍了，一句话就可以了。

::SetParent(Form1->Handle,Panel1->Handle);

强烈建议试了之后再发表评论，不要以为她跟

Form2->Parent = Panel1;

是一样的

[haijunfang]

对了加::是什么意思呀

[bcb_fans]

全局函数标识符，表明调用的是Windows的API，而不是VCL里边的成员函数。

[zhilaohu]

作用域标使符

[Behard]

mark

[devie]

BCB_FANS thank you.
问题解决，不过又有一个小问题，这样菜单下边有一条黑线，能不能去掉？

[bcb_fans]

奇怪，我试了，菜单下面没有什么黑线啊！

[bcb_fans]

确有这个怪事，不过我又使用VC++试了一下，发现同样有这个毛病，看来是Windows本身的问题，而不是BCB和VC的问题。

[devie]

哦，忘了说了，BorderStyle我设的是bsNone

[gk0205]

@_@..