嵌入式課程設(shè)計(jì)--基于嵌入式系統(tǒng)的傳感器環(huán)境檢測(cè)-wenkub.com
2025-06-01 19:40 本頁(yè)面
【正文】 thisADOQuery1Close()。 // Series1AddY(tmp,i,clTeeColor)。 thisADOQuery1First()。 UnicodeString mand = select top 20 +fileindex[index]+ from SensorData order by time desc 。 Series1Clear()。 Chart1RemoveAllSeries()。 // endif // include pragma hdrstop include include // pragma package(smart_init) pragma link Chart pragma link TeEngine pragma link TeeProcs pragma link Series pragma resource *.dfm Thisc *hisc。 void __fastcall TabControl1Change(TObject *Sender)。 } // history（查看歷史界面） // ifndef hisH define hisH // include include include include include include include include include include include include include // class Thisc : public TForm { __published: // IDEmanaged Components TTabControl *TabControl1。 } return true。 e) { (Quit)。 } Variant fn = filename。 vv = (varOleStr)。 i datasetFieldsCount。 AnsiString pos。 i++ ) { v = datasetFieldsFields[i]FieldName。 Variant v = 123。 } // define PG OlePropertyGet define PS OlePropertySet define FN OleFunction define PR OleProcedure bool TComConnection::DBGrid2Excel(TDataSet *dataset, String filename) { DeleteFile( filename )。 thisADOQuery2ParametersParamByName(stime)Value = thisDateTimePicker2DateTime。 } // void __fastcall TComConnection::Button4Click(TObject *Sender) { ADOQuery2Connection = thisADOConnection1。 UnicodeString mand = select time as 時(shí)間 ,bmptemp as BMP 溫度 ,bmppress as BMP 氣壓 ,sht1xtemp as SHT1 溫度 ,sht1xhr,light as 光強(qiáng) ,rain as 雨量 from SensorData order by time desc。e){ dymcshow = false。 for(int i=0。 // Series 值 L=V+IntToStr(i)。 // value String L。 Series1Clear()。 // 清除 Chart1 上所有舊 Series Chart1View3D=True。 thisADOQuery1ParametersParamByName(time)Value = thisDateTimePicker1()。 thisADOQuery1ParametersParamByName(sht1xtemp)Value = thisLabeledEdit3Text。 UnicodeString mand = insert into SensorData(bmptemp,bmppress,sht1xtemp,sht1xhr,light,rain,time) values(:bmptemp,:bmppress,:sht1xtemp,:sht1xhr,:light,:rain,:time) 。 } } void __fastcall TComConnection::btshowClick(TObject *Sender) { thisdymcshow = true。 break。 break。 break。 )。 s=(4,YbCommDevice1()5)。e){ ShowMessage(自動(dòng)搜索串口失敗，請(qǐng)檢查串口是否正確接入。 delete reg,strlist。 istrlistCount。 */ regOpenKeyReadOnly(HARDWARE\\DEVICEMAP\\SERIALCOMM)。 //在 Memo1 里顯示出收到的數(shù)據(jù) , 將會(huì)是完整的一幀數(shù)據(jù) } } // void __fastcall TComConnection::Button3Click(TObject *Sender) { try{ TRegistry *reg = new TRegistry(KEY_READ)。 Buf[i]=0xa5){ varity = Buf[i]0xa0。 s=。 for(int i=0。 } */ // void __fastcall TComConnection::YbCommDevice1Package(TObject *Sender, int NotifyType) { unsigned char Buf[1000]。 s = 。 s = (p+1,()).Trim()。 //去掉兩端的空格 while(()0) { int p = (39。 UnicodeString head=09 A1 ff ff ff ff ff ff 。 } Status = !Status。 Button2Caption=打開(kāi)串口 。 //打開(kāi)串口 YbCommDevice1PackageType = cptFrameTimeout。 datain = false。 // extern PACKAGE TComConnection *ComConnection。 void FillInfo(int varity , UnicodeString s)。 bool aotuCom。 void __fastcall Button4Click(TObject *Sender)。 void __fastcall btshowClick(TObject *Sender)。 void __fastcall Button3Click(TObject *Sender)。 TButton *Button6。 TButton *Button4。 TDateTimePicker *DateTimePicker2。 TButton *btdataclose。 TButton *btdataopen。 TLabeledEdit *LabeledEdit6。 TLabeledEdit *LabeledEdit2。 TComboBox *cbb_。最后讓組員收獲頗多。//讀取所有數(shù)據(jù) void settingdetail()。 float GL5528_ReadLight(void)。 void SHT1x_ConnectionReset(void)。 void SHT1x__DataIn(void)。 void BMP085_ReadCalCoeff(void)。 void USART_Configuration(void)。//管腳初始化 void EXTI_Configuration(void)。 5 雨量傳感器 雨量傳感器由一系列互不連通的導(dǎo)線構(gòu)成，當(dāng)雨滴落到各導(dǎo)線上，由于水的導(dǎo)電作用雨量傳感器的電阻會(huì)降低，阻值隨著雨滴增多而降低，基于此原理可利用上圖所示的電路中的分壓電路檢測(cè)雨量傳感器的阻值，進(jìn)而判斷雨量大小。 STM32 利用 GPIO 口模擬 SHT1x專(zhuān)用的串口通訊協(xié)議以實(shí)現(xiàn)傳感信息采集。 掌握 SHT1x 溫濕度傳感器、 BMP085 氣
畢業(yè)設(shè)計(jì)相關(guān)推薦
鄂ICP備17016276號(hào)-1