Compile error [Delphi]

[Guest]

When i compile this piece of code, it raises an error:

Code: Select all

  gflGetDefaultSaveParams(lp);
  lp.FormatIndex:=gflGetFormatIndexByName(Pchar('Tiff')); //Types of actual and formal var parameters must be identical
  e:=gflSaveBitmap(PChar('test.tiff'),gfl_bmp,lp);

[xnview]

When i compile this piece of code, it raises an error:

Code: Select all

  gflGetDefaultSaveParams(lp);
  lp.FormatIndex:=gflGetFormatIndexByName(Pchar('Tiff')); //Types of actual and formal var parameters must be identical
  e:=gflSaveBitmap(PChar('test.tiff'),gfl_bmp,lp);

Which error?
Pierre.

[Guest]

if you have

Code: Select all

var
  gfl_bmp: : PGFL_BITMAP;
  sp: TGFL_SAVE_PARAMS;

then you must do

e := gflSaveBitmap(PChar('test.tiff'), gfl_bmp^, sp);

Don't forget the ^

Dimitris

[xnview]

if you have

Code: Select all

var
  gfl_bmp: : PGFL_BITMAP;
  sp: TGFL_SAVE_PARAMS;

then you must do

e := gflSaveBitmap(PChar('test.tiff'), gfl_bmp^, sp);

Don't forget the ^

Dimitris

Sorry i don't understand. Where?
Pierre.

[daremon]

Sorry i don't understand. Where?

The original question was:

What is wrong with this:

Code: Select all

e := gflSaveBitmap(PChar('test.tiff'), gfl_bmp, sp);

and i answered that the correct code should be

Code: Select all

e := gflSaveBitmap(PChar('test.tiff'), gfl_bmp^, sp);

There is a symbol ^ after the variable gfl_bmp, which is needed by Delphi to dereference the pointer (something like * in C). That will solve the compile problem.

Dimitris