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

請問delphi的chr的函式在BCB裡要用什麼函式取代

尚未結案
Drake
一般會員


發表:3
回覆:3
積分:1
註冊:2003-08-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-08-13 08:58:00 IP:211.23.xxx.xxx 未訂閱
請問各位大大,delphi的chr的函式在BCB裡要用什麼函式取代
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-08-13 10:12:40 IP:203.73.xxx.xxx 未訂閱
引言: 請問各位大大,delphi的chr的函式在BCB裡要用什麼函式取代
Drake 你好:
(1)應該是不用其他的函式取代的吧,以下這三種寫法在 C 的寫法是一樣的
    c='A' >
-- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
Drake
一般會員


發表:3
回覆:3
積分:1
註冊:2003-08-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-08-13 21:12:26 IP:218.166.xxx.xxx 未訂閱
RaynorPao您好: 首先感謝您回答我的問題,真是不好意思麻煩您了 我是要寫RS-232跟PLC連線溝通 我是用VB裡的TMSComm 在Delphi:(#RMR**) final := Chr(37) '01' Chr(35) 'RMR' Chr(42) Chr(42) Chr(13); MSComm1.Output := final; 可以跟PLC連線 在BCB: final = Chr(37) '01' Chr(35) 'RMR' Chr(42) Chr(42) Chr(13); MSComm1 -> Output = final; BCB不認識Chr,錯誤訊息為undefined function 'Chr' 我之後改為 final = Char(37) '01' Char(35) 'RMR' Char(42) Char(42) Char(13); MSComm1 -> Output = final; 可以run,但不能溝通,傳出的值不是PLC要的 final為一堆的數字而不是#RMR** 我在改為 Char final[]={Char(37),'0','1',Char(35),'R','M','R',Char(42),Char(42),Char(13);}; MSComm1 -> Output = final; 錯誤訊息視窗為"不正確的值" 不知道該如何解決,所以需各位大大幫忙,提供意見 小弟感激不盡
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-08-13 21:35:37 IP:61.221.xxx.xxx 未訂閱
引言: RaynorPao您好: 首先感謝您回答我的問題,真是不好意思麻煩您了 我是要寫RS-232跟PLC連線溝通 我是用VB裡的TMSComm 在Delphi:(#RMR**) final := Chr(37) '01' Chr(35) 'RMR' Chr(42) Chr(42) Chr(13); MSComm1.Output := final; 可以跟PLC連線 在BCB: final = Chr(37) '01' Chr(35) 'RMR' Chr(42) Chr(42) Chr(13); MSComm1 -> Output = final; BCB不認識Chr,錯誤訊息為undefined function 'Chr' 我之後改為 final = Char(37) '01' Char(35) 'RMR' Char(42) Char(42) Char(13); MSComm1 -> Output = final; 可以run,但不能溝通,傳出的值不是PLC要的 final為一堆的數字而不是#RMR** 我在改為 Char final[]={Char(37),'0','1',Char(35),'R','M','R',Char(42),Char(42),Char(13);}; MSComm1 -> Output = final; 錯誤訊息視窗為"不正確的值" 不知道該如何解決,所以需各位大大幫忙,提供意見 小弟感激不盡
Drake 你好: 改成這樣子看看行不行呢??
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
Drake
一般會員


發表:3
回覆:3
積分:1
註冊:2003-08-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-08-14 13:22:22 IP:211.23.xxx.xxx 未訂閱
RaynorPao您好: 問題已解決了,謝謝您提供意見 不知是不是我沒注意到,還是… 程式我改為 String p; Char char final[11]={37, '0', '1', 35, 'R', 'M', 'R', 42, 42, 13, 0}; p = final; MSComm1 -> Output = p; 就可以了,說真的還真不知問題出在那裡 多加String p;,就OK了 也許我對PLC還不夠了解吧,不知道它要是是什麼 感謝PaynorPao的答案和幫忙
系統時間:2024-05-06 14:18:18
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!