I need help - I can help - SetFormFieldCheckStyle bug

Another strange different behavior (imho another bug) from version 12 to 15: if you put the SetFormFieldCheckStyle instruction before SetFormFieldBound check fields will not be printed (see 1.jpeg). If you invert the instructions you will have the correct print (2.jpeg)

var

QP: TDebenuPDFLibrary;

nFieldIndex: integer;

i,n: integer;

begin

QP:=TDebenuPDFLibrary.Create;

try

QP.UnlockKey('xxx');

QP.SetOrigin(1);

QP.SetMeasurementUnits(1); // mm.

QP.SetPageDimensions(210, 297); // A4

QP.SelectPage(n);

QP.AddFormFont(QP.GetFontID(4));

QP.SetTextSize(10);

for i:=1 to 3 do begin

nFieldIndex:=QP.NewFormField('FIELD'+IntToStr(i),3);

QP.SetFormFieldCheckStyle(nFieldIndex,0,1); // <- if you put this instruction here pdf printed haven't the cross (1.JPEG)

QP.SetFormFieldBounds(nFieldIndex,40,46+(i-1)*15,5,5);

// QP.SetFormFieldCheckStyle(nFieldIndex,0,1); // <- if you put this instruction here pdf printed have the cross (2.JPEG)

end;

QP.SaveToFile('c:\temp\output.PDF');

ShellExecute(self.Handle,'open','c:\temp\output.PDF','','',SW_SHOWMAXIMIZED);

finally

QP.Free;

end;