Perdonad mi torpeza, pero no lo consigo, tengo el siguiente codigo:
Código Delphi
[-]procedure TFExtractoCoste.bSalirClick(Sender: TObject);
var
funcion: Tservermethods1client;
s:string;
TablaCadena:TStringStream;
begin
if tablaRojos.RecordCount = 0 then
exit;
funcion := Tservermethods1client.Create
(FModuloDatos.SQLConnection.DBXConnection);
TablaCadena := TStringStream.Create(s);
TablaRojos.SaveToStream(TablaCadena);
funcion.enviarTablarojos(tablaCadena);
close;
end;
Me da error, no logro enviar una MemTable a través de la funcion para que llegue al servidor.
Gracias a todos