unit DeliveryMst; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, wItem; type TDeliveryMst = class(TwItem) private { Private declarations } FDeliveryDate: string; FOrdNum: string; FWaerhouse: string; FQty: string; FDeliveryMethod: string; FDescriptions: string; protected { Protected declarations } public { Public declarations } published { Published declarations } property DeliveryDate: string read FDeliveryDate write FDeliveryDate; property OrdNum: string read FOrdNum write FOrdNum; property Waerhouse: string read FWaerhouse write FWaerhouse; property Qty: string read FQty write FQty; property DeliveryMethod: string read FDeliveryMethod write FDeliveryMethod; property Descriptions: string read FDescriptions write FDescriptions; end; implementation end.