[Lazarus-es] Problema con TSQLQuery

[Maxi]

2010/4/5 Joel Petit <joelptit en hotmail.com>:
> Bueno, ante todo muchas gracias por la ayuda.
> En relación a la version del fpc, le comento que es la misma en los
> distintos computadores en los que he corrido este trozo de código.
> Ahora, en lo que respecta a los "variants" ahi si no tengo nada que decir
> pues no tengo conocimiento al respecto, pero le agradeceria
> si me explica mas al respecto, tal ves halle la solución para no modificar
> todo el proyecto. Gracias.
>
>
>> Date: Mon, 5 Apr 2010 18:01:19 +0200
>> From: joshyfun en gmail.com
>> To: lazarus-es en lists.lazarus.freepascal.org
>> Subject: Re: [Lazarus-es] Problema con TSQLQuery
>>
>> Hello Joel,
>>
>> Monday, April 5, 2010, 4:36:36 PM, you wrote:
>>
>> JP> Mi pregunta es la siguiente: si este mismo trozo de codigo
>> JP> sin la función StrToInt en la linea 7 funciona en otros
>> JP> computadores, ¿porque en mi computador solo funciona con la
>> JP> función StrToInt?
>>
>> Probablemente la versión de fpc es distinta, y los "variants" son una
>> caja de Pandora, que cuando la abres (las usas) los problemas se
>> vuelven interminables.
>>
>> JP> qobjetos.Params.ParamByName('grp_codigo').Value:=StrToInt(grup);
>>
>> Un ejemplo del problema de los variants, que debería pasar si no
>> usamos el StrToInt en el caso de que "grup" sea '0' ? Que debería
>> asignarle el integer cero no ? Y si grup es '$00' damos error ? o
>> suponemos que es un valor hexadecimal ? y si grup es '' damos error,
>> asignamos cero o NULL ?
>>
>> --
>> Best regards,
>> José
>>
>>
>> _______________________________________________
>> Lazarus-es mailing list
>> Lazarus-es en lists.lazarus.freepascal.org
>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>
> ________________________________
> Discover the new Windows Vista Learn more!
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>
>


porque no haces el forzado de lazarus?

qobjetos.Params.ParamByName('grp_codigo').asString:=grup;
el value con strings puede fallar por los valores como te comentaron antes

-- 
Maximiliano Duarte
Linux User #495070
Ubuntu User #28504

Tolerancia significa disculpar los defectos de los demás; tacto, no
reparar en ellos.