[Lazarus-es] Redimencionar arreglo string

Ismael L. Donis Garc?a ismael en citricos.co.cu
Jue Nov 19 23:21:25 CET 2009


Al definirlo como:

arrheads: array of string

De esa forma es como se define dinamico?

Te paso un pequenño ejemplo en VB para que veas lo que trato de hacer

dim arrstr() as string 'defino la variable del arreglo sin especificar la 
longitud del arreglo
dim i as integer
dim datos as string

for i = 0 to 2
    datos = "A" & i
    redim preserve arrstr(i)
    arrstr(i) = datos
    i = i +1
next i

lo que queda:

arrstr(0) = A0
arrstr(1) = A1
arrstr(2) = A2

Como sería ese ejemplo en Lazarus

Se necesita dinámico porque de antemano no se save la cantidad de ciclos del 
for

Saludos cordiales y perdonen tantas preguntas
=========
¦¦ ISMAEL ¦¦
=========
----- Mensaje original ----- 
De: "JoshyFun" <joshyfun en gmail.com>
Para: "Spanish version of Lazarus List" 
<lazarus-es en lists.lazarus.freepascal.org>
Enviado: jueves, 19 de noviembre de 2009 02:00
Asunto: Re: [Lazarus-es] Redimencionar arreglo string


Hello Ismael,

Thursday, November 19, 2009, 9:26:58 PM, you wrote:

ILDGa> Como se puede en Lazarus redimensionar un arreglo de string que me 
mantenga
ILDGa> los valores.
ILDGa> En VB es: ReDim Preserve ArrHeads(i)
ILDGa> Como lograr esto en Lazarus?
ILDGa> Yo lo definí de la siguiente forma (está bien)?
ILDGa> function Tdtmmp.iniheads(fileini: string; arrheads: array of string):
ILDGa> integer;

Si es un array dinámico con SetLength(array, elementos), si no es dinámico 
no puedes.

-- 
Best regards,
 JoshyFun


_______________________________________________
Lazarus-es mailing list
Lazarus-es en lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es






More information about the Lazarus-es mailing list