Call Example

The following program code demonstrates the use of the Call method in a hypothetical example of bringing back demographic information for a patient and then displaying the results in a memo box:

procedure TForm1.Button1Click(Sender: TObject);
begin
  RPCBroker1.RemoteProcedure := 'GET PATIENT DEMOGRAPHICS';
  RPCBroker1.Param[0].Value := 'DFN';
  RPCBroker1.Param[0].PType := reference;
  RPCBroker1.Call;
  Memo1.Lines := RPCBroker1.Results;
end;