unit wObject; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, w_bases, wRoot; type TwObject = class(TwRoot) private { Private declarations } FCreateDate: AnsiString; FCreateTime: AnsiString; FCreatorID: AnsiString; FIsValid: AnsiString; protected { Protected declarations } public { Public declarations } published { Published declarations } property CreateDate: AnsiString read FCreateDate write FCreateDate; property CreateTime: AnsiString read FCreateTime write FCreateTime; property CreatorID: AnsiString read FCreatorID write FCreatorID; property IsValid: AnsiString read FIsValid write FIsValid; end; implementation end.