1.在Delphi中的下拉框的常用属性总结: 在Form窗体上拖放三个TCommboBox控件Name属性依次为:cbbyear,cbbmonth,cbbday。 procedure TForm1.FormCreate(Sender: TObject); var i: Integer; begin for i := 2000 to 2013 do //添加年份 begin cbbyear.Items.Add(IntToStr(i)); end; for i := 1 to 12 do //添加月份 begin cbbmonth.Items.Add(IntToStr(i)); end; for i := 1 to 31 do //添加天数 begin cbbday.Items.Add(IntToStr(i)); end; end; 我们可以通过下拉框初始化值: cbbday.SelText := '30';//那么运行后,日期的那个下拉框当前显示信息为:30. 获取下拉框的文本信息: ShowMessage(cbbday.Text); 获取当前选中的索引下标: ShowMessage(IntToStr(cbbday.ItemIndex)); //注:下标是从0开始的