unit RtpMaterialInfo; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, wItem; type TRtpMaterialInfo = class(TwItem) private { Private declarations } FOrdNum: string; FMatCode: string; FQty: string; FUnitt: string; FRatio: string; FDescriptions: string; FQtyEnc: string; protected { Protected declarations } public { Public declarations } published { Published declarations } property OrdNum: string read FOrdNum write FOrdNum; property MatCode: string read FMatCode write FMatCode; property Qty: string read FQty write FQty; property Unitt: string read FUnitt write FUnitt; property Ratio: string read FRatio write FRatio; property Descriptions: string read FDescriptions write FDescriptions; property QtyEnc: string read FQtyEnc write FQtyEnc; end; implementation end.