Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
ZLib ve Webservis
#1
Merhaba, 
Aşağıdaki kod ile ZLib string veri sıkıştırma işlemi yapıyorum. Delphi ile yazdığım WebServisten bu sıkıştırılmış veriyi geriye döndürüyorum. Fakat get metodu ile alırken "Metin içeriğinde geçersiz karakter bulundu" hatası alıyorum. Çünkü sıkıştırılmış veride unicode karakterler var. Sıkıştırılmış veriyi Base64'e convert edip geriye döndürürsem herhangi bir sorunum kalmıyor. Buradaki sorunum Base64'e dönüştürürsem sıkıştırma 40/1 'den 20/1'e düşüyor. Base64 convert etmeden bu işlemi nasıl gerçekleştirebiliriz?

uses ZLib;
function ZLibCompress(const AValue:String):String;
Var
 xCompressor : TZCompressionStream;
 xIn,xOut    : TStringStream;
begin
 Result := '';
 xIn    := TStringStream.Create(AValue);
 xOut   := TStringStream.Create;
 try
   xCompressor := TZCompressionStream.Create(clMax,xOut);
   try
     xCompressor.CopyFrom(xIn,xIn.Size);
   finally
     FreeAndNil(xCompressor);
   end;
   Result := xOut.DataString;
 finally
   FreeAndNil(xOut);
   FreeAndNil(xIn);
 end;
end;
Yalnızım ama bir kente yürüyen ordu gibiyim, edebiyattan kaçınmalıyım..
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Dosya sıkıştırma (ZLIB ile) esistem 12 5.673 27-09-2016, Saat: 09:39
Son Yorum: esistem



Konuyu Okuyanlar: 1 Ziyaretçi