c++ builder5 制作的日历

c++ builder5 制作的日历

ID:10919533

大小:65.02 KB

页数:5页

时间:2018-07-08

c++ builder5 制作的日历_第1页
c++ builder5 制作的日历_第2页
c++ builder5 制作的日历_第3页
c++ builder5 制作的日历_第4页
c++ builder5 制作的日历_第5页
资源描述:

《c++ builder5 制作的日历》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、添加组件有:1个CCalender、3个CSpinButton、1个Timer、2个Label、3个Edit、2个Button、注意:必须在3个Edit中分别输入,“请输入年份”“请输入月份”“请输入日期”(要和代码中的完全一致,否则出错。当然也可以把相应的代码注释掉不使用。)另外,为了避免在Edit组件中输入错误的字符,可以在代码中把Edit的Enabled属性一直设为false。(不在代码中写出来,直接在属性栏设置也可以。)Form1->Edit1->Enabled=false;Form1->Edit2->Enabled=fals

2、e;Form1->Edit3->Enabled=false;代码为:#include#pragmahdrstop#include"Unit1.h"//---------------------------------------------------------------------------#pragmapackage(smart_init)#pragmalink"CCALENDR"#pragmalink"CSPIN"#pragmaresource"*.dfm"TForm1*Form1;//-----------

3、----------------------------------------------------------------__fastcallTForm1::TForm1(TComponent*Owner):TForm(Owner){}//---------------------------------------------------------------------------void__fastcallTForm1::FormCreate(TObject*Sender){//文本组件初始化Form1->Edit1->

4、Text="请输入年份";Form1->Edit2->Text="请输入月份";Form1->Edit3->Text="请输入日期";//CCalendar组件初始化Form1->CCalendar1->Year=2013;Form1->CCalendar1->Month=7;Form1->CCalendar1->Day=1;//各个组件的状态Form1->CCalendar1->Enabled=false;Form1->Edit1->Enabled=false;Form1->Edit2->Enabled=false;Form1->E

5、dit3->Enabled=false;Form1->CSpinButton1->Enabled=false;Form1->CSpinButton2->Enabled=false;Form1->CSpinButton3->Enabled=false;Form1->Timer1->Enabled=false;}//---------------------------------------------------------------------------void__fastcallTForm1::CCalendar1Change

6、(TObject*Sender){//将组件CCalendar中的时间显示在文本框中。Form1->Edit1->Text=IntToStr(Form1->CCalendar1->Year);Form1->Edit2->Text=IntToStr(Form1->CCalendar1->Month);Form1->Edit3->Text=IntToStr(Form1->CCalendar1->Day);}//-----------------------------------------------------------------

7、----------void__fastcallTForm1::Edit1Change(TObject*Sender){//当文本框中的数据改变时,CCalendar中相应的改变Form1->CCalendar1->Year=StrToInt(Form1->Edit1->Text);}//---------------------------------------------------------------------------void__fastcallTForm1::Edit2Change(TObject*Sender){

8、Form1->CCalendar1->Month=StrToInt(Form1->Edit2->Text);}//-----------------------------------------------------

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。