当前位置:主页>销售管理软件> 列表

控制钱箱:MSComm32组件的 使用 找哪种财务软件好用

库存管理软件版1楼: 将MSComm32.ocx文件安装到delphi的ActiveX后,在form1上放置TMSComm组件时出现如下错误:"License information for TMSComm not found.youcannot use this control in design mode."
请教高手指教。

2楼: 注册不对。。你上网找有教你怎么注册的。要不你可以用SPCOMM 如用友进销存管理软件

3楼: hhboy:
您好!
请教应当怎么注册?

4楼: 请教应当怎么注册?

5楼: unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, Grids, DBGrids, ADODB, StdCtrls, OleCtrls, MSCommLib_TLB,
ExtCtrls;

type
Tform1 = class(TForm)
MSComm1: TMSComm;
Button1: TButton;
Label1: TLabel;
Memo1: TMemo;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Bevel1: TBevel;
Bevel2: TBevel;
Label6: TLabel;
Label7: TLabel;
Label8: TLabel;
Label9: TLabel;
Label10: TLabel;
Label11: TLabel;
Edit1: TEdit;
Label12: TLabel;
Button2: TButton;
RadioButton1: TRadioButton;
RadioButton2: TRadioButton;
RadioButton3: TRadioButton;
Bevel3: TBevel;
Bevel4: TBevel;
Label13: TLabel;
Bevel5: TBevel;
procedure Button1Click(Sender: TObject);
procedure Edit1Change(Sender: TObject);
procedure RadioButton1Click(Sender: TObject);
procedure RadioButton2Click(Sender: TObject);
procedure RadioButton3Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;

var
form1: Tform1;

implementation

{$R *.dfm}

procedure Tform1.Button1Click(Sender: TObject);
begin
MSCOMM1.PortOpen:=TRUE;
end;



procedure Tform1.Edit1Change(Sender: TObject);
begin
IF EDIT1.TEXT<>'''' THEN LABEL12.CAPTION:=FLOATTOSTR(STRTOFLOAT(EDIT1.TEXT)-STRTOFLOAT(LABEL9.CAPTION));
end;

procedure Tform1.RadioButton1Click(Sender: TObject);
begin
MSCOMM1.COMMPORT:=1;
end;

procedure Tform1.RadioButton2Click(Sender: TObject);
begin
MSCOMM1.COMMPORT:=2;
end;

procedure Tform1.RadioButton3Click(Sender: TObject);
begin
MSCOMM1.COMMPORT:=3;
end;

procedure Tform1.Button2Click(Sender: TObject);
begin
mscomm1.portopen:=false;
end;

procedure Tform1.FormCreate(Sender: TObject);
begin
mscomm1.commport:=1;
RadioButton1.checked:=true;
end;

procedure Tform1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
mscomm1.portopen:=false;
end;

end.

6楼: Mscomm 安装需要三个文件和注册
http://ftp13.enet.com.cn:88/pub/utility/otheru/desinmscomm.rar
http://ftp7.enet.com.cn:88/pub/utility/otheru/desinmscomm.rar
注册MSCOMM 工具。

库存管理软件版7楼: ww990:
您好!
首先感谢您热心帮助。
问题:在form1上放置TMSComm组件时出现如下错误:"License information for TMSComm not found.youcannot use this control in design mode." 不能使用。请帮助。

8楼: Mscomm 控件使用:
http://study.99net.net/study/program/vc/1085624790.html

9楼: yueing:
您好!真心感谢您的再次帮助。
“ http://ftp7.enet.com.cn:88/pub/utility/otheru/desinmscomm.rar”打不开,请问应当怎样打开学习注册?

10楼: 在开始————运行中打入regsvr32 c:\windows\system\mscomm32.ocx
不过要把它copy到这个目录中

11楼: 也就是在要windows 系统中注册一下才行

12楼: 将 Mscomm32.ocx , Mscomm32.dep, mscomm32.srg 复制到 \WINNT\System32
RegSvr32.exe MSCOMM32.OCX

你可以用Google 搜索一下 "注册MSCOMM" 如哪种财务软件好用

13楼: http://software.tech.tom.com/02/0228/35999/35999_4.shtml
http://down.it168.com/02/0228/35999/35999_4.shtml

在试试这两个下载地址。

库存管理软件版14楼: 首先在VB安装目录下找到下列三个文件:

  Mscomm.reg, Mscomm32.ocx,Mscomm32.dep ,

  把这三个文件拷贝到Windows的system目录下(注意WinNT下是System32)。然后用Windows下的注册工具regsvr32注册该OCX控件,例如:

  Regsvr32 … system目录\Mscomm32.ocx .

  注册成功后用记事本打开Mscomm.reg,可以看到类似下面的内容:

  [HKEY_CLASSES_ROOT\Licenses\4250E830-6AC2-11cf-8ADB-00AA00C00905]

@ = "kjljvjjjoquqmjjjvpqqkqmqykypoqjquoun",为了能正确使用该控件,需要修改注册表的信息,在注册表的在HKEY_CLASSES_ROOT\Licenses下建一主键:

4250E830-6AC2-11cf-8ADB-00AA00C00905,主键的内容为

kjljvjjjoquqmjjjvpqqkqmqykypoqjquoun.

  至此已经完成了控件的系统注册工作,剩下的工作是在Delphi中导入这个ActiveX控件,进入Delphi环境在Component菜单下选Import ActiveX Control,这时在列表中可以看到Microsoft Comm Control 6.0选项, 选中这个选项点击Install按钮,完成安装。在ActiveX控件页上可以看到一个电话为图标的控件,这就是MSComm控件。这样就可以象在VB中一样方便得使用MSComm控件了。

15楼: 真心致谢各位的帮助,我先做以下,完成后在联系

16楼: 多人接受答案了。