//login 远程rpc_server
[err, h] := rpc_login("127.0.0.1:1234", "test", "password-token");
if err then 
  return echo "login fail:", err;
 
for i:=0 to 99 do Begin
  echo "remote call demo_function1: ", i, "\n";
  rpc_exec(h, 30*1000, "demo_function1", "hello: " $ datetimetostr(now()));//远程执行模型
End;

for i:=0 to 99 do Begin
  echo "remote call demo_function2: ", i, "\n";
  rpc_exec(h, 30*1000, "demo_function2", "world: " $ datetimetostr(now()));//远程执行模型
End;