好長時間沒用PB了,最近因有個專案,又把PB拾了起來。因本人屬于保守派,所以沒用安裝最新版本,挑了一下,選擇了12.6版,再次還特別感謝本版的@ehxz,熱心解答我安裝中遇到的問題。
這次用PB向串口發送資料遇到了難題,以前用過是以文本的方式發送和接受,感覺用mscomm比較方便,使用起來也很簡單,但這次以十六進制方式發送,確屢遭失敗,最后才明白是自己對資料的進制格式及PB資料發送的方式沒有理解透徹。這次查閱了大量資料,才慢慢理解了,根本原因是PB對記憶體資料的呼叫是短板,再就是用PB做專案,這方面使用的也比較少,大部分還是以業務資料為主。
以十六進制方式發送資料,關鍵點是要用BLOB格式儲存資料,個人理解,blob格式有點類似于c語言的指標,是PB對記憶體資料呼叫最直接方便的方式。
把這次查閱的資料整理了一下,方便大家查閱,在此感謝@無敵三角貓、@xjdg0229、@dazizai (大自在)的帖子,受益匪淺。
@dazizai (大自在)的帖子:關于PowerBuilder中的字符集問題
https://www.sybasebbs.com/thread-89934-1-1.html
@無敵三角貓 串口通信程式中十六進制格式發送和接收實作 這個不是PB撰寫的,可參考思路
上位機軟體(MFC)發送給三軸步進電機控制器的指令是用hex方式(也就是16進制方式傳送的,而不是Ascii碼的形式傳送的,比如說‘0’,按照Ascii碼的方式傳送就是48,而以hex的方式傳送就是0,),
剛剛用MFC撰寫了一個采集和設定中央空調控制板上引數的應用程式,控制板和PC機之間通過485轉串口和串口轉USB電路實作通信。程式設計中碰到一個問題是PC端對發送和接收資料格式的處理,控制板可以讀懂的協議是一組16進制數,如“66 03 0C 00 01 00 01 00 00 00 00 00 3C 00 3E F5 94”,PC端應用程式可以決議的也是由控制板發送的一組16進制數,而串口通信是二進制位元組流進行,發送和接識訓沖區均為char型的陣列,發送時如何將字串型別的16進制數轉換為對應大小的10進制數并存進緩沖陣列呢?下面的函式可供參考:
HexChar函式的功能是將16進制字符由ASCII碼轉為相應大小的16進制數@
//也就是說利用串口除錯助手,選中以Hex方式發送到的復選框,則文本框中的字符都是16進制的,在進行傳送帶之前需要將這些字符轉化為10進制的形式,然后在進行傳送,也就是HexChar()函式所實作的功能。
char HexChar(char c)
{
if((c>='0')&&(c<='9'))
return c-'0';//16進制中的,字符0-9轉化成10進制,還是0-9
else if((c>='A')&&(c<='F'))
return c-'A'+10;//16進制中的A-F,分別對應著11-16
else if((c>='a')&&(c<='f'))
return c-'a'+10;//16進制中的a-f,分別對應也是11-16,不區分大小寫
else
return 0x10; // 其他回傳0x10
}
Str2Hex函式的功能則是將如“66 03 ...”形式的字串以空格為間隔轉換為對應的16進制數并存放在BYTE型(typdef unsigned char BYTE)陣列中,data陣列作為發送緩沖陣列寫入串口即可。 實際應用中將BYTE資料型別修改為char。也是可以使用的。
下面的函式是將文本框中的字串,去除空格,然后將其他的字符轉換為char型資料和長度,放到陣列data中,以方便下面的串口傳送。
int Str2Hex(CString str, BYTE *data)
{
int t,t1;
int rlen=0,len=str.GetLength();
if(len==1)
{
char h=str[0];
t=HexChar(h);
data[0]=(BYTE)t;
rlen++;
}
//data.SetSize(len/2);
for(int i=0;i<len;)
{
char l,h=str;
if(h==' ')
{
i++;
continue;
}
i++;
if(i>=len)
break;
l=str;
t=HexChar(h);
t1=HexChar(l);
if((t==16)||(t1==16))//判D斷?為a非¤?法¤¡ 的ì?16進?制?數oy
break;
else
t=t*16+t1;
i++;
data[rlen]=(BYTE)t;
rlen++;
}
return rlen;
}
對于接收到的資料,位于接識訓沖區的BYTE陣列RecBuf中,如果要以相應大小的16進制形式顯示,剛可以將陣列中每一個元素以下列格式轉換并放入字串RecText中,即可實作以16進制顯示。
下面函式的功能是將char的資料轉換為16進制輸出。
CString RecText,str;
for(int i=0;i<Rlen;i++)
{
str.Format("%02X ",RecBuf);//將接收到的BYTE型資料轉換為對應的十六進制
RecText.Append(str);
}
@xjdg0229 串口發送資料——字串發送與十六進制發送的區別
我們在用串口發送資料的時候首先將待發送的資料/符號轉換為對應的ASCII碼,然后將這些ASCII碼按照二進制的方式一位一位地發送出去。
(注:以下圖片來自https://blog.csdn.net/wityy/article/details/8234739)


字母、數字在記憶體中的二進制應該按照ASCII碼表對照,也就是A的ASCII碼是65,十六進制是0x41,二進制記憶體為01000001
(記憶體中存的是二進制數,這8位二進制數對應的是ASC碼的十進制數,上面說的十六進制0x41是中間的一個轉換,沒什么實際用處,它既不是記憶體里實際存盤的可以看到的東西,也不是ASCII表里的東西)
也有博友說:“A852010100000000A91A”指的是十六進制的0~F組成的資料串,并不是指的字串。在編程實作中,這個資料串存盤在string中是需要先轉化下的: [參考自 http://blog.csdn.net/xhao014/article/details/6663738 請諒解原始碼作者已經無從考證]

最后附上這次測驗的代碼。
global function blob uf_str2hex (string ls_str);//====================================================================
// [FUNCTION] : uf_str2hex
// [RETURNS] : blob
// [ARGEMENTS] :
// value string ls_str 需要轉化的十六進制數字串
//
//--------------------------------------------------------------------
// [DESCRIPTION]: 把十六進制樣式字串轉化成十六進制數
// [AUTHOR] : Liuxj 2020.12.18
//=============================================================
int li_i , li_j , li_len
int li_ret , temp
blob lb_str , lb_retu
byte lb_temp ,lb_t[] , lb_t2[]
long ll_ret
ls_str = trim(ls_str)
li_len = len(ls_str)
lb_str = Blob(ls_str, EncodingUTF8!)
ll_ret = 1
for li_i =1 to li_len
li_ret = getbyte(lb_str,li_i,lb_temp)
temp = int(lb_temp)
if temp = 32 then li_ret = 0 // char(32) = " "
if li_ret = 1 then
if temp > 47 and temp < 58 then
lb_t[ll_ret] = byte(temp - 48)
ll_ret ++
elseif temp > 64 and temp < 71 then
lb_t[ll_ret] = byte(temp - 55) //temp -'A' + 10
ll_ret ++
elseif temp > 96 and temp < 103 then
lb_t[ll_ret] = byte(temp - 87) //temp -'a' + 10
ll_ret ++
else
//messagebox("提示", "讀卡錯誤,請重新放置卡片讀卡。")
lb_retu = blob ("資料錯誤,非十六進制資料。")
return lb_retu
end if
end if
next
li_len = ll_ret - 1
li_j = 1
//if mod(li_len,2) = 1 then return
for li_i =1 to li_len step 2
lb_t2[li_j] = byte(int(lb_t[li_i])*16 + int(lb_t[li_i+1]))
li_j ++
next
lb_retu = blob(lb_t2[])
//ole_1.object.output = lb_retu
return lb_retu
end function
轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/236725.html
標籤:控件與界面
下一篇:求助dw
