TurboPL Referenz

BlobSize Prozedur

Syntax

BlobSize(Blob: Feld): Integer;

Kategorie

Datenbank-Befehl

Erklärung

Die Funktion gibt die Größe des übergebenen BLOB-Feldes in Bytes zurück. Beim übergebenen BLOB muss es sich um ein eingebettetes Bild, bzw. um einen eingebetteten Klang handeln. Um die Dateigröße eines verknüpften BLOBs zu ermitteln verwenden Sie bitte die Funktionen GetLinkedFile und FirstDir.

Beispiel

Die Prozedur liefert die Größe des BLOB-Feldes Sample, unabhängig davon ob es sich um ein verknüpftes oder ein eingebettetes BLOB handelt:

PROCEDURE GetBlobSize: Integer;
       VarDef BlobPath: String;
       BlobPath := GetLinkedFile(Sample);
       IF Length(BlobPath) = 0
               Return BlobSize(Sample);
       ELSE
               VarDef s: String;
               s := FirstDir(BlobPath, "");
               Return Val(s[15, 10]);
       END;
ENDPROC;

Siehe auch

GetLinkedFile, EmbedBlob, LinkBlob