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