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/
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
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
Aihe on jo aika vanha, joten et voi enää vastata siihen.