procedure senddata var i:integer commflg : Boolean begin commflg:=true for i:=1 to 8 do begin if not fcomm comml writecommdata(sendbutter,i) then begin Commflg=false break end end end (4) 接收數據 在編寫基于串口的計算機工業測控時，通常需要由下位機向PC機發送數據以使PC機了解系統的測試數據或下位機的運行狀態，并進而控制下位機的行為。利用Spcomm串口控件接收下位機發送的數據信息的示例代碼如下： //事件驅動方式接收數據程序 procedure TForm1.CommlReceiveData(Sender:Tobject Buffer:Pointer bufferLength:Word) var receivedata:array of byte begin sleep(100) //等待100ms，保證接收到所有數據 move(buffef ,receivedata,bufferlength) //將接收緩存區中的數據轉移到數組中 …… end (5) 關閉串口 在系統開發中，應注意在不使用串口時應及時關閉串口，釋放系統資源，否則可能會影響系統的其它應用。關閉串口的代碼如下： procedure TForm1.FormClose ( Sender TObj ect:var Action:TCIoseAction ) begin comml.StopComm end
標簽： commflg procedure senddata integer
上傳時間： 2014-01-26
上傳用戶：懶龍1988
I was trying to develope a programme to make a slide show of all the pictures of a folder using vb.net. I have spent lot of time in net for searching this but all in vain, I didn t get a simple programme to solve the same and lastly I gave myself a try for the same and developed the code, I have used there a folderbrowserdialogue and a timer with a picture box control and in coding I have used IO name spaces to get the pathe and folder info here is the code. Enjoy Subhankar
標簽： programme develope pictures trying
上傳時間： 2017-04-24
上傳用戶：a3318966
課程設計： 1.求出在一個n×n的棋盤上，放置n個不能互相捕捉的國際象棋“皇后”的所有布局。 2.設計一個利用哈夫曼算法的編碼和譯碼系統，重復地顯示并處理以下項目，直到選擇退出為止。 【基本要求】 1) 將權值數據存放在數據文件(文件名為data.txt，位于執行程序的當前目錄中) 2) 分別采用動態和靜態存儲結構 3) 初始化：鍵盤輸入字符集大小n、n個字符和n個權值，建立哈夫曼樹； 4) 編碼：利用建好的哈夫曼樹生成哈夫曼編碼； 5) 輸出編碼； 6) 設字符集及頻度如下表： 字符 空格 A B C D E F G H I J K L M 頻度 186 64 13 22 32 103 21 15 47 57 1 5 32 20 字符 N O P Q R S T U V W X Y Z 頻度 57 63 15 1 48 51 80 23 8 18 1 16 1
標簽：
上傳時間： 2017-04-24
上傳用戶：zhyiroy
題目大意： 經典的漢諾塔 n個盤編號，從小到大 1..n 問：移動的序列中第k步移的是哪個盤
標簽： 漢
上傳時間： 2014-07-23
上傳用戶：zmy123
需對容量為c 的背包進行裝載。從n 個物品中選取裝入背包的物品，每件物品i 的重量為wi ，價值為pi 。對于可行的背包裝載，背包中物品的總重量不能超過背包的容量，最佳裝載是指所裝入的物品價值最高。
標簽： 容量
上傳時間： 2013-12-01
上傳用戶：iswlkje
此控件有五十四張牌，包括了大小王。能夠處\r\n理的事件有單擊和雙擊。如果你在使用中覺\r\n得有什么不足之處，請通知我。","54張牌的撲克控件1.0
標簽： 控件
上傳時間： 2013-12-20
上傳用戶：a673761058
K均值算法： 給定類的個數K，將N個對象分到K個類中去， 使得類內對象之間的相似性最大，而類之間的相似性最小
標簽： K均值算法
上傳時間： 2014-01-05
上傳用戶：wangyi39
使用MSP430與CS8900開發網頁伺服器，可以動態顯示MCU溫度.
上傳時間： 2017-06-03
上傳用戶：
//初始化 initscr() //獲得屏幕尺寸 getmaxyx(stdscr, h, w) //畫背景 for(i=0 i<h i++) for(j=0 j<w j++){ mvaddch(i, j, ACS_CKBOARD) } refresh() //建立窗口 pad = newpad(80, 128) for(i=0 i<80 i++){ char line[128] sprintf(line, "This line in pad is numbered d\n", i) mvwprintw(pad, i, 0, line) } //刷新屏幕 refresh() prefresh(pad, 0, 1, 5, 10, 20, 45) for(i=0 i<50 i++){ prefresh(pad, i+1, 1, 5, 10, 20, 45) usleep(30000) } //等待按鍵 getch()
標簽： getmaxyx initscr stdscr for
上傳時間： 2014-08-30
上傳用戶：龍飛艇
生成Trick文件工具 1.Open command line 2.input tricktest Usage: TrickTest -f -o -i -f source mpeg2 file to trick -o trick output directory -i output file id -m max coding error, default 0 -b max bitrate for trick generate, default 0 mean no limit -s trick buffer block size, must be n*188 -l log file, default c:\tricktest.log example: tricktest -f 黑鷹行動.mpg -o c:\temp -i A -m 1000 -b 3750000 soure file: 黑鷹行動.mpg output directory: c:\temp filename: 000000A,000000A.ff,000000A.fr,000000A.vvx max coding error: 1000 trick generation speed: 3750000 bps a
標簽： TrickTest tricktest command source
上傳時間： 2014-01-23
上傳用戶：水口鴻勝電器
