Hello Alexander. I did:
const foldhiddenbit : byte = 7; // line 896 foldhiddenmask : byte = 1 shl foldhiddenbit; // line 897 currentfoldhiddenbit : byte = 6; // line 898 currentfoldhiddenmask : byte = 1 shl currentfoldhiddenbit; // line 899 foldlevelmask : byte = not (foldhiddenmask or currentfoldhiddenmask); // line 900 That gives that error messages: msedatalist.pas(897,47) Error: (3203) Illegal expression msedatalist.pas(899,61) Error: (3203) Illegal expression msedatalist.pas(900,72) Error: (3203) Illegal expression msedatalist.pas(1126,1) Fatal: (10026) There were 3 errors compiling module, stopping Fre;D ----- Many thanks ;-) -- Sent from: http://free-pascal-general.1045716.n5.nabble.com/ _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal