{ **************************************************************
	Package: XWB - Kernel RPCBroker
	Date Created: Sept 18, 1997 (Version 1.1)
	Site Name: Oakland, OI Field Office, Dept of Veteran Affairs
	Developers: Joel Ivey
	Description: Contains TRPCBroker and related components.
  Unit: AddServer adds server to list of personal servers
     for selection.
 	Current Release: Version 1.1 Patch 60
*************************************************************** }

{ **************************************************
  Changes in v1.1.60 (HGW 05/08/2014) XWB*1.1*60
  1. Added field to store SSH host name for site to use SSH connection.

  Changes in v1.1.50 (JLI 9/1/2011) XWB*1.1*50
  1. None
************************************************** }
unit AddServer;

interface

uses
   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
   StdCtrls, Buttons;

type
   TfrmAddServer = class(TForm)
      lblAddress: TLabel;
      lblPortNumber: TLabel;
      edtAddress: TEdit;
      edtPortNumber: TEdit;
      bbtnOK: TBitBtn;
      bbtnCancel: TBitBtn;
      edtSSHusername: TEdit;
      Label1: TLabel;
      Label2: TLabel;
   private
      { Private declarations }
   public
      { Public declarations }
   end;

var
   frmAddServer: TfrmAddServer;

implementation

{$R *.DFM}

{See the following code in Rpcconf1:

procedure TrpcConfig.btnNewClick(Sender: TObject);

}

end.
