Llega por el php que lo llamo así:
file_get_contents("http://localhost:8080/datasnap/rest/TServidorMetodosPrevengos/insertarSeguimientoCliente/$cadena");
En la variable $cadena concateno todos los parámetros.
El código del servidor es muy tonto.
Código Delphi
[-]function TServidorMetodosPrevengos.insertarSeguimientoCliente( id_UsuarioPrevengo, id_ClientePrevengo,id_EstadoVisita,id_Asesoria,
contratoFirmado : integer; fechaVisita,horaVisita: TDateTime;
incidencia:AnsiString ): String;
begin
try
with SPInsertarCliente do
begin
Close;
Params[0].Value;
Params[1].Value := id_UsuarioPrevengo;
Params[2].Value := id_ClientePrevengo;
Params[3].Value := id_EstadoVisita;
Params[4].Value := fechaVisita;
Params[5].Value := horaVisita ;
Params[6].Value := contratoFirmado ;
Params[7].Value:= id_Asesoria ;
Params[8].Value:= UTF8Decode(incidencia);
ExecProc;
Result:= 'OK'
end;
except
on E:Exception do
Result:= 'Error en el alta del seguimiento. Codigo de error: ' + E.Message;
end;
end;