THostNameOneParmEvent = procedure (Thread: TIdPeerThread;Parm:String) of object;
TIdHostNameServer provides event handlers for the event notification to allow the server to respond to the HostName commands.