Que estoy haciendo mal en este proceso?

[kdemia]

Que tal gente, queria saber porque no me compila este proceso, osea entiendo que es porque el arreglo requiere una constante como dimension pero le mando una constante . Ojala me ayuden.

Nota: no puedo poner un arreglo dinamico porque el File of necesita algo con un rango definido..

Este es el proceso:

Código SQL [-]
procedure PasarAArchivo(const Alto, Ancho: Integer);
type
  Arreglo = Array[0..Ancho,0..Alto] of integer;
var
  Map : Arreglo;
  FMap: File of Arreglo;
begin
  //bloque de instrucciones
end;

Aunque mas que obvios estos son los errores:
http://imagenes.sitiosnc.info/?di=2129961635110

Muchas Gracias.

Saludos, kdemia.

[ecfisa]

Hola kdemia.

La sintáxis de Delphi no permite el uso de variables o parámetros (aunque sean pasados como constantes) en la declaración de tipo de un array estático.

Incorrecto:

Código Delphi [-]
procedure PasarAArchivo(const Alto, Ancho: Integer);
type
  Arreglo = Array[0..Ancho, 0..Alto] of integer;

La declaración de const en los parámetros es a fin de que el procedimiento o función no pueda alterar los valores de los mismos y también para que el compilador pueda optimizar el transpaso de parámetros (cuando el tamaño de estos supere los 4 bytes ya que evita la copia local de los mismos).

En cambio si es correcto:

Código Delphi [-]
procedure PasarAArchivo(const Alto, Ancho: Integer);
const
  X = 100;
  Y = 100;
type
  Arreglo = Array[0..X, 0..Y] of integer;

Quizá si explicaras que es lo que intentas hacer, encontremos una solución alternativa.
(Por favor tratá de poner títulos más descriptivos del problema, así quien pase por una situación similar podrá encontrar respuesta más
rapidamente.)

Un saludo.

[kdemia]

bueno lo que quiero hacer es lo siguiente:
yo cargo un TStringList con un archivo de texto que representa un mapa, ese TStringList lo tengo que pasar a un Array para luego guardarlo en un archivo ese array (File of Arreglo),y en otro archivo las dimensiones del arreglo asi despues lo puedo abrir sabiendo las dimensiones.. el problema es que no puedo guardar un array dinamico en un archivo porque delphi no lo permite, si hay alguna manera de definir las dimensiones de un array estatico en tiempo de ejecucion, hacer eso seria lo ideal..

[ecfisa]

Hola kdemia.

si hay alguna manera de definir las dimensiones de un array estatico en tiempo de ejecucion, hacer eso seria lo ideal..

Es que si se pudiese hacer eso, los arrays estáticos dejarían de ser estáticos y por ende, ya no tendría sentido la existencia de los arrays dinámicos.

Segun lo veo yo, vas a tener que definir un arreglo lo suficientemente grande como para contener el maximo de ocurrencias factibles si queres guardarlo como archivo tipado.

Un saludo.

[kdemia]

no totalmente que dejarian de tener gracia los arreglos dinamicos pero no fue lo que quice decir, osea no quiero cambiarle el tamaño al array en tiempo de ejecucion simplemente quiero definirle el tamaño en el momento de la declaracion.. pero bueno tendre que rebuscarmela por otro lado.. muchisimas gracias por todo

[[Chris]]

Puedes modificar las dimensiones de un arreglo dinámico con la función SetLength.

[kdemia]

totalmente, pero no lo puedo guardar en un archivo :/ File of array_dinamico no se puede hacer