Implementacoes para tratamento de QueryParams como List#391
Conversation
…onverter automaticamente os valores separados por vírgula do parâmetro de consulta em uma lista do tipo especificado. Adicionei suporte para os tipos Integer, Int64, Double, String, Variant, DateTime, Date e Time. Utilizei TValue para conversão de tipo e tratamento de exceções para tipos não suportados. Atualizado o método InitializeQuery na classe THorseRequest para incluir a condição que permite concatenar os valores separados por vírgula quando houver repetição de QueryParam.
|
Obrigado pela contribuição... |
Verdade não tinha me atentado, mas já efetuei a correção. Quanto ao Lazarus, não realizei o teste pois não possuo ele aqui, caso alguém consiga de forma mais rápida, do contrário, consigo fazer mais para o final da semana. |
…azarus.
A função AsList<T> foi ajustada para lidar com as diferenças de suporte a tipos genéricos entre o Delphi e o Lazarus. No Lazarus, devido à ausência de suporte direto para tipos genéricos como no Delphi, foi necessário adotar uma abordagem alternativa usando diretivas de compilação.
No Delphi, a função permite a utilização de tipos genéricos diretamente:
Exemplo: Req.Query.Field('test').AsList<integer>;
No Lazarus, o retorno da função é sempre um TList de strings devido às limitações no suporte a tipos genéricos:
Exemplo: Req.Query.Field('test').AsList;
Essas alterações garantem que a função AsList<T> funcione corretamente em ambos os ambientes de desenvolvimento, mantendo a compatibilidade e a funcionalidade esperada.
|
@viniciussanchez fiz uma abordagem diferente tratando os dois casos. Segue: No Delphi, a função permite a utilização ou não de tipos genéricos diretamente. Sem generics o retorno assumirá TList de strings. Exemplo Req.Query.Field('test').AsList;
Req.Query.Field('test').AsList<integer>;No Lazarus, o retorno da função é sempre um TList de strings devido às limitações no suporte a tipos genéricos Nao aceita a abordagem Exemplo Req.Query.Field('test').AsList;Teste em Delphi: OK
Teste no Lazarus: OK
|
…elphi quanto no Lazarus.
Implementado o método AsList na classe THorseCoreParamField para converter automaticamente os valores separados por vírgula do parâmetro de consulta em uma lista do tipo especificado. Adicionei suporte para os tipos Integer, Int64, Double, String, Variant, DateTime, Date e Time. Utilizei TValue para conversão de tipo e tratamento de exceções para tipos não suportados.
Atualizado o método InitializeQuery na classe THorseRequest para incluir a condição que permite concatenar os valores separados por vírgula quando houver repetição de QueryParam.
Contexto:
Recentemente, enfrentei um desafios ao lidar com queryparams como arrays (por exemplo, test=1,2,3), exigindo uma abordagem manual. Para solucionar isso, implementei o método "AsList", que converte automaticamente os query parameters em um "TList".
Outro ponto de melhoria foi na montagem do "InitializeQuery". Originalmente construído com um dicionário, ele não conseguia lidar adequadamente com múltiplos QueryParams do mesmo nome (por exemplo, ?test=123,test=abc), resultando na captura apenas do último valor definido. Com a atualização da função, agora ele concatena os valores encontrados para o campo, separando-os por vírgula. Isso cria uma representação semelhante a um array (por exemplo, teste=123,abc), permitindo que o método "AsList" também processe e transforme esse caso em um "TList".
Exemplo simples de uso