TDataSheet: make Canvas a property instead of param