弹出框，做导航菜单的

各位大侠，我想做一个delphi的控件，就是点击button后button下面能展开一个弹出框，能容纳别的控件，有这样的控件吗，还有我想在窗体左侧添加一个导航栏，怎么做呢?详细点奥亲~~~