Minor change so it compiles with Laz 1.6.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4444 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
macpgmr
2016-01-19 21:52:33 +00:00
parent 0b6a62b46c
commit 0030a37294

View File

@@ -5417,7 +5417,8 @@ procedure TOvcCustomTable.ctimQueryOptions(var Msg : TMessage);
{$IFNDEF LCL} {$IFNDEF LCL}
Msg.Result := longint(word(FOptions)); Msg.Result := longint(word(FOptions));
{$ELSE} {$ELSE}
Msg.Result := longint(FOptions); // Msg.Result := longint(FOptions); //this used to compile - not sure what changed in Laz 1.6
Msg.Result := longint(word(FOptions));
{$ENDIF} {$ENDIF}
end; end;
{--------} {--------}