[fpc-pascal] Erorr: Illegal type conversion: "Set Of ShortInt" to "LongInt"

[Roland Turcan]

Hello FPC-Pascal users discussions!

I have this conversion:

type TWordSet = set of 0..15;
     PWordSet = ^TWordSet;

var  btn: TMsgDlgButtons;

begin
  ...
  Integer(PWordSet(@btn)^) := Params[0]; // Params is Variant
  ...
end;


With FPC 2.4 it is OK, but up-to-date FPC SVN reports error in
subject.

Is it a bug or it needs different conversion.

How can I fix it?

Thanks.

-- 
Best regards, TRoland
http://www.rotursoft.sk
http://exekutor.rotursoft.sk