大家好,不知道有沒有人實際try過這個程式,這是參考網友的指點,原始來源請參考http://delphi.ktop.com.tw/topic.php?TOPIC_ID=58630    我依照說明重新建立,遇到以下兩個問題:  < src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=19427923&CC=434497"> 問題應該是指格式不相容,但我看了作者說明,應該是沒有問題,不知道是不是還少哪些步驟,下面是我尚未完成的source code: //-------------------------------------------------------------------- #> #>Text="">Text=""; COMMTIMEOUTS TimeOut; TimeOut.ReadIntervalTimeout = 0; TimeOut.ReadTotalTimeoutMultiplier = 0; TimeOut.ReadTotalTimeoutConstant = 500; //(總讀取 time out 時間 = 0.5 秒) TimeOut.WriteTotalTimeoutMultiplier = 0; TimeOut.WriteTotalTimeoutConstant = 500; //(總寫入 time out 時間 = 0.5 秒) if (BuildCommDCB("9600,n,8,1",&dcb)){ lbBuildCommDCB->Caption="BuildCommDCB 成功";} else{ lbBuildCommDCB->Caption="BuildCommDCB 失敗";} handle=CreateFile("Com1", GENERIC_READ|GENERIC_WRITE, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0); if (SetCommState(handle,&dcb)) lbSetCommState->Caption="SetCommState 成功"; else lbSetCommState->Caption="SetCommState 失敗"; if (SetupComm(handle,1024,1024)) lbSetupComm->Caption="SetupComm 成功"; else lbSetupComm->Caption="SetupComm 失敗"; if (SetCommTimeouts(handle,TimeOut)) lbSetCommTimeouts->Caption="SetCommTimeouts 成功"; else lbSetCommTimeouts->Caption="SetCommTimeouts 失敗"; } //-------------------------------------------------------------------- 謝謝各位的指教! Keni Lin

------
Keni Lin

我試了一下，改了三個地方    1.#include  2.if (SetCommTimeouts(handle,TimeOut)) =>if (SetCommTimeouts(handle,[red]&TimeOut[\red])) 3.Edit1->Text="";以上的程式碼把他刪除 ========================================================= 我不知到這樣算不算OK了 不過COMPILE可以過 lbBuildCommDCB->Caption="BuildCommDCB 成功"; lbSetCommState->Caption="SetCommState 成功"; lbSetupComm->Caption="SetupComm 成功"; lbSetCommTimeouts->Caption="SetCommTimeouts 成功";

謝謝妳的指導,第2,3項我加入後,已經ok,但第 TxdBuffer='!'>Caption="沒有回應 !";return;} a ; fwrite(&RxdBuffer,1,1,outfile); while(dwNoByte != 0) { ReadFile(handle,&RxdBuffer,1,&dwNoByte,NULL); fwrite(&RxdBuffer,1,1,outfile); a ; } fclose(outfile); lbStatus->Caption="共接收了 " IntToStr(a) " Bytes"; } //-------------------------------------------------------------------- 而這一段程式會用到下列這兩個定義 FILE *infile; FILE *outfile; 但Complie時會出現"Multiple declaration for 'FILE'"等錯誤訊息產生,我想應該有少一些定義或是定義錯誤吧! 謝謝妳的指教~ Keni Lin

------
Keni Lin

add 

#include 

in the head of your code. FILE is define in stdio.h http://www.mcu51.com/list.asp?id=1588 想想別人怎麼學，我們有這麼用心嗎？ 憂心啊~~~~~~

FILE BCB不認識，要引入才可以

現在才發現 我的

stdio.h一直沒出現

加入stdio.h後,compile就沒問題了! 我用兩台電腦對接 > 寒窗苦讀十年書；只待今朝狀元時！~~ ︵ / / ︵ ( ∩ ∩ ) ○ ︶ ○

------
Keni Lin

兩台電腦要對接。 你要去買個 null modem 回來用。（我假設你不會自己做） 而NULL MODEM應該就會自己做 CTS跟RTS的硬體迴路了。 因為51只有RX＆TX。如果PC端沒有把CTS＆RTS的硬體流量控制 去掉。它會一直等下去。。。。。。。 你再試試看吧。 它可以動的。^_^ i use bcb 4.0