unit EmpMst; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, wItem; type TEmpMst = class(TwItem) private { Private declarations } FOrdCode: string; FPosition: string; FRole: string; FInDate: string; FOutDate: string; FStatus: string; FEmpTelNum: string; FEmpAddress: string; FDescriptions: string; protected { Protected declarations } public { Public declarations } published { Published declarations } property OrdCode: string read FOrdCode write FOrdCode; property Position: string read FPosition write FPosition; property Role: string read FRole write FRole; property InDate: string read FInDate write FInDate; property OutDate: string read FOutDate write FOutDate; property Status: string read FStatus write FStatus; property EmpTelNum: string read FEmpTelNum write FEmpTelNum; property EmpAddress: string read FEmpAddress write FEmpAddress; property Descriptions: string read FDescriptions write FDescriptions; end; implementation end.