说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

顾客显示屏的问题,打不开端口?

编辑:说三道四文库 发布时间:2017-12-12 04:48
HTML文档下载 WORD文档下载 PDF文档下载
大家有没有用过DIY-POS(川田科技) PD-LED8N顾客显示屏,有用过的看看。
我的编程环境是DELPHI5.0,操作系统是WIN2000SERVER
将DLL文件拷贝到应用程序的目录下了,
程序运行运行的时候显示 “端口打开失败”。
用测试程序是可以正常使用的,这就确定系统是没有问题的。但是我的代码错在哪里?
-----------------------
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Label1: TLabel;
    procedure FormCreate(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
    pbflag : Boolean ;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
function com_init(com:Integer; baud:Dword):Boolean;stdcall;external 'api_com.dll';
function com_rest:Boolean;stdcall;external 'api_com.dll';
function com_send(buf:PChar; len:Integer):Boolean;stdcall;external 'api_com.dll';


implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
  pbflag := Com_init(1,2400);
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 Com_rest;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
   if pbflag then
   begin
       showmessage('端口打开成功');
   end
   else
   begin
       showmessage('端口打开失败');
   end;


end;

end.
-------------------
问题解决了,是我自己忘记挂上事件而已,很低级错误喔。
谁跟贴,就跟分咯。
怎么没有人回复啊,我如何结贴啊?
CSDN你说我应该如何结贴,
又不允许我删除这个帖子,
放在这里又没有人回。。。。如何结
最近又扣我的信誉分。。。
过分,过分
现在可以结了^_^
用Delphi自制英语复读机 用DEPHI为应用软件建立注册机制-Delphi资料 优化delphi5.0秘籍大曝光 元件的handle的建立-Delphi资料 元件卷动的改进-Delphi资料 在delhpi程序中获取网络资源信息-Delphi资料 在Delphi中操作快捷方式 在DLL中实现文件的拷贝-Delphi资料 在Report Builder中增加自定义函数-Delphi资料 在Win2000 Beta下安装Delphi 在Word插入字符-Delphi资料 注册表中几个对编程特别有用的地方-Delphi资料 资源文件在DELPHI中的使用 自制替换指定串函数-Delphi资料 API函数快速入门API函数简介-VB资料 API函数快速入门怎样在VB中声明和使用API函数 API函数在VB开发中的应用 API函数在VB中的应用 API实现完美的图片出现效果-VB资料 ListView控件特效-VB资料 Office 95 API 的企业开发者指南-VB资料 SENDMESSAGE函数巧应用 -VB资料 VB 与Windows API 讲座(五) VB5 未公开的函数 VB5.0与Windows API 间的呼叫技巧 VB5中回调函数的使用方法 VB的API编程精粹(二) VB的API编程精粹(一) VB调用API函数技巧快速选择全部项目 VB调用API函数使窗口保持在最上层 VB中调用Windows API的注意事项 如何把oracle中的数据结构导入access中去? 请问odbc方式和OLEDB方式有什么区别? 100询问:修改boot.ini仍无法实现双重启动. websphere的问题(1)? 我是第一次使用域.为什么无法在域控制器里增加用户?help me! 求助:模板的连接问题 strust 请问:哪里有人民邮电出版社的《个体软件工程》下载 ?(有分送) 存储过程执行出错,请帮忙看看!急! 请问:在sybase中的设备大小的设定,有没有一个标准?? include问题,屡试屡败 请问怎么才能用最简单的方法把程序做成服务? 程序设计文档怎么写啊?求教 不好意思,一个简单的问题 websphere的问题(2)? 请问如何实现模式窗口,就是当打开子窗口主窗口不能操作,除非关闭子窗口,如果有这样的网页也行 关于清华出版社出版的“微软.NET程序设计系列”之《ADO.NET程序设计》的问题,大家来讨论一下 如何用程序实现光驱的弹入弹出? 在线等了,各位帮忙了!! 我运行了一个网络管理软件出现乱码?而别的程序都没有乱码? 对话框上面显示视图,怎么办? 一道四级题有一点不明白的地方,谢谢各位高手帮我解决一下困惑。。 websphere的问题? 在一个对话框CDialog类中访问窗体视图类CFormView中的函数发生错误? 有关简繁体转换的问题 怎么分离这个字符串 aa|bb|cc|dd| ASP连接Oracle9i的连接字符串是什么? 请教:EXCEL中使用VB进行串口编 websphere的问题(4)? 如何在自己写的类的属性、方法在被使用的时候显示一些相关信息? 高分:大侠们,帮我看一下这个设计思路对吗?(在线等待!) 初级问题:请问用ASP开发BS结构程序,应该选什么工具啊 请教各位pb的可执行程序的分发 我运行了一个网络管理软件时 这个软件显示的信息是乱码?而别的程序都没有乱码? 多谢awpking ,请进给你洒分. asp里调ActiveX控件,客户端却不能用,请帮助解决,100分相送。 如何让两个网段的电脑互相访问 在线等!打开文档的问题! HtmlHelp用法问题。急急!!1 只有在这问,关于笔记本网卡的驱动程序 我运行了一个网络管理软件时 这个软件显示的信息是乱码?而别的程序都没有乱码? 菜鸟的问题,大虾解决 本地安全策略打不开,怎么解决? 高分求教,如何让asp.net生成的网页转为pdf输出,在线等待 求救:用JMail发送邮件,用IIS的SMTP虚拟服务器,邮件都堵在Queue目录里发不出去 时间问题 在线等待 !!!没分啦!以后报答!! 为何执行int n=str.GetLength()后,n为0??? 急寻《基于XML电子公文格式规范》 初学 关于datagrid的问题 讨论用例分析技术 字写得难看怎么办因为想省时间所以我写字都是写连笔,久了之后就变得特别草,到许多字无法辨认的地步,于是就想要不要一笔一画地写,但那样又太花时间,所以特别纠结…… 急求描写人物的作文1000字!高三水平的 谢谢~~~ 我是高一的女生,马上分文理,我该选什么?上半学期期末的成绩是语76数74外81物79化70地64历65政67生83.5,我对理科感兴趣,可分数不拔高,学理的话害怕将来学的太难不能攻克,学文不很喜欢政治,我 价值是凝结在商品中的无差别一般人类劳动.书上又说货币自身也有价值.那货币里有凝结一般人类劳动吗?就是说要用马克思的思路把这个事情说圆了,不是研究这一块的就算了.另外请帮忙把 人为什么要学会说谎,善意的谎言不算 请简单演示一下向量的用法用C++ 实现 需要用到数组啊 居里夫人的三克镭分别有着怎样的由来 居里夫人的三克镭的由来 居里夫人的三克镭分别有着怎样的由来?请简洁概括 居里夫人的三克镭分别有着怎样的由来,请简要概括 凄楚的近义词. 专家建议国有企业应纳入中央巡视组重点埃及前少校刺杀内政部长?美被曝曾就监听亚太寻日本协助美媒:美是全球不多的超级大国 不得不美媒:安倍把日本带向一个不屈服于美国韩欲购美新式导弹胡万林学徒之死:曾痴迷中医 死于“独媒体揭“神医”胡万林江湖路:曾在新疆纽约华裔社区发生凶杀案 4名儿童被刺美国安局:奥巴马并未参与讨论监听默克美国国安局:奥巴马并未参与讨论监听默近六成人选择出境 春节出游杭州人最爱两游客为车位动起拳头 一个进了医院一“孔卡替身”草签合同徐少华赴佛莞检查铁路城轨建设情况春节玩过嗨身板扛不住 感冒的人多了呼和黄否认屈臣氏拟迁册英国南方大包一天卖7500只 奎元馆一天新兴市场货币指数跌至新低广州楼市成交48套房多个犯罪团伙被“一锅端”90后女孩江雨佳 温岭七位孤老添了一极道修真霸控我的老婆是卧底战魔法神用毒高手在现代创月魔武神甲风雨沧桑贴身防火墙英雄无敌之极品领主足球之杀手鳄鱼山公园旅游大学习巷清真寺旅游白沙岛旅游龙潭沟旅游五道幢旅游青岛中山路旅游基督教江苏路堂旅游贝壳堤旅游海岛金山寺旅游碧霞湖生态观光园旅游云曼温泉旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘