基于遠(yuǎn)程io和變頻器的電機(jī)調(diào)速系統(tǒng)設(shè)計(jì)-資料下載頁
2025-06-27 20:54本頁面
【正文】 SendString1 +=+0。 SendString1 +=FloatToStrF(Un,0,4,4)。 } if(Un=) { SendString1 +=+。 SendString1 +=FloatToStrF(Un,0,5,5)。 } SendString1 +=\xd。 MSComm1Output=OleVariant(AnsiString(SendString1))。 MSComm1PortOpen=false。Edit1Text=FloatToStrF(L_ad,0,5,5)。Edit3Text=FloatToStrF(Un,0,5,5)。}//void __fastcall TForm1::FormCreate(TObject *Sender){SetP= SP*。 //計(jì)算設(shè)定壓強(qiáng)Edit2Text=FloatToStrF(SP,0,5,5)。Edit16Text=FloatToStrF(SetP,0,2,2)。 K1=D/(D/KD+TS)。 K2=TS/(D/KD+TS)。 Edit16Text=FloatToStrF(SetP,0,2,2)。 Edit10Text=FloatToStrF(HL,0,2,2)。 Edit11Text=FloatToStrF(LL,0,2,2)。 Edit12Text=FloatToStrF(DB,0,2,2)。 Edit4Text=FloatToStrF(KP,0,2,2)。 Edit5Text=FloatToStrF(I,0,2,2)。 Edit6Text=FloatToStrF(D,0,2,2)。 Edit7Text=FloatToStrF(KD,0,2,2)。}//void __fastcall TForm1::Button2Click(TObject *Sender){ Close()。 }//void __fastcall TForm1::Button1Click(TObject *Sender){KP=StrToFloat(Edit4Text)。I=StrToFloat(Edit5Text)。D=StrToFloat(Edit6Text)。KD=StrToFloat(Edit7Text)。HL=StrToFloat(Edit10Text)。LL=StrToFloat(Edit11Text)。DB=StrToFloat(Edit12Text)。SetP=StrToFloat(Edit16Text)。SP=SetP*+。 //計(jì)算設(shè)定值Edit2Text=FloatToStrF(SP,0,5,5)。SP=StrToFloat(Edit2Text)。//SetP= SP*。 //計(jì)算設(shè)定壓強(qiáng)//Edit16Text=FloatToStrF(SetP,0,3,2)。 K1=D/(D/KD+TS)。 K2=TS/(D/KD+TS)。}//void __fastcall TForm1::Timer2Timer(TObject *Sender){Image2PictureLoadFromFile()。Image2 CanvasPenColor = clRed。Image2 CanvasPenWidth = 5。Image2CanvasMoveTo(35,297)。Image2CanvasLineTo(35,297SP*297/)。Image2 CanvasPenColor = clBlue。Image2CanvasMoveTo(55,297)。Image2CanvasLineTo(55,297L_ad*297/)。Image2 CanvasPenColor = clGreen。Image2CanvasMoveTo(70,297)。Image2CanvasLineTo(70,297Un*297/)。//繪制趨勢曲線 PerformanceGraph1DataPoint(clBlue,Press*321/)。 PerformanceGraph1DataPoint(clRed,SetP*321/)。 PerformanceGraph1DataPoint(clGreen,Un*321/)。 PerformanceGraph1Update()。}//
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1