[Lazarus-es] Problema con TSQLQuery

[Ismael L. Donis García]

Para mi entender (no se nada de nada de Lazarus y menos delphi) que deberías asignar el tipo específico.

en ves de .Value

poner el tipo según sea el caso:

qobjetos.Params.ParamByName(nombre_del_campo').AsDate
.AsInteger
.AsCurrency
.AsSmallInt
.AsString

Saludos
=========
|| ISMAEL ||
=========
  ----- Original Message ----- 
  From: Joel Petit 
  To: lazarus-es en lists.lazarus.freepascal.org 
  Sent: Monday, April 05, 2010 11:17 AM
  Subject: Re: [Lazarus-es] Problema con TSQLQuery


  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
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20100405/4bc4cd62/attachment-0002.html>