<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<STYLE>.hmmessage P {
PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; PADDING-TOP: 0px
}
BODY.hmmessage {
FONT-FAMILY: Verdana; FONT-SIZE: 10pt
}
</STYLE>
<META name=GENERATOR content="MSHTML 8.00.6001.18702"></HEAD>
<BODY class=hmmessage bgColor=#ffffff>
<DIV><FONT face=Arial>Para mi entender (no se nada de nada de Lazarus y menos
delphi) que deberías asignar el tipo específico.</FONT></DIV>
<DIV><FONT face=Arial></FONT> </DIV>
<DIV><FONT face=Arial>en ves de .Value</FONT></DIV>
<DIV><FONT face=Arial></FONT> </DIV>
<DIV><FONT face=Arial>poner el tipo según sea el caso:</FONT></DIV>
<DIV><FONT face=Arial></FONT> </DIV>
<DIV><FONT
face=Arial>qobjetos.Params.ParamByName(nombre_del_campo').AsDate</FONT></DIV>
<DIV><FONT face=Arial>.AsInteger</FONT></DIV>
<DIV><FONT face=Arial>.AsCurrency</FONT></DIV>
<DIV><FONT face=Arial>.AsSmallInt</FONT></DIV>
<DIV><FONT face=Arial>.AsString</FONT></DIV>
<DIV><FONT face=Arial></FONT> </DIV>
<DIV><FONT face=Arial>Saludos</FONT></DIV>
<DIV>=========<BR>|| ISMAEL ||<BR>=========</DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=joelptit@hotmail.com href="mailto:joelptit@hotmail.com">Joel
Petit</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=lazarus-es@lists.lazarus.freepascal.org
href="mailto:lazarus-es@lists.lazarus.freepascal.org">lazarus-es@lists.lazarus.freepascal.org</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Monday, April 05, 2010 11:17
AM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [Lazarus-es] Problema con
TSQLQuery</DIV>
<DIV><BR></DIV>Bueno, ante todo muchas gracias por la ayuda.<BR>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.<BR>Ahora, en lo que respecta a los "variants" ahi si no tengo nada que
decir pues no tengo conocimiento al respecto, pero le agradeceria <BR>si me
explica mas al respecto, tal ves halle la solución para no modificar
todo el proyecto. Gracias.<BR><BR> <BR>> Date: Mon, 5 Apr 2010
18:01:19 +0200<BR>> From: joshyfun@gmail.com<BR>> To:
lazarus-es@lists.lazarus.freepascal.org<BR>> Subject: Re: [Lazarus-es]
Problema con TSQLQuery<BR>> <BR>> Hello Joel,<BR>> <BR>> Monday,
April 5, 2010, 4:36:36 PM, you wrote:<BR>> <BR>> JP> Mi pregunta es
la siguiente: si este mismo trozo de codigo<BR>> JP> sin la función
StrToInt en la linea 7 funciona en otros<BR>> JP> computadores, ¿porque
en mi computador solo funciona con la<BR>> JP> función StrToInt?
<BR>> <BR>> Probablemente la versión de fpc es distinta, y los
"variants" son una<BR>> caja de Pandora, que cuando la abres (las usas) los
problemas se<BR>> vuelven interminables.<BR>> <BR>> JP>
qobjetos.Params.ParamByName('grp_codigo').Value:=StrToInt(grup);<BR>>
<BR>> Un ejemplo del problema de los variants, que debería pasar si
no<BR>> usamos el StrToInt en el caso de que "grup" sea '0' ? Que
debería<BR>> asignarle el integer cero no ? Y si grup es '$00' damos error
? o<BR>> suponemos que es un valor hexadecimal ? y si grup es '' damos
error,<BR>> asignamos cero o NULL ?<BR>> <BR>> -- <BR>> Best
regards,<BR>> José<BR>> <BR>> <BR>>
_______________________________________________<BR>> Lazarus-es mailing
list<BR>> Lazarus-es@lists.lazarus.freepascal.org<BR>>
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es<BR><BR>
<HR>
Discover the new Windows Vista <A
href="http://search.msn.com/results.aspx?q=windows+vista&mkt=en-US&form=QBRE"
target=_new>Learn more!</A>
<P>
<HR>
<P></P>_______________________________________________<BR>Lazarus-es mailing
list<BR>Lazarus-es@lists.lazarus.freepascal.org<BR>http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es<BR></BLOCKQUOTE></BODY></HTML>