PType Example

The following program code demonstrates a couple of different uses of the PType property. Remember that each Param[x] element is really a TParamRecord-type component.

procedure TForm1.Button1Click(Sender: TObject);
begin
  with RPCBroker1 do begin
    RemoteProcedure := 'SET NICK NAME';
    Param[0].Value := 'DUZ';
    Param[0].PType := reference;
    Param[1].Value := edtNickName.Text;
    Param[1].PType := literal;
    Call;
  end;
end;