摘要 本文主要介绍了在delphi-p.htm" target="_blank" title="delphi货源和pdf资料">delphi和microsoft access数据库开发环境下，pc机应用软件与西门子s7-300 系列plc的数据通信的实现方法。并把此方法应用于复杂控制系统的调试及pc机管理系统与plc控制系统的信息交换中。
关键字 delphi-p.htm" target="_blank" title="delphi货源和pdf资料">delphi，prodave，数据通信，可编程序控制器，mpi
引言
西门子工控产品在我国有较高的市场占有率，它的通信及网络产品有着引导世界工控技术潮流的作用，研究西门子工控产品及通信技术的实际应用问题有着广泛普遍的重要意义。本文通过对某市级烟草公司的卷烟配送分拣系统的研究,探讨了在windows环境下，用delphi开发的数据库应用软件与西门子s7-300之间通信的实现问题。该卷烟配送分拣系统计算机部分结构如图1所示。
该系统管理计算机接收信息中心局域网发送来的各条送货线路当天的访销信息数据，在此基础上管理计算机建立起以送货线路为单位的配方数据库，将配方数据分批次连续地下传给plc。plc 根据下传的配方数据对系统控制使其连续分拣和收集，同时系统工作状态及工作数据通过profibus 现场总线在两个触摸屏tp27-10得到动态显示，最后在收集工位自动得到一箱对应一个销售网点的用户配料。为了提高调系统试效率,我们在delphi-p.htm" target="_blank" title="delphi货源和pdf资料">delphi和microsoft access数据库平台上编写了用于plc控制程序的调试软件。
从上看出该系统能否研制成功必须要解决的问题是：西门子s7-300系列plc通讯协议不公开，管理计算机和调试计算机上第三方软件编制的程序如何实现pc机与西门子s7-300系列plc信息交换？通过技术调研和实际调试，我们成功实现了在vb、delphi-p.htm" target="_blank" title="delphi货源和pdf资料">delphi程序开发平台上开发的管理程序及调试程序与s7-300系列plc通信，顺利完成了系统研制任务。限于篇幅，本文以调试软件的通信实现方法来讨论第三方应用软件与西门子s7-300 plc的通信问题。
2调试软件设计
根据plc控制程序的调试要求，该调试软件使用delphi-p.htm" target="_blank" title="delphi货源和pdf资料">delphi的数据库技术把事先设计的60个配方数据写入数据库，根据调试需要也可通过人机界面对数据库中的数据进行任意修改，当执行“下传数据”命令时把数据库中的数据字段进行一定数据处理后通过调用prodave s7软件包写入plc中对应的db（data blocks）块，其中一条记录对应一个db块，每条记录的一个字段对应该db块中的一个字。该调试软件也可按一定顺序读plc中各db块中的字，并把读取的数据经过处理后写入数据库，以供调试人员检查写入数据的正确性。pc机与plc cpu318-2dp mpi口之间的数据通信是通过pc/mpi适配器硬件连接实现的。
3数据通信
3.1 通信软件
实现pc机与plc之间的数据通信是一个棘手的问题。西门子公司的prodave s7软件包的动态链接库（dll）提供了大量的基于windows nt，windows95/98，windows3.11或ms-dos的函数，这样就使用户解决plc与pc之间的数据交换和数据处理问题变为可能。
3.2 通信函数
在delphi-p.htm" target="_blank" title="delphi货源和pdf资料">delphi的object pascal语言中，要访问动态链接库dll（dynamic link library）中的例程有两种方式。一种是静态引入方式；另一种是动态引入方式。
本软件使用静态引入方式，即在单元的interface部分用external指示字列出要从dll中引入的例程。如果要引入的例程比较多，就可以用一个专门的单元来集中声明要引入的例程。
plc控制程序调试软件用到的prodave函数主要有：
(1)load_tool pc机与plc系统初始化链接；
(2)unload_tool 断开pc机与plc系统链接；
(3)db_read 从plc的db块中读数据字；
(4)db_write 向plc的db块中写数据字。
3.3 通信程序的实现
在该调试软件中用一个专门的单元集中声明要引入的prodave s7动态链接库的例程，然后在程序中在引用这个单元，即把引入单元“prodave”加到程序的uses子句。该引入单元的代码如下：
unit prodave;
interface
type
tadr_table_type=record
adr:byt
