电子称下载数据 有谁做过通过网络向寺岗电子称下发数据? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 好像电子称连上网线,用传文件方式向该IP,传一个特定的TXT文件就好了.(特定的TXT好像可以用电子称自定义,一般配都是PLU码加产品名称,加单价,什么的.)呵呵.....没做过,看到过...不知道是不是. 这是80称的格式。80可以 以太网上传也可以通过串口好像。 S:=copy('00000'+trim(ADOQuery1.fieldbyname('goodsid').AsString),length('00000'+trim(ADOQuery1.fieldbyname('goodsid').AsString))-5,6); s:=s+ADOQuery1.fieldbyname('weighflag').Asstring; s:=s+copy('00000'+inttostr(round(ADOQuery1.fieldbyname('saleprice').Ascurrency*100)),length('00000'+inttostr(round(ADOQuery1.fieldbyname('saleprice').Ascurrency*100)))-5,6); s:=s+'01'; S:=s+copy(weightbarcodeflag+trim(ADOQuery1.fieldbyname('goodsid').AsString)+'000000000000',1,13); s:=s+'001'; s:=s+trim(ADOQuery1.fieldbyname('name').AsString)+'@ @'; to starluck:怎么样将数据下发到80称上? fastreport在win7上导出到excel有问题 嘿嘿 刚学delphi 请教个问题 Load按钮 在哪里? 在线等 仅用SQLQuery组件能编辑数据表里的数据吗? 如何实现根据拼间检索商品名称? 圣诞快乐,青青子衿4号·········· ado对象(不是控件)如何绑定控件?在线等,急 又要提一个select语句的问题(续)? delphi5.0的补丁怎么装?特别是ado的补丁。 非常急的几个问题! delphi 获取第三方dll取出得数据与真实数据字符个数不一致问题 通过Querysql查询返回一个数据库的条目内容
s:=s+ADOQuery1.fieldbyname('weighflag').Asstring;
s:=s+copy('00000'+inttostr(round(ADOQuery1.fieldbyname('saleprice').Ascurrency*100)),length('00000'+inttostr(round(ADOQuery1.fieldbyname('saleprice').Ascurrency*100)))-5,6);
s:=s+'01';
S:=s+copy(weightbarcodeflag+trim(ADOQuery1.fieldbyname('goodsid').AsString)+'000000000000',1,13);
s:=s+'001';
s:=s+trim(ADOQuery1.fieldbyname('name').AsString)+'@ @';