<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#FFFFCC">
<div class="moz-cite-prefix">El 05/01/2013 05:07 p.m., Paola
Bruccoleri escribió:<br>
</div>
<blockquote cite="mid:50E88811.8060903@adinet.com.uy" type="cite">Hola
todos..
<br>
<br>
necesito ir guardando en algún lugar ciertos datos para luego
procesarlos. Son los datos para imprimir X cant de comprobantes, q
de antemano no se cuántos comprobantes son son.
<br>
<br>
Había pensado en definir un tipo record:
<br>
<br>
TComprobante = record
<br>
tipocomp: string;
<br>
fecha: TDate;
<br>
idpropietario : integer;
<br>
nombre : string;
<br>
direccion : string;
<br>
identificacion : string;
<br>
importe : double;
<br>
iva: double;
<br>
detalle: string;
<br>
end;
<br>
<br>
y varias variables de ese tipo.
<br>
retencion: TComprobante;
<br>
....
<br>
<br>
Ahora.. puede ser que algunas variables no se inicialicen porque
no hay comprobante asociado.
<br>
<br>
La forma que tengo de saber si la variable record es vacía es
preguntando por cq de los campos? o sea:
<br>
if retencion.tipocomp <> ''
<br>
imprimir comprobante...
<br>
<br>
¿se les ocurre otra forma mejor de hacer esto?
<br>
<br>
Si usara otro lenguaje (harbour x ej), definiría un array
multidimensional dinámico... en 1 renglón tengo todo pronto.. pero
acá veo que el array debe tener todos los elementos del mismo
tipo, y no es el caso.
<br>
<br>
muchas gracias!
<br>
<br>
</blockquote>
Hola<br>
Aca podes hacer lo mismo, un array dinamico de registros, vas
agregando registros uno a uno y luego solo recorres el array desde
el primer hasta el ultimo elemento.<br>
<br>
Por ejemplo, podrias definirias tu arraglo como: aComprobantes:
array of TComprobante;<br>
le das tamaño 0 al principio -> setlength(aComprobantes, 0);<br>
y luego vas agregando elementos: setlength(aComprobantes,
length(aComprobantes)+1);<br>
y vas cargando datos - > aComprobantes[length(aComprobantes)-1].fecha
:= date();<br>
<br>
luego para recorrer el array podes usar un for de 0 a
length(aComprobante)-1<br>
<br>
Espero se entienda mi explicacion.<br>
<br>
<br>
Saludos!<br>
<br>
<blockquote cite="mid:50E88811.8060903@adinet.com.uy" type="cite">
<br>
_______________________________________________
<br>
Lazarus-es mailing list
<br>
<a class="moz-txt-link-abbreviated" href="mailto:Lazarus-es@lists.lazarus.freepascal.org">Lazarus-es@lists.lazarus.freepascal.org</a>
<br>
<a class="moz-txt-link-freetext" href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es</a>
<br>
<br>
</blockquote>
<br>
</body>
</html>