TODOPIC

Lenguajes de programación para PC => Visual Basic => Mensaje iniciado por: manuelroin24 en 14 de Mayo de 2008, 14:05:58

Título: Combobox dentro de MsFlexgrid
Publicado por: manuelroin24 en 14 de Mayo de 2008, 14:05:58
Alguien sabe como puedo mezclar las caracterisiticas de un combobox dentro de un msflexgrid algo como la imagen que pongo

http://img232.imageshack.us/my.php?image=msflexgridcomboboxzm5.jpg (http://img232.imageshack.us/my.php?image=msflexgridcomboboxzm5.jpg)
Título: Re: Combobox dentro de MsFlexgrid
Publicado por: manuelroin24 en 14 de Mayo de 2008, 16:46:16
Bueno logre solucionar el problema. EL modo era el siguiente:

Utilizamos un Combobox aparte colocarlo en cualquier lugar del formulario no se preocupen

Una vez cargado el formulario, ocultamos el combobox con la siguiente propiedad:
           
                      combobox1.visible = FALSE

Luego cuando estemos en la columna del MSFLEXGRID por ejemplo la "1" , haremos la siguiente igualamos la propiedad top y height  del combobox a las top y height del msflexgrid para luego mostrar el combox

Luego en el evento click del combobox igualamos los text del msflexgrid y el combobox
Título: Re: Combobox dentro de MsFlexgrid
Publicado por: Gonzalo_BlackHawk en 14 de Mayo de 2008, 18:33:05
Guau, manuel, esa es una solucion muy buena, bastante rebuscada pero original. No creo que haya alguna otra solución mas simple a la cuestión, no sin crear un control Flexgrid especial que cuente con esta caracterisitica.

Te voy a robar la idea y a archivarla en mi libreria de visual :D :D :D, uno nunca sabe cuando puede necesitarla.

Un saludo.
Título: Re: Combobox dentro de MsFlexgrid
Publicado por: ASTROCAR en 15 de Mayo de 2008, 00:25:20
Me alegra que te haya servido el ejemplo men, lo que si no entiendo ahora que es realmente lo que estas haciendo pense en un principio que era una aplicacion para un programador de hecho usted mismo asi me lo afirmo pero por lo que has planteado veo que no.

En cuando a editar las celdas de un control flexgrid un dato a tener en cuenta es cuando necesitas editar solo valores hexadecimal en la celda lo que te llevara a diseñar unas rutinas para que solo puedes anexzar valores hexadecimal me explico que si colocas una letra fuera del valor hexadecimal la celda del control flexgrid no la acepte..

saludos y cualquier cosas nos leemos.
bye.

ATTEN: Alex santana.
Anzoategui- Venezuela.
Título: Re: Combobox dentro de MsFlexgrid
Publicado por: ASTROCAR en 15 de Mayo de 2008, 00:29:04
Haa algo que se me escapo, porque no mantienes un solo post para todo estos problemas o consultas sobre control flexgrid y asi uno lleva un mejor seguimiento del tema.

Ojo es solo un consejo y se que a los moderadores no les parece bien esto ya que el foro se satura de los mismo y recuerda que este es un sitio el cual depende de un espacion en la red ya definido asi que de una u otra manera debemos ayudar a conserva ese espacio.

saludos
Título: Re: Combobox dentro de MsFlexgrid
Publicado por: manuelroin24 en 15 de Mayo de 2008, 20:18:44
Bueno amigo astrocar muchisimas gracias por tu ayuda voy avanzando de a pocos y asi es es una aplicacion para un programador en un inicio solo un 16f84, en un rato cuando este en caso pego el codigo para la aplicacion del msflexgrid con un combobox
Título: Re: Combobox dentro de MsFlexgrid
Publicado por: manuelroin24 en 16 de Mayo de 2008, 02:13:50
Bueno recien tuve algo de tiempo. aqui dejo el codigo mas sencillo para incluir un combobox dentro de un msflexgrid para muchos debe ser algo muy sencillo pero para mi que recien empiezo con esto no lo fue tanto asi que por ese motivo lo pongo, espero les sirva de ayuda.

Código: [Seleccionar]

Option Explicit

Private Sub Combo1_CLICK()
MSFlexGrid1.Text = Combo1.Text
Combo1.Visible = False
End Sub

Private Sub Form_Load()
Combo1.Visible = False
Combo1.AddItem "1"
Combo1.AddItem "2"
End Sub

Private Sub MSFlexGrid1_Click()
If Combo1.Visible = True Then
  Combo1.Visible = False
End If
If MSFlexGrid1.Col = 1 Then
  Combo1.Top = MSFlexGrid1.Top + MSFlexGrid1.CellTop
  Combo1.Width = MSFlexGrid1.CellWidth
  Combo1.Left = MSFlexGrid1.CellLeft + MSFlexGrid1.Left
  Combo1.Visible = True
 
End If
End Sub

(http://img185.imageshack.us/img185/8536/msflexgridcomboboxwz0.th.jpg)