PB编程实时读取电子称(RS232 COM串口)
PB编程实时读取电子称(RS232 COM串口)?
下面是通过BUTTON的CLICKED事件,可以读出来。如何实时读取数据?
string ls_text,ls_flag
dec ldec_wt
ls_text = serial_port1.read(2000)
if isnull(ls_text) or ls_text='' or len(trim(ls_text))=0 then
return
end if
ls_text = trim(ls_text)
if pos(ls_text,'GGU')>0 then
ls_text =trim(mid(ls_text,1,pos(ls_text,'GGU')-1))
end if
if pos(ls_text,'GGS')>0 then
ls_text =trim(mid(ls_text,1,pos(ls_text,'GGS')-1))
end if
if pos(ls_text,'+')>0 then
ls_text =trim(mid(ls_text,pos(ls_text,'+')+1))
end if
if pos(ls_text,'+')>0 then
ls_text =trim(mid(ls_text,2))
end if
if isnumber(mid(ls_text,1,7)) then
ldec_wt = dec(mid(ls_text,1,7))
//清空
serial_port1.write('')
sle_1.text = string(ldec_wt)
if ls_flag='N' then
st_2.text = 'g'
else
st_2.text = 'g'
end if
else
setnull(ldec_wt)
end if
下面是通过BUTTON的CLICKED事件,可以读出来。如何实时读取数据?
string ls_text,ls_flag
dec ldec_wt
ls_text = serial_port1.read(2000)
if isnull(ls_text) or ls_text='' or len(trim(ls_text))=0 then
return
end if
ls_text = trim(ls_text)
if pos(ls_text,'GGU')>0 then
ls_text =trim(mid(ls_text,1,pos(ls_text,'GGU')-1))
end if
if pos(ls_text,'GGS')>0 then
ls_text =trim(mid(ls_text,1,pos(ls_text,'GGS')-1))
end if
if pos(ls_text,'+')>0 then
ls_text =trim(mid(ls_text,pos(ls_text,'+')+1))
end if
if pos(ls_text,'+')>0 then
ls_text =trim(mid(ls_text,2))
end if
if isnumber(mid(ls_text,1,7)) then
ldec_wt = dec(mid(ls_text,1,7))
//清空
serial_port1.write('')
sle_1.text = string(ldec_wt)
if ls_flag='N' then
st_2.text = 'g'
else
st_2.text = 'g'
end if
else
setnull(ldec_wt)
end if
...全文
相关推荐
PB实时读取txt文件
标题中的“PB实时读取txt文件”指的是使用PowerBuilder(PB)开发的程序,能够实时监控并读取TXT文本文件的内容。
如何在PB中实现串口编程
### 如何在PB中实现串口编程#### 知识点一:PB与串口编程基础- **PB(PowerBuilder)**:一种快速应用开发工具,由Sybase公司(后被SAP收购)开发,主要用于Windows
pb_com.rar_PB_串口_PowerBuilder_RL71_pb_com_pb串口程序
这些函数可以帮助开发者轻松地集成串口通信功能到他们的PB应用程序中。在实际应用中,比如描述中提到的“采集自动仪表传入的数据”,PB程序可以通过串口连接到这些仪表设备,实时读取并处理数据。
PBComm_new.rar_PB 串口_PB串口_PB串口通讯_pb comm_pb rs232
这是一个关于PB编程的串口通讯程序,可以接受RS232的数据
PB串口通讯例子
同时,熟悉PB的事件驱动编程模型和对象模型对于实现串口通讯至关重要。


API 调用
