>In my description, I indicated that I am are trying to change the height and width to the "grid's row height and column width".
>
>Steve
Sorry Steve, understand better now :) Workaround doesn't seem smart (and forces an init) but works with column.resize :

WITH This
  lcCurrentControl = .CurrentControl
  WITH eval("."+.CurrentControl)
    lcName = .Name
    lcClasslib = .classlibrary
    lcClass = .Class
  ENDWITH
  .removeobject(lcName)
  IF !lcClasslib$set("Classlib")
    SET classlib to (lcClasslib) additive
  ENDIF
  .addobject(lcName, lcClass)
  .CurrentControl = lcCurrentControl
ENDWITH

Cetin