急用！！MonthCalendar1的超级问题！！！

Question

procedure TForm1.FormCreate(Sender: TObject);
begin
        DateSeparator := '-';
        ShortDateFormat := 'yyyy/m/d';
        MonthCalendar1.Date:=StrToDate('2001-8-1');
end;
//在窗体生成后，赋值！

Answer 1

monthcalendar
不可能同时选中的！只能选中一个！

Answer 2

通过date为2001-8-1，enddate为2001-8-5，就可以选多个，但是我要得是不连续的选中，
该怎么办？谢谢。

Answer 3

我的本意是：在表lin.db（这是个放有股票数据的表）中，有一些记录，其中一个字段是日期型的，我想让有日期的记录在MonthCalendar1上显示出来，以进行股票数据的分析。急用，谢谢帮忙！