unit NoticeMst; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, wItem; type TNoticeMst = class(TwItem) private { Private declarations } FOrdDate: string; FNoticeStart: string; FNoticeStop: string; FAnthor: string; FContent: string; FDescriptions: string; protected { Protected declarations } public { Public declarations } published { Published declarations } property OrdDate: string read FOrdDate write FOrdDate; property NoticeStart: string read FNoticeStart write FNoticeStart; property NoticeStop: string read FNoticeStop write FNoticeStop; property Anthor: string read FAnthor write FAnthor; property Content: string read FContent write FContent; property Descriptions: string read FDescriptions write FDescriptions; end; implementation end.