Hola a todos....

Tengo una aplicacion con Visual Foxpro 7.0, y en varias maquinas de mis usuarios, les gusta ocupar la resolucion de 640*480, para esto cree una clase, con todos los controles generales de visual foxpro, poniendoles en el INIT codigo como el siguiente:

DO CASE
CASE SYSMETRIC(1) == 640
THIS.WIDTH = THIS.WIDTH * 0.90
THIS.HEIGHT = THIS.HEIGHT * 0.90
THIS.LEFT = THIS.LEFT * 0.90
THIS.TOP = THIS.TOP * 0.90
THIS.FONTSIZE = THIS.FONTSIZE * 0.90
ENDCASE

y me funciona bien con todos los controles que he puesto ahorita (textbox, form, combobox, label, textbox) pero EL QUE ME DA PROBLEMAS ES EL GRID.

Alguien sabe como podria solucionarlo.... intente probar varias clases que redimencionan, pero todas las que vi, redimencionan el width o dependiendo del control el height, pero no el tamaño en si.....

De antemano gracias....