07-02-2005, 23:28
|
|
|
חבר מתאריך: 31.07.04
הודעות: 198
|
|
TrayIcons API And VB
יש Tray Icon שהוגדר כך:
With Tray.cbSize = Len(Tray).hwnd = frm.hwnd
.uId = 1&
.uFlags = NIF_ICON Or NIF_TIP Or NIF_MESSAGE
.ucallbackMessage = WM_MOUSEMOVE
.hIcon = frm.Icon
End With
איך אתם מסבירים את זה שהמשתנה Msg מייצג את סוג האירוע?
אני לא מבין איך זה שמחלקים את מיקום הסמן בכמות הטוויפים לפיקסל, ומקבלים סוג אירוע...
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim Msg As LongMsg = X / Screen.TwipsPerPixelX
Select Case msg
Case WM_LBUTTONDOWN
.
.
.
Case WM_RBUTTONDBLCLK
...
End Select
End Sub
נערך לאחרונה ע"י shyagam בתאריך 07-02-2005 בשעה 23:30.
סיבה: משום מה העורך הוסיף לי הרבה מאוד רווחים...
|