Menu en MSFlexgrid, Visual Basic



  • Buenas, veo que no hay muchos temas de programacion en el foro, pero igualmente pregunto.
    Hice un programa en VB 6 en el que importo una base de datos de access a una msflexgrid. Lo que quiero hacer es cuando el usuario hace click derecho sobre una celda me aparezca un menu de opciones (esto ya lo hice), con las opciones copiar,crear relacion, y alguna otra. Lo que no se es como seleccionar ese unico elemento de la flex para guradarlo en el portapapeles o traspasarlo a algun otro textbox del programa para hacer las busquedas o relaciones internas del mismo flex.
    Espero su ayuda si pueden darmela, Saludos!!



  • de visual se mas bien poco ,y te preguntarás para qué co**** posteo, pero pregunto porque me interesa:

    No puedes poner sobre cada elemento del menú contextual un evento Onclick o algo parecido para que cuando pinches ejecutes alguna función que te asigne un numero de opcion para cada elemento.
    A ver si me explico
    Copiar –> opcion 1 le asignamos por ejemplo onClick (acciones(1))
    Pegar --> opcion 2 le asignamos por ejemplo onClick (acciones(2))

    y después en la función acciones realizar algo dependiendo de la opcion???

    saludos



  • Si puedo hacerle todas las opciones que quiero pero el tema es como tomar el contenido de la celda elegida y copiarlo al portapeles, o a un textbox. Eso me falta para hacer las funciones que quiero! ;)



  • Nadie cacha nada sobre esto????, por favoooor!!! es el toque final para mi programa!!



  • @jere7em:

    Buenas, veo que no hay muchos temas de programacion en el foro, pero igualmente pregunto.
    Hice un programa en VB 6 en el que importo una base de datos de access a una msflexgrid. Lo que quiero hacer es cuando el usuario hace click derecho sobre una celda me aparezca un menu de opciones (esto ya lo hice), con las opciones copiar,crear relacion, y alguna otra. Lo que no se es como seleccionar ese unico elemento de la flex para guradarlo en el portapapeles o traspasarlo a algun otro textbox del programa para hacer las busquedas o relaciones internas del mismo flex.
    Espero su ayuda si pueden darmela, Saludos!!

    Yo hice este procedimiento y me sirvio.

    Private Sub GridVer_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
    If Button = 2 Then
    Rs = GridVer.MouseRow
    Marcar Fix(Rs)
    If GridVer.RowSel > 0 Then
    Form1.PopupMenu Form1.MnuPop2
    End If
    End If
    End Sub

    Espero que te sirva.


Accede para responder
 

Has perdido la conexión. Reconectando a Hardlimit.