# Industrial_System **Repository Path**: delphi_1/Industrial_System ## Basic Information - **Project Name**: Industrial_System - **Description**: 基于 Delphi 7 原生VCL组件开发,仅通过电脑本地TCP网络通信实现完整工业上位机监控全套功能。 - **Primary Language**: Unknown - **License**: Not specified - **Default Branch**: master - **Homepage**: None - **GVP Project**: No ## Statistics - **Stars**: 0 - **Forks**: 0 - **Created**: 2026-04-19 - **Last Updated**: 2026-04-19 ## Categories & Tags **Categories**: Uncategorized **Tags**: None ## README # 工业实时监控系统(Delphi7 完整项目) ## 项目概述 本项目基于 Delphi 7 原生VCL组件开发,无任何第三方付费控件,仅通过电脑本地TCP网络通信实现完整工业上位机监控全套功能。 包含**虚拟PLC服务端**、**监控客户端**双工程,全程无需外接硬件、无需真实PLC设备,仅单台电脑即可完整运行所有工业通信流程。 ## 项目功能 1. 三参数工业仪表盘:温度、压力、转速实时显示 2. 三路独立实时趋势曲线(温度/压力/转速历史趋势) 3. 设备状态指示灯:运行、故障、通讯三色状态灯 4. 数据参数表格实时刷新显示 5. 数据超限自动报警、报警日志实时记录 6. 网络通讯异常自动重连机制 7. 采集数据本地文本持久化保存 8. 完整TCP客户端-服务端通信架构,兼容真实PLC接入 ## 开发环境 - 开发软件:Delphi 7 - 通信协议:TCP Socket 本地回环通信 127.0.0.1:502 - 全部组件:Delphi7 原生自带控件(Indy、TeeChart、Gauge、标准VCL组件) - 运行环境:Windows 全系统,仅单台电脑即可运行 ## 工程结构说明 ### 1. Server_VirtualPLC 虚拟PLC服务端 模拟真实PLC设备,监听本地502端口,循环生成模拟工业现场数据,通过TCP发送给上位机。 数据量程: - 温度:25.0 ~ 80.0 ℃ - 压力:0.50 ~ 1.30 MPa - 转速:800 ~ 2300 r/min ### 2. Client_Monitor 工业监控上位机客户端 监控主程序,连接虚拟PLC,完成数据接收、解析、界面渲染、报警判断、数据存储。 ## 通信数据格式 字符串格式,逗号分隔: `温度,压力,转速` 示例:`45.2,0.85,1560` ## 运行操作步骤 1. **第一步**:打开 `Server_VirtualPLC` 工程,编译并运行虚拟PLC服务端 2. **第二步**:打开 `Client_Monitor` 监控客户端工程,编译运行 3. **第三步**:点击客户端 `Connect` 按钮建立TCP连接 4. **第四步**:点击 `Start Monitor` 开始实时监控采集 5. **第五步**:点击 `Stop Monitor` 停止数据采集 ## 界面功能说明 1. 左侧:三个参数仪表盘,实时进度显示 2. 中间:三路数据实时趋势曲线 3. 右侧上方:参数数值表格、量程上限显示 4. 右侧下方:实时报警信息滚动日志 5. 底部:功能控制按钮、系统时间、三色状态指示灯 ## 运行截图 ![](./img/main.png)