@RTAddPictureFile
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.
