組態(tài)王報(bào)表功能實(shí)現(xiàn)方法組態(tài)王報(bào)表功能實(shí)現(xiàn)方法組態(tài)王報(bào)表功能實(shí)現(xiàn)方法資料僅供參考文件編號(hào)：2022年4月組態(tài)王報(bào)表功能實(shí)現(xiàn)方法版本號(hào)：A修改號(hào)：1頁次：1.0審核：批準(zhǔn):發(fā)布日期：一種簡(jiǎn)單的組態(tài)王報(bào)表功能實(shí)現(xiàn)方法2010年04月24日星期六15:18前段時(shí)間用組態(tài)王做了一個(gè)小的畫面組態(tài)，其中用到了KVADODBGrid控件來做報(bào)表，現(xiàn)總結(jié)如下。一、準(zhǔn)備工作第一步：在組態(tài)王工程管理器中新建一個(gè)項(xiàng)目，項(xiàng)目路徑為D：\實(shí)驗(yàn)項(xiàng)目。第二步：新建一個(gè)ACCESS數(shù)據(jù)庫1、在“D：\實(shí)驗(yàn)項(xiàng)目”路徑下新建一個(gè)MicrosoftOfficeAccess應(yīng)用程序并命名為；2、打開“控制面板\管理工具\(yùn)ODBC數(shù)據(jù)源管理器”選擇“系統(tǒng)DSN”選項(xiàng)；3、點(diǎn)擊“添加”按鈕創(chuàng)建新數(shù)據(jù)源，選擇“MicrosoftAccessDriver(*.mdb)”；4、在數(shù)據(jù)源名處填下“mydata”，并選擇數(shù)據(jù)庫路徑為“D：\實(shí)驗(yàn)項(xiàng)目\”。第三步：創(chuàng)建表格模板點(diǎn)擊工程瀏覽器左側(cè)的“SQL訪問管理器”下的“表格模板”，新建一個(gè)表格并命名為Table。在Table中添加所需記錄的變量及日期參數(shù)，其中“日期”為定長字符串型，字符長度為10；其它諸如年、月、日、時(shí)、分則為浮點(diǎn)型，字符長度為1。第四步：創(chuàng)建記錄體點(diǎn)擊工程瀏覽器左側(cè)的“SQL訪問管理器”下的“記錄體”，新建一個(gè)表格并命名為Record，在Record中添加所需記錄的變量及日期參數(shù)。記錄體用來定義Access數(shù)據(jù)表格字段與組態(tài)王變量之間的對(duì)應(yīng)關(guān)系。二、連接數(shù)據(jù)庫第一步：在工程瀏覽器左側(cè)的“數(shù)據(jù)庫”下的“數(shù)據(jù)字典”中定義一個(gè)內(nèi)存整型變量，并命名為ConnectID。第二步：創(chuàng)立組態(tài)王與mydata數(shù)據(jù)源的連接，并以“表格模板”Table的格式在數(shù)據(jù)庫中建立名為“TheDate”的表格，命令如下：SQLConnect(ConnectID,"dsn=mydata;uid=;pwd=");SQLCreateTable(ConnectID,"TheDate","Table");將上面兩條命令填入“工程瀏覽器\命令語言\應(yīng)用程序命令語言”下的“啟動(dòng)時(shí)”選項(xiàng)中。第三步：在工程瀏覽器左側(cè)的“命令語言\事件命令語言”下新建一事件命令，在“事由描述”項(xiàng)內(nèi)填下“\\本站點(diǎn)\$分==01”（每小時(shí)事件發(fā)生一次即分變量每次為一，計(jì)算了60分鐘），在“發(fā)生時(shí)”框內(nèi)填寫SQLInsert(connectionid,"TheDate","Record");.a='清除字典VC:CARRAY類下的操作函數(shù)，功能：刪除該數(shù)組中的所有指針。從該數(shù)組中刪除所有指針，但并不真正的刪除CObject對(duì)象。RemoveAll函數(shù)將釋放所有用于指針存儲(chǔ)所占用的內(nèi)存。）2．定義按鈕的“命令語言連接”“彈起時(shí)”為：(下列語言中“條件句”為內(nèi)存字符串格式，在“數(shù)據(jù)詞典”里面定義)longa;longb;stringstr1;stringstr2;a=;（指針命令，控件DayrepotSelect中的Month變量）b=;if(a<10)str1="-0"+StrFromInt(,10);elsestr1="-"+StrFromInt(,10);if(b<10)str2="-0"+StrFromInt(,10);elsestr2="-"+StrFromInt(,10);\\本站點(diǎn)\條件句=StrFromInt(,10)+str1+str2;="日期='"+\\本站點(diǎn)\條件句+"'orderby時(shí)";();();注意：在控制面板\區(qū)域和語言\自定義下，需定義短日期格式為“yyyy-MM-dd”樣式，若不同，則上面命令代碼的判斷段需作相應(yīng)修改。第四步：添加打印按鈕定義按鈕的“命令語言連接”“彈起時(shí)”為：();第五步：添加退出按鈕總體效果圖如下圖所示：總結(jié)：這個(gè)報(bào)表用了組態(tài)王自帶的控件KVADODBGrid，數(shù)據(jù)庫用的是AC