Function DE Version 4.50

@RTAddPictureFile

RichText

Syntax

@RTAddPictureFile(PICFILEHANDLE1;FILETYPE2;HRT3);
@RTAddPictureFile(PICFILEHANDLE1;FILETYPE2;HRT3;FNIFD4);
@RTAddPictureFile(PICFILEHANDLE1;FILETYPE2;HRT3;FNIFD4;FNLISTDISPSIZE5);

Beschreibung

Diese Funktion addiert zu dem HRT Feld HRT3 den Inhalt der Bild-Datei mit dem FH (FILEHANDLE) PICFILEHANDLE1.
Im Parameter FN FILETYPE2 muß die Art der Bild-Datei angegeben werden.

Return-Wert:
Im Erfolgsfall wird das ergänzte HRT Feld HRT3 zurückgegeben, andernfalls @ERROR.

FILEHANDLE PICFILEHANDLE:
FILEHANDLE auf eine im Binär-Modus geöffnete Bild-Datei.

FN FILETYPE:
1=TIFF File monochrom (T4 Compression in reverse bit per byte order)

FN FNIFD:
Bei mehreren Bildern in einem Tiff File kann über diesen Parameter das Bild bestimmt werden, das an das RT-Feld angehängt werden soll.
Für Bild 1 wird 0 angegeben.
(Siehe @GetPictureFileInfo).

FN FNLISTDISPSIZE:
Liste mit 2 Elementen:
Element 1 Breite des Bildes in Inch.
Element 2 Länge des Bildes in Inch.

Beispiel: @RTAddPictureFile(PICFILEHANDLE;FILETYPE;RT);

DBName:="TESTDB\\TESTDB1.NSF";
TiffFileName:="1P001.TIF";

dbh1:=@OpenDB(DBName);
noteh1:=@CreateNote(dbh1;noteh1);

FH:=@OpenOSFile(TiffFileName;"BR");
Ret:=@GetPictureFileInfo(FH;1);
@LogReport(Ret;3);
Form[noteh1]:="TestForm";
RT[noteh1]:=@RTInit;
RT[noteh1]:=@RTAddPictureFile(FH;1;RT[noteh1]);
FH:=@CloseOSFile(FH);

noteh1:=@CloseNote(noteh1;1);
dbh1:=@CloseDB(dbh1);

Es wird TIFF-File mit dem Datei-Namen "1P001.TIF" in das RICHTEXT-Feld mit dem Namen RT gesetzt.