请教:Delphi下如何实现串口modem通讯?SPComm32有无实例?(100分)

  • 主题发起人 主题发起人 bbg
  • 开始时间 开始时间
B

bbg

Unregistered / Unconfirmed
GUEST, unregistred user!
本人急需在D4下实现拨号传输文件,请提供有关控件。
 
spcomm32在前面已有好多讨论。
文本文件可以倒入vb的mscomm,较容易使用。
如果只是传输文件,直接winexec超级终端。
 
我的意见与g622一样,我用MsComm控件做过文本
文件的传输实验,很容易实现。
 
深度历险有很多控件,去看看吧!!
 
利用MsComm32实现的:
implementation

{$R *.DFM}
//初始化
procedure TForm1.FormCreate(Sender: TObject);
begin
Mscomm1.PortOpen:=true;
Mscomm1.InputLen:=0;
Mscomm1.RThreshold:=5;
MsComm1.InputMode:=comInputModeText;
ReData:='';
end;

//发送数据
procedure TForm1.BitBtn1Click(Sender: TObject);
var
s1:string;
StringCount,i:integer;
begin
Mscomm1.InBufferCount:=0;
MsComm1.Output:='dfdsfsd';
end;

//接收数据
procedure TForm1.MSComm1Comm(Sender: TObject);
begin
Case MsComm1.CommEvent of
2:
ReData:=MsComm1.Input+ReData;
end;
end;
 
希望得到第一个问题的解决方法,多谢。
 
接受答案了.
 

Similar threads

D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
887
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
946
DelphiTeacher的专栏
D
后退
顶部