Kirjautuminen

Haku

Tehtävät

Kilpailu

Putka Open 2025
4. kierros:
7.11. klo 18 – 9.11. klo 23

Keskustelu: Ohjelmointikysymykset: VB6: SysTray

tuomas [13.05.2004 21:11:49]

#

Kun asetan ohjelman iconin system trayhin niin miten
saan vaikka lopetettua ohjelman kun sitä klikataan?
Tossa on vielä asiaa tuosta systrayhin kuvakkeen lisäämisestä:https://www.ohjelmointiputka.net/koodivinkit/23642-vb6-kuvakkeen-lisäys-systemtray-hin

Meitzi [14.05.2004 19:06:07]

#

Tuolla esimerkissä on pieni virhe. Kokeile vaikka näin:

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
   X = X / Screen.TwipsPerPixelX
   Select Case X
       Case WM_RBUTTONDOWN
           MsgBox "Painot hiiren vasenta"
       Case WM_LBUTTONDOWN
           'Kun painetaan hiiren oikeanpuolimmaista nappia niin ohjelma suljetaan
           Unload Me
       Case WM_RBUTTONDBLCLK
           Caption = "Oikea tupla"
       Case WM_LBUTTONDBLCLK
           Caption = "Vasen tupla"
       Case WM_MOUSEMOVE
           Caption = "Hiiri liikkui"
   End Select
End Sub

Meitzi [14.05.2004 19:18:59]

#

Voit myös helpoisti tehdä niin että kun ikonista painaa hiiren nappia niin siitä avautuu popup valikko. Riittää että teet formin Menu Editorilla valikon, pistät sen piilotetuksi ja siiten koodissa avaat valikon:

Case WM_LBUTTONDOWN
         Me.PopupMenu ValikonNimi

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta