Ver Mensaje Individual
  #1  
Antiguo 21-04-2017
usuario1000 usuario1000 is offline
Miembro
 
Registrado: nov 2016
Posts: 86
Reputación: 8
usuario1000 Va por buen camino
Pasar Array como Parametro

Holal a todos.

Tengo un problemilla que he intentado resolver y no hay manera. Expongo lo que me ocurre:
Sigo desarrollando mi aplicación Cliente - Servidor, y ahora me toca enviar los datos del cliente al servidor para que los grabe en la tabla correspondiente.
El problema que se me plantea es que cuando llamo a la funcion que he creado previamente en el servidor e intento pasarle los datos, estos son muchos, exactamente 45 parametros y me da error, porque superan los 32 que existe como máximo en cuanto a pasar parametros se refiere.
La solucion que intento dar es crear un Array de String con 45 posiciones y pasar el Array como único parámetro a através de la función, pero me da errores de incompatibilidad de datos.

He leido algo por el foro de crear el array dentro de un Type, pero no me aclaro, por si alguien me lo puede explicar de manera sencilla y clara con un ejemplo. Lo que tengo ahora mismo es esto.
Código Delphi [-]
Function GrabarDatos:Boolean;
var
    funcion:Tservermethods1client;

    tabla: Array of String;
begin

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

    SetLength(tabla,45);
    tabla[0] := Edit1.text;  
    tabla[1] := Edit2.text;
    ....
    Tabla[45]:= edit45.text;

     resultado:= funcion.GragarEnServidorDatos(Tabla); 

end;
Así no me funciona, pero no se como arreglarlo para enviar los datos al servidor.

Agradezco un poco de luz, gracias a todos.

nota: Delphi 10 Seattle.

Última edición por ecfisa fecha: 21-04-2017 a las 21:19:47. Razón: Etiquetas [delphi][/delphi]
Responder Con Cita