怎样使monthcalendar控件根据指定的时间段显示特殊颜色或标记~！

如题~！例如我需要特殊显示的时间段为2009-11-15至2009-11-25，怎样才能让monthcalendar控件在这段日期中使用特殊颜色或其他醒目的标记来显示，谢谢~！！！

解决方案 »

  1.   

    这个没有方法实现，但dev控件包里对应组件可以实现你的要求。
      

  2.   

    uses
      DateUtils;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
    var
      date: TDate;
    begin
      MonthCalendar1.MultiSelect := True;
      MonthCalendar1.Date := EncodeDate(2009, 12, 15);
      MonthCalendar1.EndDate := EncodeDate(2009, 12, 25);
    end;
    end.
      

  3.   

    多谢楼上，楼上的方法鼠标选中日期后，日期段的颜色就没有了，能否固定下来（不要告诉我在onclick里面写哈）~！
    虽然差强人意，不过了胜于无，还有没更好的方法。谢谢~！
      

  4.   

    这个我还真没辙。（PS:以前自己写过一个月历控件，全自绘的，要定制这样的功能应该不难，有兴趣的话可以下载代码去改改：http://2ccc.com/article.asp?articleid=4464)