unit fServerDataModule;

interface

uses
  SysUtils, Classes, uROClient, uROServer, uROIndyTCPServer,
  uROPoweredByRemObjectsButton, uROClientIntf, uROClasses,
  uROBinMessage{, uROIndyTCPServer};

type
  TServerDataModule = class(TDataModule)
    ROMessage: TROBinMessage;
    ROServer: TROIndyTCPServer;
    procedure DataModuleCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  ServerDataModule: TServerDataModule;

implementation

{$R *.dfm}

procedure TServerDataModule.DataModuleCreate(Sender: TObject);
begin
  //ROServer.Active := TRUE;
end;

end.