Thema: Delphi Gezipte Daten entpacken

Einzelnen Beitrag anzeigen

JWest

Registriert seit: 21. Apr 2004
11 Beiträge
 
#8

Re: Gezipte Daten entpacken

  Alt 5. Jun 2004, 11:27
Hi,

Also erstmal an Mr.Knogge:
Dein Code kann zwar bei mir zippen, aber erst als ich die Variable temp
als Ausgangs Datei benutzte denn zuvor waren die DAeten vor der Komprimierung ind danach
genau gleich groß!!!
und das entzippen ging dann garnicht mehr da hat er immer eine Fehlermeldung beim
Ausfuhren des Decompressions Befehls gegeben

Kannst du das mit deinem Code nochmal nachprüfen ob der so stimmt wie er dortsteht
oder liegt es daran das ich was falsch gemacht hab ich schrieb es etwa so:

Delphi-Quellcode:
 
  Procedure Button1click usw.
  var c:Tmemorystream;
  begin
  c:= Tmemorystream.create;
  if opendialog1.execute then
  c.loadfromfile(opendialog1.filename);
  compress(c);
  if savedialog1.execute then
  c.savetofile(savedialog1.filename);
  end;
und da warn sie gleich groß als ich dann sie temp variable deines codes
speicherte war sie kleiner also mit der temp hats getan, ich hab eben noch das temp free wird raus gemnacht

aber das decompression ding tat garnicht da er sagte das bei deinem code was falsch ist!!

kanst du das bitte uberprüfen
  Mit Zitat antworten Zitat