Very Good!Thanks a lot!but i can't compile it .when i compile it at FPC 2.4.4 , I have lot of error which like this :
Rj2p.pas(128,31) Error: Ordinal expression expected
Rj2p.pas(129,20) Error: Constant and CASE types do not match
Rj2p.pas(129,20) Error: Ordinal expression expected
Rj2p.pas(130,20) Error: Constant and CASE types do not match
Rj2p.pas(130,20) Error: Ordinal expression expected
Rj2p.pas(130,20) Error: duplicate case label
Rj2p.pas(131,20) Error: Constant and CASE types do not match
Rj2p.pas(131,20) Error: Ordinal expression expected
Rj2p.pas(131,20) Error: duplicate case label
Rj2p.pas(132,20) Error: Constant and CASE types do not match
Rj2p.pas(132,20) Error: Ordinal expression expected
Rj2p.pas(132,20) Error: duplicate case label
Rj2p.pas(133,20) Error: Constant and CASE types do not match
Rj2p.pas(133,20) Error: Ordinal expression expected
Rj2p.pas(133,20) Error: duplicate case label
Rj2p.pas(134,20) Error: Constant and CASE types do not match
Rj2p.pas(134,20) Error: Ordinal expression expected
Rj2p.pas(134,20) Error: duplicate case label
Rj2p.pas(337) Fatal: There were 18 errors compiling module, stopping
Which FPC version can compile it ?
OK, i have compile it at FPC 2.6.0 , so i have make it . thanks !