全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2337
推到 Plurk!
推到 Facebook!

有關RS-232傳送數據問題!請各位前輩幫我看一下~

尚未結案
lvzhong1
一般會員


發表:29
回覆:18
積分:9
註冊:2007-01-23

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-01-31 16:55:56 IP:140.124.xxx.xxx 訂閱
以下是我的程式碼:
晶片一直傳數據給PC!
我希望在Edit上看到我的值(如果看的到直就可以畫出曲線圖)
但始終都會出現錯誤~請前輩幫我看一下(小新手)
--------------------------------------------
//晶片會一直傳出數據,數據格式$數值!(數值為4bit)
void __fastcall TForm1::Comm1ReceiveData(TObject *Sender)
{

char inbuff[10000];
String Buf,ReceiveStr;
int index;
int result[100];
int BufLen;

Buf=Comm1->Input;
ReceiveStr=ReceiveStr Buf;
BufLen=ReceiveStr.Length();
for(int i=0;i {
if(ReceiveStr[i]=='$')
{
result[0]=StrToInt(ReceiveStr.SubString(i-1,i 3));
Send->Text=result[0] ;
}
if(ReceiveStr[i]=='!')
{
ReceiveStr=ReceiveStr.Delete(1,i);
}
}
}
暗黑破壞神
版主


發表:9
回覆:2301
積分:1627
註冊:2004-10-04

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-01-31 18:53:31 IP:220.131.xxx.xxx 訂閱
1.程式貼上來有漏字。要我們玩克漏字嗎?
2.你用什麼元件,沒有標明。
3.你的錯誤在那邊?指出來一下。

thk.
lvzhong1
一般會員


發表:29
回覆:18
積分:9
註冊:2007-01-23

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-01-31 19:54:06 IP:140.124.xxx.xxx 訂閱
1、抱歉~沒貼好!
2、我用的是Tcomm
3、會出現下面這個
<input type="image" src="C:\Documents and Settings\Administrator\桌面\456456.bmp" /><br /> 程式碼:
-----------------------------------------
char inbuff[10000];
String Buf,ReceiveStr;
int index;
int result[100];
int BufLen;
Buf=Comm1->Input;
ReceiveStr=ReceiveStr Buf;
BufLen=ReceiveStr.Length();
for(int i=0;i {
if(ReceiveStr[i]=='$')
{
result[0]=StrToInt(ReceiveStr.SubString(i-1,i 3));
Send->Text=result[0] ;
}
if(ReceiveStr[i]=='!')
{
ReceiveStr=ReceiveStr.Delete(1,i);
}
}



暗黑破壞神
版主


發表:9
回覆:2301
積分:1627
註冊:2004-10-04

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-01-31 22:57:48 IP:220.131.xxx.xxx 訂閱
你的程式還是沒貼好。
你能不能先不做判斷。
開一個 TMemo
把你所有收到的資訊先丟入 TMemo
看看收到的東西對不對
如果收到的東西正確。
那就是你那些判斷流程有錯。

如果收到的就不對。那要去改 TComm 的動作。
系統時間:2024-03-29 4:11:29
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!