Hello. Compiling that code with fpc 3.2.0 gives the warning that follows:
---> if (kind <> tabulatorkindty(-1)) --> gives now the warning: "msedrawtext.pas(1115,48) Warning: range check error while evaluating constants (-1 must be between 0 and 3)" tabulatorkindty is declared as: ---> tabulatorkindty = (tak_left,tak_right,tak_centered,tak_decimal); So, if I understand ok, with new feature of fpc, "-1" is no more permitted. What must be changed, a new constant should be added at end of the array, something like: ---> tabulatorkindty = (tak_left,tak_right,tak_centered,tak_decimal, tak_none); ? And then use: ---> if (kind <> tabulatorkindty(tak_none) ? Or do you have a other idea? Thanks. 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
