TurboPL Referenz

EmbedBlob Prozedur

Syntax

EmbedBlob(Feld: TableField; Quelldatei: String; Format: Integer)

Kategorie

Datenbank-Befehl

Erklärung

Lädt die unter Quelldatei angegebene Bild- oder Klangdatei in das Datenfeld. Natürlich muss das Feld ein Blob-Feld sein. Format ist optional und definiert den Typ des Bildes. Die möglichen Werte sind unter LinkBlob beschrieben. EmbedBlob liefert bei Erfolg die Größe der eingebetteten Datei zurück, ansonsten löst sie einen Laufzeitfehler aus.

Beispiel

Ein Makro-Button eines Formulares soll die Prozedur ImportiereGrafikdatei ausführen

procedure ImportiereGrafikdatei
       T-Eingabe := "";
       if ChoosePicture("Wählen Sie ein Bild aus", 127)
               EmbedBlob(BASE.Sample, T-Eingabe);
               WriteRec(BASE, RecNo(BASE))
       end
endproc

Wie bei allen Zuweisungen an Tabellenfelder wird auch von EmbedBlob lediglich der aktuelle Datenpuffer beschrieben. Damit der Datensatz tatsächlich geschrieben wird, ist ein anschließender WriteRec notwendig.

Siehe auch

PlaySound, LinkBlob, ChoosePicture, ClearBlob, CopyBlob