ورود

View Full Version : سوال: اتصال دو ماوس


soheila2012
دوشنبه 19 فروردین 1392, 18:29 عصر
چطور میشه دو ماوس رو با هم شبکه کرد؟؟؟(با VB6)
SlowCode
دوشنبه 19 فروردین 1392, 19:17 عصر
منظورتون از شبکه کردن موس چیه؟
لطفا توضیح بدین.
soheila2012
دوشنبه 19 فروردین 1392, 23:21 عصر
دو تا سیستم با هم شبکه هستن میخوام دو تا ماوس هر سیستم رو share کنم
یعنی برنامه نوشته شه!
SlowCode
دوشنبه 19 فروردین 1392, 23:30 عصر
یعنی با یه سیستم موس سیستم دیگه رو کنترل کنی؟
اگه منظورتون اینه که باید با تابع GetCursorPos مختصات موس رو بگیری بعد با وینسوک بفرستی به سیستم دیگه و وقتی دریافتش کردی با تابع SetCursorPos مختصات موس رو تنظیم میکنی.
مورد دیگه خواندن و فرستادن کلیک های موس هست که باید با تابع mouse_event انجام بدین.
Public Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long
Public Declare Function SetCursorPos Lib "user32" Alias "SetCursorPos" (ByVal x As Long, ByVal y As Long) As Long
Public Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)