delphi 怎么能把这个按钮做出来？

Button Style属性设为 bsSplitButton

这就是combobox或者dropdownlist一类的控件，只是高度比较高，显得比较窄。