Page Comparison

var
  nResult       : integer;
  sItemPath     : string;
  sPropertyItem : string;
  sFilespec     : string;
begin
  sItemPath     := '\Job\TakeOff\Section1';
  sPropertyItem := 'image';
  sFilespec     := 'c:\temp.bmp';

  nResult := SetImagePropertyFromFile(sItemPath, sPropertyItem, sFilespec);
end;