unit TmpMonitoring; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, wItem; type TTmpMonitoring = class(TwItem) private { Private declarations } FMachCode: string; FSetTmp: string; FNowTmp: string; FAlarmStatus: string; FStatus: string; protected { Protected declarations } public { Public declarations } published { Published declarations } property MachCode: string read FMachCode write FMachCode; property SetTmp: string read FSetTmp write FSetTmp; property NowTmp: string read FNowTmp write FNowTmp; property AlarmStatus: string read FAlarmStatus write FAlarmStatus; property Status: string read FStatus write FStatus; end; implementation end.