TCanvas
pl
OnChange
pl
OnChanging