[Lazarus-es] Resumen de Lazarus-es, Vol 31, Envío 5

Héctor S. Ponce hectorsponce en gmail.com
Sab Abr 10 16:51:21 CEST 2010


GRACIAS POR RESPONDER !!!


Date: Sat, 10 Apr 2010 00:09:52 -0700 (PDT)
> From: Jesus Reyes <jesusrmx en yahoo.com.mx>
> Subject: Re: [Lazarus-es] LazReport
> To: Spanish version of Lazarus List
>        <lazarus-es en lists.lazarus.freepascal.org>
> Message-ID: <888312.64841.qm en web53201.mail.re2.yahoo.com>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Saludos Héctor Ponce,
>
> --- El jue 8-abr-10, Héctor S. Ponce <hectorsponce en gmail.com> escribió:
> // EL NOMBRE DE LA VARIABLE DEL REPORTE EN PARNAME ES CORRECTO
> "LVR_CLIENTE"Nótese como el nombre de la variable esta en mayúsculas
> LVR_CLIENTE y no LRV_CLIENTE
>
>
> //Fuente de mi procedimiento
> -----------------------------------------
>
> procedure Tfacturador.frReport1GetValue(ParName: String; var ParValue:
> Variant);
> //
> //  ACA EL CONTENIDO DE LA VARIABLE PARNAME ES
> 'VR_CLIE#0#0#.........................................'
>
> //  POR LO QUE NUNCA OBTIENE EL VALOR DADO QUE NO RESULTA VERDADERA NUNGUNA
> IGUALDAD




> Creo que este valor lo sacaste del depurador, ya sea fuera de lazarus o
> dentro de lazarus, lo que pasa es que posiblemente no este obteniendo el
> valor correcto de un variante.



EL PROBLEMA NO SE REFIERE AL VALOR DEL VARIANT SINO AL DE LA VARIABLE
ParName AL QUE LE TRUNCA LA PRIMERA LETRA DEL CONTENIDO Y LA LLENA DE
BASURA.



> Pero eso es un detalle del depurador gdb y su soporte de freepascal.
> //
> begin
> //
> frReport1.Values.FindVariable('LRV_CLIENTE').Field:=QuotedStr('LRV_CLIENTE');
>   if UpperCase(ParName)=' LRV_EMPRESA' then
> ParValue:=trim(DataModule1.GetKey('EMPRESA'));
>
>   if ParName=' lrv_cliente' then ParValue:=cliente;
> Y aquí es donde aparentemente esta el problema, estas comparando una cadena
> que supuestamente es LRV_CLIENTE (o LRV_CLIENTE, hay que verificar tambien
> esto) en mayúsculas con una lrv_cliente en minúsculas. Es mejor: if
> CompareText(ParName,'lrv_cliente')=0 o sin necesidad de conversión de tipo,
> usar el mismo tipo tanto en el reporte como en el código.
>

ACA TAMBIEN ESTA EL AGREGADO DE QUE EN UN PROYECTO NUEVO CON SOLO UN BUTTON
Y UN FRREPORT FUNCIONA BIEN... DEBE TENER ALGO EL FORM DEL PROYECTO MIO Y NO
SE QUE ES
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20100410/6e8adc7a/attachment-0002.html>


More information about the Lazarus-es mailing list