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