Pasar un array como parámetro a una Query

[pape19]

Lo que hago es generar desde una tabla en memoria un array "cadena" de integer, a una Query en Paradox.

El error es el adjunto.

Mi codigo es el que sigue:

En el unit

Código Delphi [-]
   MemoryTable1.First;
    while not MemoryTable1.eof do
      Begin
        y:=y+1;
        cadena[y]:= MemoryTable1Cod_Elemento.value;
        MemoryTable1.Next
      End;

En la query:

Código Delphi [-]
SELECT * FROM General
WHERE General.Cod_Elemento IN
(:PARAMETRO)

En el parametro:

Código Delphi [-]
DataType: ftArray
ParamType: ptInput
Value Type: Integer