Ver Mensaje Individual
  #2 (permalink)  
Antiguo 28/01/2008, 10:50
Avatar de Kruzado
Kruzado
 
Fecha de Ingreso: marzo-2007
Mensajes: 307
Antigüedad: 18 años, 2 meses
Puntos: 17
Re: Tamaño celdas de una MSFlexgrid

1º crea un label en tu formulario, la propiedad autosize dejala como true y la propiedad visible dejala en false (para ke no se vea)

2º cuando llenes tu grid (si lo haces "a mano") escribe el siguiente codigo :
grid1.textmatrix(x,1)= con("descripcion")
Label1.Caption = con("descripcion")
If Label2.Width > Grid1.ColWidth(1) Then Grid1.ColWidth(1) = Label2.Width

con esto cuando estoy ingresando datos en la matriz, si el ancho del texto ke ingreso es mayor al ancho de la columna uno de la grid, ajusta la grid a su nuevo ancho


3º si ya tienes llena tu matriz, para cambiarla debes recorrerla ejemplo:

for x=1 to grid1.rows-1
label2.caption=grid1.textmatrix(x,1)
If Label2.Width > Grid1.ColWidth(1) Then Grid1.ColWidth(1) = Label2.Width
next x

este ejemplo funciona para cambiar el ancho de la columna 1 del msflexgrid, tu debes modificarlo para hacerlo funcionar con tu codigo, espero te sirva