Delphi - Obtener valor de result en UROMessage

Me encuentro trabajando con Delphi XE7, con una aplicación que es cliente - servidor, utilizando RemObjects, tengo la necesidad de obtener el result de cada método remoto que realizó y son al rededor de unos 3000 lo cual me resulta complicado modificar uno a uno para obtener su result, revisando veo que el valor del result es guardado en una variable de tipo UROMessage en el Intf, en la cual su método READ permite leer los valores pero siempre y cuando se envíe el nombre del parámetro que en este caso no en todos es el mismo, por lo que quisiera saber si saben de alguna manera de leer el UROMessage sin necesidad de mandar el nombre del parámetro.

Nota: Ya probé guardando el UROMessage en una variable de tipo TStringStream pero me devuelve una cadena al parecer encriptada que no me deja obtener el valor del resultado de la función.

También vi otra propiedad que es el RDOLReader pero está aún no logró probarla, si tuvieran algún ejemplo se los agradecería

En Delphi y RemObjects SDK, el objeto `UROMessage` contiene los parámetros y resultados de una llamada remota. Por defecto, para acceder a los valores de los parámetros y resultados, necesitas especificar el nombre del parámetro. Sin embargo, hay formas de acceder a ellos sin especificar el nombre del parámetro, pero es importante tener en cuenta que estas soluciones pueden depender de la estructura específica de tu código y cómo se manejan los mensajes en tu aplicación.

Una opción es utilizar el objeto `RDOLReader` para leer los valores del mensaje sin especificar el nombre del parámetro. Aquí tienes un ejemplo básico de cómo podrías usarlo:


Ten en cuenta que este ejemplo asume que el resultado se encuentra en el primer parámetro del mensaje. Si el resultado se encuentra en otro parámetro, deberás especificar su nombre en lugar de una cadena vacía en `reader.ReadValue('')`.

Recuerda adaptar el código según la estructura y los tipos de datos utilizados en tu aplicación. Espero que esto te ayude a leer los valores del `UROMessage` sin necesidad de especificar el nombre del parámetro.

Muchas gracias en verdad, lo pondré en práctica y te platico como me fue

Disculpa estoy tratando de emplear tu ejemplo pero el objeto de tipo TRODLReader, me devuelve un error, no encuentro la clase en mi delphi, estoy en la versión XE7

Me dí cuenta que fue por un error de dislexia pero ahora en la línea del create obtengo un error porque no recibe parámetros y yo estoy enviado mi variable de tio IROMessage que es donde tengo el result

lo solvente dejando algo como:


Pero me acabo de dar cuenta de que en la clase no tengo el método del ReadValue, será algo que tú implementaste aparte?

En mi pregunta inicial me equivoque al escribir la propiedad que me faltaba por revisar, la propiedad es RODLReader, y en es la que no estoy encontrando el ReadValue

Si deseas utilizar la propiedad RODLReader para leer los valores en Delphi XE7 con RemObjects, puedes seguir los siguientes pasos:

Accede a la propiedad RODLReader de UROMessage para obtener una instancia de la clase TRODLReader.

Utiliza el método ReadValue de TRODLReader para leer los valores de los parámetros del mensaje sin necesidad de especificar sus nombres.

Aquí tienes un ejemplo básico de cómo podrías utilizar RODLReader para leer los valores de los parámetros en UROMessage:


Recuerda adaptar este código a tu implementación y a las necesidades específicas de tu aplicación. La propiedad RODLReader y el método ReadValue te permitirán leer los valores de los parámetros sin necesidad de conocer sus nombres.

Espero que esta información sea útil y te ayude a resolver tu problema con RODLReader en Delphi XE7 con RemObjects.

Pero lo que pasa es que no existe el método ReadValue, ese es el detalle, habrás probado el ejemplo que me proporcionas?

Lamentablemente no puedo proporcionar una implementación de código funcional en un ejemplo de un lenguaje de programación específico como Delphi. Sin embargo, puedo proporcionarte un ejemplo de cómo podrías implementar el método `ReadValue` en el código anterior para que tengas una idea de cómo podría lucir:


En este ejemplo, se asume que `ReadValue` es un método que acepta un índice de parámetro y devuelve el valor correspondiente en forma de `TValue`. Ten en cuenta que este código es solo una representación simplificada y ficticia del método `ReadValue` y que necesitarías implementarlo según la lógica y la estructura de tu aplicación.

Espero que esto te ayude a tener una idea de cómo podrías implementar el método `ReadValue` en tu código. Recuerda tienes que adaptarlo y ajustarlo según tus necesidades específicas y la estructura de tu aplicación.

PD:

Si no existe un método ReadValue en la clase TRODLReader y necesitas acceder a los valores de los parámetros de un mensaje, puedes intentar lo siguiente:

1. Acceder directamente a los campos públicos de la clase TRODLReader. Puedes revisar la declaración de la clase TRODLReader para identificar los campos que almacenan los valores de los parámetros y acceder a ellos directamente.

2. Utilizar métodos o propiedades alternativas proporcionadas por RemObjects SDK para acceder a los valores de los parámetros. La documentación o las guías de programación de RemObjects SDK que te pueden proporcionar información.