4D Doc Center : BLOB PROPERTIES

4D v12.4

BLOB

BLOB PROPERTIES


BLOB PROPERTIES ( BLOB ; Komprimiert {; GrößeUnkomprimiert {; AktuelleGröße}} )

Parameter	Typ	Beschreibung
BLOB	BLOB	BLOB, über das Angaben benötigt werden
Komprimiert	Lange Ganzzahl	0 = BLOB unkomprimiert, 1 = BLOB kompakt komprimiert, 2 = BLOB schnell komprimiert
GrößeUnkomprimiert	Lange Ganzzahl	Größe des unkomprimierten BLOB (in Bytes)
AktuelleGröße	Lange Ganzzahl	Aktuelle Größe des BLOB (in Bytes)

Beschreibung

Der Befehl BLOB PROPERTIES gibt Informationen über BLOB zurück.

Der Parameter Komprimiert zeigt an, ob ein BLOB komprimiert bzw. unkomprimiert ist und gibt einen der folgenden Werte zurück. 4D bietet folgende vordefinierten Konstanten:

Konstante	Typ	Wert	Meldung
Compact compression mode	Lange Ganzzahl	1	So kompakt wie möglich komprimieren (Standardmodus). Verlangsamt die Komprimierungsgeschwindigkeit und die Operationen zur Entkomprimierung.
Fast compression mode	Lange Ganzzahl	2	So schnell wie möglich komprimieren (wird auch schnellstmöglich entkomprimiert), verringert die Komprimierungsrate, d.h. das komprimierte BLOB wird größer.
Is not compressed	Lange Ganzzahl	0

Der Parameter Größeunkomprimiert gibt, unabhängig vom Status des BLOB die Größe des unkomprimierten BLOB an.
Der Parameter AktuelleGröße gibt die aktuelle Größe des BLOB zurück. Bei komprimiertem BLOB ist das der Wert AktuelleGröße minus GrößeUnkomprimiert. Bei unkomprimiertem BLOB erhalten Sie immer den Wert AktuelleGröße ist gleich GrößeUnkomprimiert.

Beispiel 1

Siehe Beispiele zu den Befehlen COMPRESS BLOB und EXPAND BLOB.

Beispiel 2

Wurde ein BLOB komprimiert, erhält folgende Projektmethode den durch die Komprimierung gewonnenen Platz in Prozent:

  ` Projektmethode Space saved by compression

  ` Durch Komprimierung gesparter Platz (Zeiger {; Zeiger } ) -> Lange Ganzzahl

  ` Durch Komprimierung gesparter Platz ( -> BLOB {; -> gewonnene Bytes } ) -> Prozent

 

 C_POINTER($1;$2)

 C_LONGINT($0;$vlCompressed;$vlExpandedSize;$vlCurrentSize)

 

 BLOB PROPERTIES($1->;$vlCompressed;$vlExpandedSize;$vlCurrentSize)

 If($vlExpandedSize=0)

    $0:=0

    If(Count parameters>=2)

       $2->:=0

    End if

 Else

    $0:=100-(($vlCurrentSize/$vlExpandedSize)*100)

    If(Count parameters>=2)

       $2->:=$vlExpandedSize-$vlCurrentSize

    End if

 End if

Diese Methode in Ihrer Anwendung können Sie folgendermaßen einsetzen:

  ` ...

 COMPRESS BLOB(vxBlob)

 $vlPercent:=Space saved by compression(->vxBlob;->vlBlobSize)

 ALERT("Die Komprimierung spart "+String(vlBlobSize)+" Bytes, das sind "+String($vlPercent;"#0%")")