shellabout(application.MainForm.Handle,'52688226所有',
          '@163.com',application.Icon.Handle);