Delphi实现点击按钮触发选择项， 进而实现不同的分支功能