線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:3634
推到 Plurk!
推到 Facebook!

RS232如何送Byte出去

答題得分者是:malanlk
itsgero2798
一般會員


發表:17
回覆:17
積分:6
註冊:2007-09-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-03-14 13:45:55 IP:61.230.xxx.xxx 訂閱
現我在寫一段跟字幕機溝通的程式,使用TComm來送資料,我要送給字幕機的ASCII CODE如下
FFh 07h F8h //指令
A6h 72h B9h F5h BEh F7h //顯示字ascii code -- 中文為字幕機
00h F8h //結束碼

我使用的send( )的 funtion如下
procedure TForm1.Send();
var
Temp3:string;
lrc:LongWord;
begin
if (hComm=0) then exit; //檢查Handle值
Temp3:= ' 字幕機' ; //取得傳送的字串
WriteFile(hComm,PChar(Temp3)^,Length(Temp3), lrc, nil); // 送出資料
end;

若傳'字幕機'三個字會送A6h 72h B9h F5h BEh F7h 沒問題,但如何送指令及結束碼
若加入 Temp3:= 'FF07F8字幕機00F8'
送出去會變46h 46h 30h 37h 46h 38h A6h 72h B9h F5h BEh F7h 30h 30h 46h 38h
程式把指令FF轉成 ASCII 46 46送,但我是要送 FF一個Byte過去 要如何改 謝謝
malanlk
尊榮會員


發表:20
回覆:694
積分:572
註冊:2004-04-19

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-03-15 02:25:10 IP:61.219.xxx.xxx 訂閱
commandStr := #$FF+#$07+#$F8
endSgtr := #$00 #$F8

Temp3:= commandStr '字幕機' endStr
編輯記錄
malanlk 重新編輯於 2008-03-15 02:35:15, 註解 無‧
itsgero2798
一般會員


發表:17
回覆:17
積分:6
註冊:2007-09-28

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-03-28 11:03:33 IP:61.230.xxx.xxx 訂閱
謝謝malanlk大大
系統時間:2017-12-15 16:14:40
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!