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