Delphi 3.0开发微机数据采集与处理软件系统研究
- 作者:admin 来源:网络 日期:2009-4-20 23:34:27
⑶设置中断
withmyPortdo
begin
ifActiveHWthenCloseDriver
else
begin
OpenDriver;
ifnotActiveHWthen
begin
MessageBeep(0);
Application.MessageBox('系统发现指定I/O端口未能成功打开！',
'请注意！',mb_OKormb_ICONHAND);
end
else
begin
IRQNumber:=2;
SetIRQ;
end;
end;
end;
⑷开中断,进行采样
Port[Basea+9]:=$A3H;//选择定时器触发,连接PC机2级中断,开中断
Port[Basea+8]:=1;//选择定时器触发
i:=0;
whileiPointdo;//等待中断,每中断一次采样一个数据,直至采满Point个点
⑸退出系统前关闭中断
procedureTForm1.FormClose(Sender:TObject;varAction:TCloseAction);
begin
{...}
myPort.CloseDriver;
{...}
end;
在实际工作中,读者应根据具体数据采集板的硬件特性,参考上述方法,编写数据采集、分析、输出代码。http://www.dxlww.net代写论文网
参考文献
沈兰荪.数据采集技术.中国科学技术大学出版社.1990
FrankEngo.使用Delphi3编程.电子工业出版社.1997
代写论文联系方式
联系QQ：904272800
联系信箱：904272800@qq.com
代写论文导航
客户、写手申请单
最新论文
热点论文
