方法:
      (Sender as TStringGrid).Width:=5;
    注:这样将发送消息的构件强制类型转换成TStringGrid类,并改变它的属性.