ListenerPort Example

The following program code demonstrates using the ListenerPort property:

procedure TForm1.btnConnectClick(Sender: TObject);
begin
  RPCBroker1.ListenerPort := 9001;
  RPCBroker1.Connected := True;
end;