viele dateien zu einer zusammenfassen

klezmor · Beiträge: 558 delphi 6 personal delphi 2005 personal

Wenn ich z.B. eine e-mail versenden möchte, ergibt sich immer das problem, dass ich jede datei einzeln im anhang versenden muss, gibt es keinen anderen weg, wie ich viele beliebige dateien zu einer zusammenfassen kann, welche ich dann als einzige verschicke, möglichst ohne externe programme wir winrar ... zu verwenden.
Oder z.B. einen ganzen ordner kurz in eine datei umwandeln und wenn ich sie empfangen habe wieder zurückzuwandeln?

MadDoctor · Beiträge: 88 Win XP Pro Delphie 2005

Du wirst wohl immer ein weiteres programm benutzen müsse, entweder winrar oder winzip oder was es sonst so auf dem markt gibt !

Evtl, ums einfacher zu machen kannst du mit [STRG] mehrere dateien auswählen und die dan verschiken ...

_________________
Grüße an alle Grevener [NRW]

Horst_H · Verfasst: Mo 26.12.05 10:41

Hallo,

mit Delphi kann man dies auch machen www.dsdt.info/tutorials/myarchiv/
Aber es gibt immer noch die Moeglichkeit einer selbstentpackenden Datei.
Gruss Horst

klezmor · Beiträge: 558 delphi 6 personal delphi 2005 personal

ich benutze jetzt einfach die zipforge komponente, die ist kostenlos, echt cool die kommponente, kann ich nur empfehlen.
Der Code sieht dann so aus

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

 with Zipforge1 do // so heißt in diesem Fall die Komponente
  begin
   FileName :='C:\xxxx.zip'; // Ort wo gespeichert werden soll
   OpenArchive(fmCreate);     // Datei wird "erschaffen"
   AddFiles(irgendne datei); // Dateien die dazu kommen sollen
   CloseArchive; // Datei wird geschlossen
  end;

Der Code ist von Dark Hunter, funktioniert einwandfrei.

So eine Datei kann man dann z.B. auch als e-mail anhang versenden

Moderiert von Christian S.: Delphi-Tags hinzugefügt

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme