Pasar Array como Parametro

[Caminante]

Hola

Para declarar un tipo de dato que sea un array puedes hacer:

Código Delphi [-]
Type

MiArray=Array[1..45]of string;

Y para usarlo

Código Delphi [-]
var
 UnaVariable:MiArray;

Saludos

[usuario1000]

Empezado por Caminante

Hola

Para declarar un tipo de dato que sea un array puedes hacer:

Código Delphi [-]Type MiArray=Array[1..45]of string;


Y para usarlo

Código Delphi [-]var UnaVariable:MiArray;


Saludos

Gracias Caminante por responder tan rápido, pero si hago eso al compilar me da el siguiente error:
E2010 Incompatible types: 'string' and 'MiArray'

En la funcion:
resultado:= funcion.GrabarEnServidorDatos(Tabla);

[Caminante]

Y de que tipo es Tabla.
En ese caso debes usar el mismo tipo de dato que estas creando.

[usuario1000]

Empezado por Caminante

Y de que tipo es Tabla.
En ese caso debe ser del mismo tipo que estas creando.

Tabla está definido como:

tabla:MiArray;

[Caminante]

Pues se me hace raro
Podrias poner un poco mas de codigo?

[usuario1000]

Empezado por Caminante

Pues se me hace raro
Podrias poner un poco mas de codigo?

He avanzado un poquito.
Lo que tengo ahora mismo es:

Código Delphi [-]
 
type
  TMiRegistro = record
       TablaDatos : array [0..45]  of String;
  end;
...
function TFRecibidas.grabarFactura:Boolean;
var
  tabla : TMiRegistro;
begin

  funcion := Tservermethods1client.Create
    (FModuloDatos.SQLConnection.DBXConnection);

        tabla.TablaDatos[0]:= eDocumento.Text;
        tabla.TablaDatos[1]:= eAno.Text;
        tabla.TablaDatos[2]:= eEmp.Text;
         ...

  resultado := funcion.GrabarFactura(tabla.TablaDatos[0]);   // Así sí lo compila, pero no me deja pasar la tabla completa me da error

end;

Código Delphi [-]
 [dcc32 Error] FacturasRecibidas.pas(1639): E2010 Incompatible types: 'string' and 'TMiRegistro'

[usuario1000]

Código Delphi [-]
resultado := funcion.GrabarFactura(tabla);  // Esto es lo que pretendo pasar, la tabla completa, Pero da el error antes dicho.