使用spcomm控件在POS 客户显示屏上显示价格 POS 客户显示屏上显示价格 只能在 原有显示后面加数据上去 怎样清屏 和 走马灯效果呢?跪求高手帮助
解决方案 »
- delphi开发的模块ocx网页发布的问题(高分求教)
- 如何判断对象指针所指向的堆内存是否已经释放
- 招骋程序员
- 如果要在窗体显示出来后执行某些操作应该写在什么事件下?
- 请教一个关于坐标的问题?
- pb调用delphi dll的问题,delphi输出几函数给PB调用,其中一个调用返回值不行???
- 请教PASCAL指针的用法
- 哪里有中文的Dephi联机帮助下???能提供Dephi的命名规范吗???
- 在Insert时,你的中间层的数据模块中的ADOQuery应该怎么操作。我怎么在客户程序中不能成功的增加一条记录呢?提示:Missing SQL 属性。什
- 如何在程序中使用编译后的DCU文件,请指教!
- 如何修改ADOQuery查询数据集的当前记录?
- 散20分
我是用这句来发 价格上去了可能是有错补充一句 客显是经过RS 232串口连接的 谢谢
1、清屏采用发送一串空格
2、走马灯就是不断清屏、然后不断发送价格,当然价格显示串个位数位置要不断变化。Just Like this:
1、Clear screen
str := ' '; //空格长度应该根据显示屏大小进行调整,或者做成可配置。
Comm1.WriteCommData(Pchar(str),Length(str));
2、走马灯显示,假定显示 100.00var
i: integer;
str: string;
cash: double;
begin
i := 1;
cash := 100;
while 未终止显示 do
begin
str := FormatFloat('0.00',cash)+' '; //加上适当个数空格
str := LeftStr(str,i);
Comm1.WriteCommData(Pchar(str),Length(str));
end;以上思路是基于价格显示屏是基于覆盖式显示,如果是叠加,那就不知道会是怎么样子。
系统不知道要发多少个空白的信息过去清屏下面“*”代表 屏幕上 的空白外****Total:100.00****
********************那就要发 64 个空白 上去因为要保证下次一发送要在屏的左上角 第一个开始这个好头痛啊