资源描述：
《哈工大_材料力学_编程_完美UI版.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、材料力学上机编程作业专业：机械制造及其自动化班级：xxxxxxxx姓名：xxx学号：xxxxxxxxx邮箱：xxxxxxxxxxxxxx运行界面如下。功能：可求解简支梁任意载荷下的任意点弯矩挠度、及作出弯矩挠曲图：Release版本大小1.39MB。里面包括六个页面，既编程作业的六题！运行时桌面如下：部分代码有：void__fastcallTc1::cl_5_b_okClick(TObject*Sender){if(cl_5_inp_a->Enabled==false){Application->MessageBoxA("你必须先用ADD添加的作
2、用！","Erro!__Bykai",MB_OK);}else{if(cl_5_inp_a->Modified==false
3、
4、cl_5_inp_f->Modified==false){Application->MessageBoxA("你需要先输入受作用参数","Erro!__Bykai",MB_OK);}/*elseif(StrToFloat(cl_5_inp_a->Text)>StrToFloat(cl_5_inp_x->Text)){Application->MessageBoxA("a必须要小于L","Erro!__Bykai",MB_
5、OK);}*/elseif(cl_5_rb_f->Checked==true){//5-1//Application->MessageBoxA("5-1","Erro!__Bykai",MB_OK);/*intls_a=StrToInt(cl_5_zushu->Caption);ls_a+=1;cl_5_zushu->Caption=IntToStr(ls_a);*/cl_f5.insert_f(StrToFloat(cl_5_inp_a->Text),StrToFloat(cl_5_inp_f->Text));cl_5_zushu->Capti
6、on=IntToStr(1+StrToInt(cl_5_zushu->Caption));cl_5_inp_a->Text="输入F成功";cl_5_inp_c->Text="";cl_5_inp_f->Text="点击ADD继续";cl_5_inp_a->Enabled=false;cl_5_inp_c->Enabled=false;cl_5_inp_f->Enabled=false;}elseif(cl_5_rb_mk->Checked==true){//5-2cl_mk5.insert_f(StrToFloat(cl_5_inp_a->Te
7、xt),StrToFloat(cl_5_inp_f->Text));cl_5_zushu->Caption=IntToStr(1+StrToInt(cl_5_zushu->Caption));cl_5_inp_a->Text="输入Mk成功";cl_5_inp_c->Text="";cl_5_inp_f->Text="点击ADD继续";cl_5_inp_a->Enabled=false;cl_5_inp_c->Enabled=false;cl_5_inp_f->Enabled=false;}else{if(cl_5_inp_c->Modified
8、==false){Application->MessageBoxA("请输入C","Erro!__Bykai",MB_OK);}//5-3else{cl_q5.insert_f(StrToFloat(cl_5_inp_a->Text),StrToFloat(cl_5_inp_c->Text),StrToFloat(cl_5_inp_f->Text));cl_5_zushu->Caption=IntToStr(1+StrToInt(cl_5_zushu->Caption));cl_5_inp_a->Text="输入Q成功";cl_5_inp_c->
9、Text="";cl_5_inp_f->Text="点击ADD继续";cl_5_inp_a->Enabled=false;cl_5_inp_c->Enabled=false;cl_5_inp_f->Enabled=false;}}}}//---------------------------------------------------------------------------void__fastcallTc1::cl_5_b_solClick(TObject*Sender){if(cl_5_inp_e->Modified==false
10、
11、
12、cl_5_inp_iz->Modified==false
13、
14、cl_5_inp_l->Modified==false){Applicat
