david_uh
31-07-2007, 00:05:30
tengo el siguiente codigo
i := 1;
while not ZListas.Eof do //
begin
cbo_Cliente.AddItem(ZListas['cliente'],
pointer(ZListas.FieldByName('id').AsInteger));
SetLength(arrDirecciones,i);
arrDirecciones[i-1] := ZListas.FieldByName('Direccion').AsString;
Inc(i);
ZListas.Next;
end;
for i := 1 to 1000 do
begin
Items.Add( IntToStr(i) );
arrFact[i] := i;
end;
tengo declarado como global el array arrDirecciones en el primer bucle ademas de asignar a un combo los nombres de los clientes guardoen el array sus direcciones
en el otro bucle for trabajo con elarray arrFact estático pero cuando este se ejecuta este for pasa que el primer array se queda sin elementos !!!!!!!! osea como a cero nulo como si no lo hubiese redimensionado.
alguna vez te paso esto? que estoy haciendo mal??? estoyenloqueciendo???
i := 1;
while not ZListas.Eof do //
begin
cbo_Cliente.AddItem(ZListas['cliente'],
pointer(ZListas.FieldByName('id').AsInteger));
SetLength(arrDirecciones,i);
arrDirecciones[i-1] := ZListas.FieldByName('Direccion').AsString;
Inc(i);
ZListas.Next;
end;
for i := 1 to 1000 do
begin
Items.Add( IntToStr(i) );
arrFact[i] := i;
end;
tengo declarado como global el array arrDirecciones en el primer bucle ademas de asignar a un combo los nombres de los clientes guardoen el array sus direcciones
en el otro bucle for trabajo con elarray arrFact estático pero cuando este se ejecuta este for pasa que el primer array se queda sin elementos !!!!!!!! osea como a cero nulo como si no lo hubiese redimensionado.
alguna vez te paso esto? que estoy haciendo mal??? estoyenloqueciendo???