Delphi-PRAXiS
Seite 2 von 4     12 34      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Virtuelles Dateisystem schreiben? (https://www.delphipraxis.net/64076-virtuelles-dateisystem-schreiben.html)

sh17 27. Feb 2006 10:48

Re: Virtuelles Dateisystem schreiben?
 
Zitat:

Zitat von SirThornberry
bei dem von mir geposteten gibt es wenn ich mich recht entsinne die option das auf einem stream laufen zu lassen. Es wird also ein Filestream geöffnet und auf diesem live gearbeitet.

habs schon runtergeladen, steht in meiner Beguckliste

SirThornberry 27. Feb 2006 10:50

Re: Virtuelles Dateisystem schreiben?
 
wenn fragen oder anregungen dazu noch sind, sag einfach bescheid.

sh17 27. Feb 2006 21:42

Re: Virtuelles Dateisystem schreiben?
 
Für alle, die es noch interessiert, hab mir mal das Structured Storage Format von MS angeschaut, welches eigentlich recht optimal ist.

Delphi-Wrapper gibts hier:

Zukunftssicher ist es auch:

Compound Documents in WinFX

ConstantGardener 28. Feb 2006 08:30

Re: Virtuelles Dateisystem schreiben?
 
Hallo zusammen,

möchte hier mal eine Lanze für das .zip Format brechen. Wir verwenden DynaZip um komplette Datenbanken, Lockdateien, JPG und .INI's in einem Pfad als leicht portable und gut zu sichernde Datei zu speichern. Der Anwender hat das Gefühl nur mit einer Datei zu arbeiten mit der er umgehen kann wie mit einem Word-Doc. Die Arbeit im Hintergrund halten wir damit vom Anwender fern. Auch das versenden per Mail ist so recht einfach für die werte Kundschaft. Und wen das .zip stört nennt seine Datei einfach um (z.B. in .BLA) um Manipulationen durch den Anwender aus dem Weg zu gehen. Per Verschlüsselung des Files kann man auch dem Datenschutz zumindest etwas Rechnung tragen.

Also wir sind mit dieser Lösung ganz zufrieden. Und zukunftssicher ist ZIP sicher auch.

SirThornberry 28. Feb 2006 09:24

Re: Virtuelles Dateisystem schreiben?
 
@ConstantGardener: An zip hat ihn glaub ich gestört das bei Änderungen das ganze Archiv neu gepackt werden muss (ich weiß nicht ob dem wirklich so ist aber das war seine Befürchtung)

sh17 28. Feb 2006 09:39

Re: Virtuelles Dateisystem schreiben?
 
und wenn es kaputt ist, ist es kaputt. man müsste dann schon die Kompressionsfunktion ausschalten.

ConstantGardener 1. Mär 2006 20:39

Re: Virtuelles Dateisystem schreiben?
 
Ist natürlich ein Argument mit dem zerstörten Archiv. Ist bei uns zwar noch nie vorgekommen aber natürlich möglich. Wir erstellen vor dem speichern der Datei immer ne Backupdatei zur Sicherheit.

Ich weiß nicht was und wieviel (bei uns zwischen 300-800 KB gepackt) gespeichert werden muß, unsere Lösung ist aber recht performant und für unsere Zwecke völlig ausreichend.

Jens Schumann 2. Mär 2006 07:03

Re: Virtuelles Dateisystem schreiben?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo,
komme gerade aus meinem Archiv und habe ein kleines Beispiel für das Structured Storage Interface mitgebracht.
Zuerst auf Create DOCFile klicken und dann auf Enum. Die dann angezeigten Streams mit den Namen MyData1 bis
MyData4 entsprechen 4 Dateien in einer Datei. Eigentlich ist das Structured Storage Interface ziemlich simpel.
Ich glaube nicht, dass man für einen Wrapper Geld ausgeben sollte. Das Interface ist in der Win32 Referenz, die mit Delphi ausgeliefert wird dokumentiert.

P.S.
In Kombination mit TOleStream und der dpCollection kann man wahre Wunder vollbringen.
Leider habe ich hier kein passendes Beispiel parat.

Die Muhkuh 2. Mär 2006 07:28

Re: Virtuelles Dateisystem schreiben?
 
Hallo Jens,

könntest du die Datei Utils1.pas noch hinzufügen, da diese nicht im Zip-File ist, aber zum compilieren benötigt wird.

Jens Schumann 2. Mär 2006 07:30

Re: Virtuelles Dateisystem schreiben?
 
Zitat:

Zitat von Spider
Hallo Jens,

könntest du die Datei Utils1.pas noch hinzufügen, da diese nicht im Zip-File ist, aber zum compilieren benötigt wird.

Aus der Datei wird nur die Variable ApplicationPath geholt. Die Variable enthält den Anwendungspfad. Kanst Du leicht
Durch ApplicationPath:=ExtractFilePath(Application.Exena me) ersetzten.


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:21 Uhr.
Seite 2 von 4     12 34      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz