Programación General > Visual Basic 6.0 e inferiores
Re: Flexgrid
Sagutxo:
Salu2. Seguro que hay otra manera, siempre hay otra manera, y provablemente mas sencilla, pero te aseguro que de esa manera funciona y ademas controlas el campo NULL. Tanto con ComboBox como com campo.text.
Te dejo un ejemplo en el que los uso. No solo veras que es sencillo sino que ademas te vale para cualquiera, una vez hecho 1 para todos es.
Espero haberte podido ayudar.
:comp: :D
Aislante:
ORALE !!!!!!
ESTA MUY INTERESANTE GRACIAS!!!!!!!!!!!
en eso tienes razon la validacion es mucho mas sencilla y no te "atascas" de controles.
oye por cierto sabes o saben como hacer que el msflexgrid se recora con la ruedita del raton (scroll)?
Por otro lado te dejo lo que hice con el msflexgrid.
Se aceptan comentarios!!!!!!!....
y si me ayudaste gracias, espero tambien te ayude.
Sagutxo:
Salu2.
P.d. de anterior mensaje.
Se me ha olvidado decirte algo importante te recomiendo que introduzcas el valor de .MouseCol y .MouseRow en variables globales por ejemplo
PRINCIPIO de Codigo del formulario
Option Explicit
Dim EditaLinea as long
Dim EditaCol as long
y luego en la funcion dobleclick()
EditaLinea = MsFleshGrid.MouseRow
EditaCol=MsFleshGrid.MouseCol
ya que tengo entendido que esas opciones si no se guardan en variables son muy inestables.
llevo años con estas opcines y funcionan muy bien, ademas aunque fueran muchos datos con los ordenadores que se tienen ahora ni lo iban a notar.
Ya siento este lapsus, se me paso. :( :whistling: :comp:
RESPECTO A LA RUEDITA DEL SCROLL
----------------------------------------------
Yo no hago nada con ello y funciona.
prueba a ponerle los drv del ratón que tengas.
Tengo la opción scrollbars del msfleshgrid en el 2, vertical, cuento las lineas que entran en el flesgrid y cuando veo que ha llegado le quito a uno de los campos de flesgrid 240 que es lo que ocupa la barra scroll, Seguro que hay otra manera, pero como lo hice hace tiempo y funciona pos así quedo, ADJUNTO MINIEJEMPLO.
Supongamos que entran 22 lineas en el flesgrid....
flesgrid=Tabla1
--- Código: Text --- If Tabla1.Rows > 22 Then Tabla1.ColWidth(0) = (7280 - 240) End If
valdogol:
Hola soy nuevo por aqui, recien me acabo de registrar y me gustaria participar en estos foros con una primera duda:
Alguien sabria como meterle una imagen a un FlexGrid?
F_Tanori:
Hola
Aqui hay un ejemplo
La web de Luciano2 (un compañero de este foro)
http://www.recursosvisualbasic.com.ar/htm/...cellpicture.htm
Saludos
Navegación
[#] Página Siguiente
[*] Página Anterior
Ir a la versión completa