XnView Software

Hi Pierre!

My test is very simple:


procedure TImageViewForm.Button4Click(Sender: TObject);
var
PIPTC : PGFL_IPTC_DATA;
s : ansistring;
iRet : integer;
begin
PIPTC := gflLoadIPTCW(widestring('c:\a\1.jpg'));
gflSetIPTCValue(PIPTC, GFL_IPTC_CREDITS, 'XXXXXXXXXXXXXXXXX');
iRet := gflSaveIPTCW ...

I'm trying to use GFLSDK in Delphi (latest (XE) edition), but gflSaveIPTC returns always with >1< (GFL_ERROR_FILE_OPEN).

Thanks for any help.
Laszlo