用TIcontrolsuit将例程canback2back改为cannormal,范例