unit AsyncServerMain;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, uROClient, uROBINMessage, uROClientIntf, uROServer, uROBPDXTCPServer,
  uROBPDXHTTPServer, uROPoweredByRemObjectsButton,
  uROIndyUDPServer;

type
  TAsyncServerMainForm = class(TForm)
    ROMessage: TROBINMessage;
    ROBPDXHTTPServer1: TROBPDXHTTPServer;
    RoPoweredByRemObjectsButton1: TRoPoweredByRemObjectsButton;
    ROIndyUDPServer1: TROIndyUDPServer;
    procedure FormCreate(Sender: TObject);
  end;

var
  AsyncServerMainForm: TAsyncServerMainForm;

implementation

{$R *.DFM}

procedure TAsyncServerMainForm.FormCreate(Sender: TObject);
begin
  ROBPDXHTTPServer1.Active := True;
  ROIndyUDPServer1.Active := True;
end;

end.