[fpc-pascal] Advantage Tdataset Components: Compilation error

[Marek]

When i compiling adsl.lpk:
Compile package adsl 10.10: Exit code 1, Errors: 1, Warnings: 15, Hints: 1
adsdesign.pas(50,5) Warning: Illegal identifier "UNSAFE_TYPE" for $WARN
directive
adsdesign.pas(51,5) Warning: Illegal identifier "UNSAFE_CODE" for $WARN
directive
adsdesign.pas(52,5) Warning: Illegal identifier "UNSAFE_CAST" for $WARN
directive
adsdata.pas(45,8) Warning: Illegal identifier "UNSAFE_TYPE" for $WARN
directive
adsdata.pas(46,8) Warning: Illegal identifier "UNSAFE_CODE" for $WARN
directive
adsdata.pas(47,8) Warning: Illegal identifier "UNSAFE_CAST" for $WARN
directive
adscnnct.pas(45,8) Warning: Illegal identifier "UNSAFE_TYPE" for $WARN
directive
adscnnct.pas(46,8) Warning: Illegal identifier "UNSAFE_CODE" for $WARN
directive
adscnnct.pas(47,8) Warning: Illegal identifier "UNSAFE_CAST" for $WARN
directive
adsfunc.pas(45,8) Warning: Illegal identifier "UNSAFE_TYPE" for $WARN
directive
adsfunc.pas(46,8) Warning: Illegal identifier "UNSAFE_CODE" for $WARN
directive
adsfunc.pas(47,8) Warning: Illegal identifier "UNSAFE_CAST" for $WARN
directive
adsdata.pas(45,8) Warning: Illegal identifier "UNSAFE_TYPE" for $WARN
directive
adsdata.pas(46,8) Warning: Illegal identifier "UNSAFE_CODE" for $WARN
directive
adsdata.pas(47,8) Warning: Illegal identifier "UNSAFE_CAST" for $WARN
directive
adsdata.pas(705,17) Error: There is no method in an ancestor class to be
overridden: "DataEvent(TDataEvent;LongInt);"
adsdata.pas(818,17) Note: Virtual method "SetFieldData(TField;Pointer);" has
a lower visibility (protected) than parent class TDataSet (public)

Any solutions ?

Marek
PS. 
is the tdaaset free for for commercial use ?
((I'm sorry, I'm poorly written in English)




--
View this message in context: http://free-pascal-general.1045716.n5.nabble.com/Advantage-Tdataset-Components-Compilation-error-tp5728399.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.