预览加载中,请您耐心等待几秒...
在线预览结束,喜欢就下载吧,查找使用更方便
如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
这个PDF的有个例程S03B。运行界面如下:但是他提供的代码有误,我修改代码并能正常运行后的代码是://---------------------------------------------------------------------------#include<vcl.h>#pragmahdrstop#include"Unit1.h"//---------------------------------------------------------------------------#pragmapackage(smart_init)#pragmaresource"*.dfm"TForm1*Form1;//---------------------------------------------------------------------------__fastcallTForm1::TForm1(TComponent*Owner):TForm(Owner){}//---------------------------------------------------------------------------void__fastcallTForm1::FormCreate(TObject*Sender){Button1->Enabled=false;Dirty=false;}//---------------------------------------------------------------------------void__fastcallTForm1::Button1Click(TObject*Sender){Memo1->Clear();if(Edit1->Text!="")Memo1->Text="姓名:"+Edit1->Text;if(ComboBox1->Text!="")Memo1->Text=Memo1->Text+"\r\n学历:"+ComboBox1->Text;if(RadioButton1->Checked)Memo1->Text=Memo1->Text+"\r\n性别:男";elseMemo1->Text=Memo1->Text+"\r\n性别:女";if(RadioGroup1->ItemIndex==0)Memo1->Text=Memo1->Text+"\r\n职称:讲师";elseif(RadioGroup1->ItemIndex==1)Memo1->Text=Memo1->Text+"\r\n职称:副教授";elseMemo1->Text=Memo1->Text+"\r\n职称:教授";if(CheckBox1->Checked==true)Memo1->Text=Memo1->Text+"\r\n该同志为:中国社科院院士";if(CheckBox2->Checked==true)Memo1->Text=Memo1->Text+"\r\n该同志为:中国工程院院士";if(CheckBox3->Checked==true)Memo1->Text=Memo1->Text+"\r\n该同志为:中国工程院院士";Dirty=false;Button1->Enabled=false;}//---------------------------------------------------------------------------void__fastcallTForm1::BitBtn1Click(TObject*Sender){if(Dirty){if(MessageDlg("简历内容已经修改,是否更新?",mtInformation,TMsgDlgButtons()<<mbYes<<mbNo,0)==mrYes){Button1Click(BitBtn1);ShowMessage("你选择的是刷新。");}}Close();}//---------------------------------------------------------------------------void__fastcallTForm1::Edit1Change(TObject*Sender){Button1->Enabled=True;Dirty=True;}//---------------------------------------------------------------------------void__fa