pascal有对并口操作的函数吗?怎样实现基于pascal的并口操作?