Mehrere Dateien in eine?!?

[heiopei]

abend,
also ich versuch jetzt schon seit vier stunden das zu schaffen - aber es will nich funzen *grrrrr*

mein problem:
ich will mehrere dateien(untyped) in eine Datei speichern.
kann mir jemand zeigen(am besten mit bsp) wie ich so was mach?

ich hätte gerne folgende prozeduren:

Delphi-Quellcode:

procedure writefpack(filelist: TStringlist; destination: string);
//infilelist steht welche dateien gespeichert werden sollen
//destination ist der dateipfad und -name für die ausgabe
//-- in die datei soll zusätzlich die filelist und die positionen der dateien geschrieben werden
procedure readfpack(source, destpath: string);
//source ist die "quell"-datei und destpath steht für das verzeichnis, in dem die dateien entpackt //werden sollen

(gut wäre auch noch eine prozedur mit der ich nur eine best. datei aus der packedfile auslese und als eine andere datei speichere)

ich würd mich über hilfe oder lösungen zum/des problems freuen!!!

mfg,
heiopei

[edit=sakura] [delphi]tags Mfg, sakura[/edit]