TbeCbFile
TbeCbFile()
Klasse zur Steuerung von Dateien (inkl. Komprimierung/Dekomprimierung mehreren Archivtypen(.zip, .tar, .tgz, .tar.gz)).
Funktionen und Methoden
Methode | Beschreibung | |
|---|---|---|
Compress | Komprimiert eine Datei in eingegebenes Format(.zip, .tar, .tgz, .tar.gz). | |
Parameter | Beschreibung | |
aDestCompFile:C | Pfadangabe + Filename des zu erstellenden Archivs | |
aSourceDir:C | Quellverzeichnis Achtung: Für die .tgz und .tar.gz Formaten muss in diesem Parameter den Ordner, wo .tar-Datei liegt, eingegeben werden! | |
aSourceFiles:C | Name der zu komprimierenden Datei. Jokerzeichen sind möglich; Alle Dateien im Quellverzeichnis komprimieren= Leerstring Achtung: Für die .tgz und .tar.gz Formaten muss in diesem Parameter ein .tar-Datei eingegeben werden! | |
aPassword:C | Datei mit Passwort schützen; Kein Passwortschutz = Leerstring | |
aRecurse:L | Rekursiv alle in Unterordnern enthaltenen Dateien mitkomprimieren = true | |
aStorePaths:L | Quell-Ordnerstruktur im Archiv abbilden = true (lRelativePaths muss false sein) | |
aRelativePaths:L | Relative Pfade verwenden = true | |
Decompress | dekomprimiert eine komprimierte Datei (.zip, .tar, .tgz, .tar.gz). | |
Parameter | Beschreibung | |
aSourceCompFile:C | Pfadangabe + Filename des Archivs | |
aDestDir:C | Zielverzeichnis | |
aDestFiles:C | Name der Datei(en), die aus dem Archiv entpackt werden sollen; Gesamtes Archiv entpacken = Leerstring | |
aPassword:C | Passwort für Archiv; Kein Passwortschutz = Leerstring | |
*GetFile | liefert ein TbeCbFileControlObject Objekt zurück für die Bearbeitung einer oder mehreren Dateien | |
Parameter | Beschreibung | |
aFileName:C | Dateiname | |
*WriteAllFileContent | Ersetzt den Inhalt einer Datei mit dem übergebenen Inhalt. Falls die Datei nicht existiert, dann wird sie angelegt. | |
Parameter | Beschreibung | |
aFileName:C | Dateiname | |
aFileEncoding:TbeFileEncoding | Kodierung der zu schreibenden Datei | |
aContent:U | Beliebiger Text, was eingefügt werden soll | |
aContentEncoding:TbeFileEncoding | Kodierung des übergebenen Textes | |
*AppendTextToFile | Fügt den Inhalt am Ende einer Datei hinzu. Falls die Datei nicht existiert, dann wird sie angelegt. | |
Parameter | Beschreibung | |
aFileName:C | Dateiname | |
aFileEncoding:TbeFileEncoding | Kodierung der zu schreibenden Datei | |
aContent:U | Beliebiger Text, was eingefügt werden soll | |
aContentEncoding:TbeFileEncoding | Kodierung des übergebenen Textes | |
*ReadAllFileContent | Liest das ganze Inhalt einer Datei aus als Text. | |
Parameter | Beschreibung | |
aFileName:C | Dateiname | |
aEncoding:TbeFileEncoding | Kodierung der zu lesender Datei | |
*nur in Delphi 11-Versionen von be verfügbar (8.0.1.9+)
Beispiel
| oFileObject |
startseq,
oFileObject := CreateObject('TbeCbFile'),
//**********Dateien komprimieren**********//
//---in Zip komprimieren
oFileObject.Compress('C:\temp\test.zip', 'C:\temp\', '', '', true, true, false),
//---in Tar komprimieren
oFileObject.Compress('C:\temp\test.tar', 'C:\temp\', '', '', true, true, false),
//---in Tgz komprimieren
oFileObject.Compress('C:\temp\test.tgz', 'C:\temp\', 'C:\temp\test.tar', '', true, true, false),
//---in Tar.gz komprimieren
oFileObject.Compress('C:\temp\test.tar.gz', 'C:\temp\', 'C:\temp\test.tar', '', true, true, false),
//**********Dateien dekomprimieren**********//
//---Zip Archiv dekomprimieren
oFileObject.Decompress('C:\temp\test.zip', 'C:\temp\testzip\', '', ''),
//---Tar Archiv dekomprimieren
oFileObject.Decompress('C:\temp\test.tar', 'C:\temp\testtar\', '', ''),
//---Tgz Archiv dekomprimieren
oFileObject.Decompress('C:\temp\test.tgz', 'C:\temp\testtgz\', '', ''),
//---Tar.gz Archiv dekomprimieren
oFileObject.Decompress('C:\temp\test.tar.gz', 'C:\temp\testtargz\', '', ''),
always
DestroyObject(oFileObject),
stopseq,