Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: MS FlexGrid po przyciśnięciu prawego klawisza myszy ???
anonim




Typ: Nie zarejestrowany
MS FlexGrid po przyciśnięciu prawego klawisza myszy ???

Hejka
Mam problem ... nie wiem jak w MS FlexGrid po kliknięciu prawego klawisza myszy zaznaczała się komórka nad która jest kursor ... help me ... tak jak to się dzieje w EXcelu !!!
pozdroovka
Marcin

30-01-2003 09:32
  
Tigrisek



Typ: neutral
Postów: 91
Zarejestrowany: Jul 2002

musisz stworzyć menu (menu editorem najlepiej) np:
menu1 musi byc niewidoczne czyli odznacz kontrolke visible, natomiast poz1 musi byc widoczne

menu1
.... poz1

i teraz kod:

Private Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)

If Button = 2 Then
    PopupMenu menu1
End If

End Sub

Sub poz1_Click()
    With MSFlexGrid1
        zmienna = .TextMatrix(.MouseRow, .MouseCol)
    End With
End Sub

no i teraz wartość komórki nad którą kliknąłeś (a dokładnie nad którą znajduje się wskaźnik myszy) masz w zmiennej

11-05-2003 16:00
Pokaż profil Tigrisek  Wyślij email do Tigrisek        107040
Knight Lore''FC




Typ: neutral
Postów: 240
Zarejestrowany: Jan 2003


no i teraz wartość komórki nad którą kliknąłeś (a dokładnie nad którą znajduje się wskaźnik myszy) masz w zmiennej

Mu chodzilo o zaznaczenie tej komorki a nie pobranie zmiennej z niej... ale to robi sie prawie tak samo jak napisales - wykozystujac twoj przyklad

Private Sub MSFlexGrid1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
    If Button = 2 Then
        'zaznacz komorke nad ktora jest myszka
        MSFlexGrid1.Col = MSFlexGrid1.MouseCol
        MSFlexGrid1.Row = MSFlexGrid1.MouseRow
        'a to jezeli chcesz pobrac zawartosc komorki
        zmienna = MSFlexGrid1.Text
    End If
End Sub

'chyba latwiejsze niz MENU

[Post edytowany dnia 29-05-2003 17:57 przez Knight Lore'FC]

29-05-2003 17:53
Pokaż profil Knight Lore  Wyślij email do Knight Lore        1065423
Wszystkich odpowiedzi: 2 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1