Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #9  
Antiguo 11-10-2015
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.070
Poder: 32
jhonny Va camino a la famajhonny Va camino a la fama
Cita:
Empezado por mamcx Ver Mensaje
La razon es que ese es el medio mas usado para transmitir informacion binaria por http, y es un estándar en eso desde hace rato:

https://es.wikipedia.org/wiki/Base64

Ademas, estoy casi seguro (porque no se como seran tus datos ) que debe ser mas pesado pasar por cada integer que en base64 (u otro encoding especializado en binarios), y es mas "natural", osea, un valor=un binario.

Ahora si asi te da ok. Puede que con compresion salga bien...
Hola, buenas noches, acabo de hacer el cambio para comparar el asunto, no sólo desde el tema de compatibilidad, sino también para ver cual de los 2 metodos me sirve más en cuanto a rendimiento y transmisión de dichos datos... bueno, como bien indicabas me he decidido por utilizar Base64, pues no consume tanto performance del server despues de todo, es más comprimido y además es más utilizado... acá pongo el código del server en Base64, por si a alguien más le sirve.

De hecho Embarcadero recomienda usar el método anterior (TDBXJSONTools.JSONToStream) únicamente en llamadas asincronas y si el flujo de información no es muy alto.

Código Delphi [-]
function TServerMethods.GetFileBase64: String;
var
  vStream: TStream;
  vStringStream: TStringStream;
  vBase64: TBase64Encoding;
begin
  vStream := TStream.Create;
  vStringStream := TStringStream.Create;
  try
    vStream := GetFileInterno; //Eso devuelve un TStream luego de comprimir el archivo en cuestión y hacer ciertas validaciones...

    vBase64 := TBase64Encoding.Create;
    vBase64.Encode(vStream, vStringStream);

    Result := vStringStream.DataString;
  finally
    vStream.Free;
    vStringStream.Free;
    vBase64.Free;
  end;
end;
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/

Última edición por jhonny fecha: 11-10-2015 a las 07:29:18.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Los corchetes de Eduarcol JoseFco La Taberna 44 15-08-2008 12:19:55


La franja horaria es GMT +2. Ahora son las 07:00:36.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi