/[cvs]/joko/ToolBox/Windows/VpnDial/src/Form_Main.frm
ViewVC logotype

Diff of /joko/ToolBox/Windows/VpnDial/src/Form_Main.frm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by joko, Sun Oct 9 18:38:24 2005 UTC revision 1.4 by joko, Tue Nov 22 22:15:45 2005 UTC
# Line 102  Private Sub Form_MouseMove(Button As Int Line 102  Private Sub Form_MouseMove(Button As Int
102        ' rechte Maustaste wird gedrückt        ' rechte Maustaste wird gedrückt
103                
104       Case WM_RBUTTONUP       Case WM_RBUTTONUP
105         ' rechte Maustaste wird losgelassen          ' rechte Maustaste wird losgelassen
106         ' (jetzt z.B. Popup-Menü öffnen)          ' (jetzt z.B. Popup-Menü öffnen)
107         PopupMenu MenuPopup          
108            ' handle hiding of popup-menu (see http://www.vbcity.com/forums/topic.asp?tid=36205)
109            Dim hProcess As Long
110            GetWindowThreadProcessId hwnd, hProcess
111            AppActivate hProcess
112            'SetForegroundWindow (Me.hwnd)
113            
114            PopupMenu MenuPopup
115                
116       Case WM_RBUTTONDBLCLK       Case WM_RBUTTONDBLCLK
117        ' rechte Maustaste - Doppeklick        ' rechte Maustaste - Doppeklick
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed