unit fServerDataModule; interface uses SysUtils, Classes, uROClient, uROServer, uROLocalServer, $MESSAGEUNIT; type TServerDataModule = class(TDataModule) ROMessage: TRO$MSGCLSNAME; ROServer: TROLocalServer; private { Private declarations } public { Public declarations } end; var ServerDataModule: TServerDataModule; implementation {$R *.dfm} end.