unit wRelation; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, w_bases, wObject; type TwRelation = class(TwObject) private { Private declarations } FRevision: AnsiString; FLOBID: AnsiString; FROBID: AnsiString; FLClassName: AnsiString; FRClassName: AnsiString; protected { Protected declarations } public { Public declarations } published { Published declarations } property Revision: AnsiString read FRevision write FRevision; property LOBID: AnsiString read FLOBID write FLOBID; property ROBID: AnsiString read FROBID write FROBID; property LClassName: AnsiString read FLClassName write FLClassName; property RClassName: AnsiString read FRClassName write FRClassName; end; implementation end.