OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-29 14:00:49 +03:00
Code Activity

0031632: Draw Harness - handle 3d mouse Raw HID input on Windows

Browse Source 
WNT_HIDSpaceMouse - added auxiliary class for processing 3d mouse Raw HID input.
AIS_ViewController::Update3dMouse() - added default processor for 3d mouse input event.
ViewerTest now redirects WM_INPUT to AIS_ViewController::Update3dMouse().
Aspect_VKey enumeration has been extended by 3D view buttons.
WNT_Window::RegisterRawInputDevices() has beend added as a small wrapper
over WinAPI RegisterRawInputDevices() for common HID input devices.

AIS_ViewCube now stores animation duration within AIS_AnimationCamera instead of dedicated duplicating class property.
This commit is contained in:
kgv
2020-06-26 09:58:50 +03:00
committed by bugmaster
parent 79e9ba31d2
commit d6fbb2aba4
15 changed files with 1054 additions and 143 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
adm/genproj.tcl
View File

@@ -1596,11 +1596,6 @@ proc osutils:tk:units { tkloc theSrcDir } {
return $l
}
proc osutils:justwnt { listloc } {
set goaway [list Xw]
return [osutils:juststation $goaway $listloc]
}
# remove from listloc OpenCascade units indesirables on NT
proc osutils:juststation {goaway listloc} {
global path
@@ -2267,17 +2262,6 @@ proc wokUtils:FILES:mkdir { d } {
}
}
# remove from listloc OpenCascade units indesirables on Unix
proc osutils:justunix { listloc } {
if { "$::tcl_platform(os)" == "Darwin" } {
set goaway [list Xw WNT]
} else {
set goaway [list WNT]
}
return [osutils:juststation $goaway $listloc]
}
####### CODEBLOCK ###################################################################
# Function to generate Code Blocks workspace and project files
proc OS:MKCBP { theOutDir theModules theAllSolution thePlatform theCmpl } {
@@ -2333,13 +2317,8 @@ proc osutils:cbptk { theCmpl theOutDir theToolKit thePlatform} {
set listloc $theToolKit
}
if { $thePlatform == "wnt" || $thePlatform == "uwp" } {
set resultloc [osutils:justwnt $listloc]
} else {
set resultloc [osutils:justunix $listloc]
}
if [array exists written] { unset written }
foreach fxlo $resultloc {
foreach fxlo $listloc {
set xlo $fxlo
set aSrcFiles [osutils:tk:cxxfiles $xlo $thePlatform "src"]
foreach aSrcFile [lsort $aSrcFiles] {
@@ -2928,9 +2907,8 @@ proc osutils:xcdtk:sources {theToolKit theTargetType theSrcFileRefSection theGro
upvar $theIncPaths anIncPaths
set listloc [osutils:tk:units $theToolKit "src"]
set resultloc [osutils:justunix $listloc]
set aBuildFileSection ""
set aPackages [lsort -nocase $resultloc]
set aPackages [lsort -nocase $listloc]
if { "$theTargetType" == "executable" } {
set aPackages [list "$theToolKit"]
}