Miten saan VB:n tekemään jotain, kun oikeaa hiiripainiketta painetaan PictureBoxin päällä...?
Click-eventissä ei onnistu, mutta käytä vaikka MouseUppia, niin saat Button-muuttujan käyttöön. Sitten vaan If Button = 2 Then ...
Tässä esimerkki asiasta:
Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then MsgBox "Painoit kakkosnappia!" End If End Sub
Hoih! Miksiköhän en ole ikinä ennen huomannut MouseDownia =S. Noh, tulipahan sekin nyt selväksi. Thx =D. BTW, pystyykö rullan painamista / kierittämistä seuraamaan?
Ei, subclassaamatta formia ja kuuntelematta raakoja Windows-viestejä, joka ei ole ihan triviaalia. Jos kiinnostaa, niin googleta.
Rullan painamisen voi todeta (Button = 4) mutta ei rullaamista.
Tosta rullan käyttämisestä:
https://www.ohjelmointiputka.net/keskustelu/4934-hiiri-vb6
Ainahan voidaan kikkailla. Jos scrollbar hyväksyy rullan käytön kun se on aktiivinen niin laitetaan scrollbar jonnekkin formin ulkopuolelle ja tehdään siitä aktiivinen kun halutaan antaa käyttäjälle mahdollisuus käyttää rullaa. Sitten tutkitaan minnepäin palkki vierii ja niin edelleen...
Aihe on jo aika vanha, joten et voi enää vastata siihen.