unit OrderMst; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, w_bases, wItem; type TOrderMst = class(TwItem) private { Private declarations } FOrdNum: AnsiString; FOrdDate: AnsiString; FCustName: AnsiString; FConnPerson: AnsiString; FDeliveryDate: AnsiString; FWaerhouse: AnsiString; FQty: AnsiString; FUnitt: AnsiString; FUnitPrice: AnsiString; FAmount: AnsiString; FDescriptions: AnsiString; protected { Protected declarations } public { Public declarations } published { Published declarations } property OrdNum: AnsiString read FOrdNum write FOrdNum; property OrdDate: AnsiString read FOrdDate write FOrdDate; property CustName: AnsiString read FCustName write FCustName; property ConnPerson: AnsiString read FConnPerson write FConnPerson; property DeliveryDate: AnsiString read FDeliveryDate write FDeliveryDate; property Waerhouse: AnsiString read FWaerhouse write FWaerhouse; property Qty: AnsiString read FQty write FQty; property Unitt: AnsiString read FUnitt write FUnitt; property UnitPrice: AnsiString read FUnitPrice write FUnitPrice; property Amount: AnsiString read FAmount write FAmount; property Descriptions: AnsiString read FDescriptions write FDescriptions; end; implementation end.