67 lines
2.0 KiB
Plaintext
67 lines
2.0 KiB
Plaintext
unit NilmData;
|
|
|
|
interface
|
|
|
|
uses
|
|
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
|
|
w_bases, wItem;
|
|
|
|
type
|
|
TNilmData = class(TwItem)
|
|
private
|
|
{ Private declarations }
|
|
Fidx: AnsiString;
|
|
FDATE_ID: AnsiString;
|
|
FID: AnsiString;
|
|
FCHA_PF: AnsiString;
|
|
FCHA_VOLT: AnsiString;
|
|
FCHA_CUR: AnsiString;
|
|
FCHA_Var: AnsiString;
|
|
FCHA_Va: AnsiString;
|
|
FCHB_PF: AnsiString;
|
|
FCHB_VOLT: AnsiString;
|
|
FCHB_CUR: AnsiString;
|
|
FCHB_Var: AnsiString;
|
|
FCHB_Va: AnsiString;
|
|
FMPU_AX: AnsiString;
|
|
FMPU_AY: AnsiString;
|
|
FMPU_AZ: AnsiString;
|
|
FMPU_GX: AnsiString;
|
|
FMPU_GY: AnsiString;
|
|
FMPU_GZ: AnsiString;
|
|
FUpdateTime: AnsiString;
|
|
protected
|
|
{ Protected declarations }
|
|
public
|
|
{ Public declarations }
|
|
published
|
|
{ Published declarations }
|
|
property idx: AnsiString read Fidx write Fidx;
|
|
property DATE_ID: AnsiString read FDATE_ID write FDATE_ID;
|
|
property ID: AnsiString read FID write FID;
|
|
property CHA_PF: AnsiString read FCHA_PF write FCHA_PF;
|
|
property CHA_VOLT: AnsiString read FCHA_VOLT write FCHA_VOLT;
|
|
property CHA_CUR: AnsiString read FCHA_CUR write FCHA_CUR;
|
|
property CHA_Var: AnsiString read FCHA_Var write FCHA_Var;
|
|
property CHA_Va: AnsiString read FCHA_Va write FCHA_Va;
|
|
property CHB_PF: AnsiString read FCHB_PF write FCHB_PF;
|
|
property CHB_VOLT: AnsiString read FCHB_VOLT write FCHB_VOLT;
|
|
property CHB_CUR: AnsiString read FCHB_CUR write FCHB_CUR;
|
|
property CHB_Var: AnsiString read FCHB_Var write FCHB_Var;
|
|
property CHB_Va: AnsiString read FCHB_Va write FCHB_Va;
|
|
property MPU_AX: AnsiString read FMPU_AX write FMPU_AX;
|
|
property MPU_AY: AnsiString read FMPU_AY write FMPU_AY;
|
|
property MPU_AZ: AnsiString read FMPU_AZ write FMPU_AZ;
|
|
property MPU_GX: AnsiString read FMPU_GX write FMPU_GX;
|
|
property MPU_GY: AnsiString read FMPU_GY write FMPU_GY;
|
|
property MPU_GZ: AnsiString read FMPU_GZ write FMPU_GZ;
|
|
property UpdateTime: AnsiString read FUpdateTime write FUpdateTime;
|
|
end;
|
|
|
|
implementation
|
|
|
|
|
|
|
|
end.
|
|
|