unit DefectSaleItem; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, wItem; type TDefectSaleItem = class(TwItem) private { Private declarations } FDefDate: string; FOrdCode: string; FQty: string; FGoodQty: string; FDefQty: string; FDescriptions: string; protected { Protected declarations } public { Public declarations } published { Published declarations } property DefDate: string read FDefDate write FDefDate; property OrdCode: string read FOrdCode write FOrdCode; property Qty: string read FQty write FQty; property GoodQty: string read FGoodQty write FGoodQty; property DefQty: string read FDefQty write FDefQty; property Descriptions: string read FDescriptions write FDescriptions; end; implementation end.