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