Integrating latest 47acbe8
This commit is contained in:
alexpete
@@ -0,0 +1,268 @@
|
||||
--sceneView . Christopher Evans . Crytek
|
||||
|
||||
if sceneView != undefined then
|
||||
(
|
||||
destroyDialog sceneView
|
||||
)
|
||||
|
||||
ilTv = dotNetObject "System.Windows.Forms.ImageList"
|
||||
ilTv.imageSize = dotNetObject "System.Drawing.Size" 16 15
|
||||
|
||||
rollout sceneView "SceneView v.001"
|
||||
(
|
||||
|
||||
fn getIconFromBitmap thePath number iconFileName =
|
||||
(
|
||||
theFileName = getDir #image +"\\icon_"+ iconFileName +".bmp"
|
||||
if not doesFileExist theFileName do
|
||||
(
|
||||
tempBmp = openBitmap thePath
|
||||
iconBmp = bitmap 16 15
|
||||
for v = 0 to 14 do
|
||||
setPixels iconBmp [0,v] (getPixels tempBmp [(number-1)*16, v] 16)
|
||||
iconBmp.filename = theFileName
|
||||
save iconBmp
|
||||
close iconBmp
|
||||
close tempBmp
|
||||
)
|
||||
img = dotNetClass "System.Drawing.Image" --create an image
|
||||
ilTv.images.add (img.fromFile theFileName) --add to the list
|
||||
)
|
||||
|
||||
fn initTreeView tv =
|
||||
(
|
||||
tv.Indent= 28
|
||||
tv.CheckBoxes = true --same as in ActiveX
|
||||
tv.labelEdit = true
|
||||
tv.Indent = 15
|
||||
tv.Scrollable = true
|
||||
colorTest = dotNetClass "System.Drawing.Color"
|
||||
tv.BackColor = colorTest.FromArgb 255 196 196 196
|
||||
iconDir = (getDir #ui) + "\\icons\\"
|
||||
--We call our function for each icon, this time also passing a
|
||||
--third argument with the icon name suffix.
|
||||
getIconFromBitmap (iconDir + "Standard_16i.bmp") 2 "Sphere"
|
||||
getIconFromBitmap (iconDir + "Standard_16i.bmp") 1 "Box"
|
||||
getIconFromBitmap (iconDir + "Lights_16i.bmp") 3 "Light"
|
||||
getIconFromBitmap (iconDir + "Cameras_16i.bmp") 2 "Camera"
|
||||
getIconFromBitmap (iconDir + "Helpers_16i.bmp") 1 "Helper"
|
||||
getIconFromBitmap (iconDir + "Splines_16i.bmp") 2 "Shape"
|
||||
getIconFromBitmap (iconDir + "Systems_16i.bmp") 1 "Bone"
|
||||
--At the end, we assign the ImageList to the TreeView.
|
||||
tv.imageList = ilTv
|
||||
)
|
||||
|
||||
|
||||
fn addChildren theNode theChildren =
|
||||
(
|
||||
for c in theChildren do
|
||||
(
|
||||
newNode = theNode.Nodes.add c.name c.name
|
||||
newNode.tag = dotNetMXSValue c
|
||||
--newNode.count = c.handle
|
||||
--By default, all nodes will use icon 0 (the first one) unless
|
||||
--specified otherwise via the .iconIndex and .selectedIconIndex
|
||||
--properties. We set both of them to the icon corresponding to
|
||||
--the superclass of the scene object:
|
||||
newNode.imageIndex = newNode.selectedImageIndex = case superclassof c of
|
||||
(
|
||||
Default: 1
|
||||
GeometryClass:
|
||||
(
|
||||
case (c.classid[1]) of
|
||||
(
|
||||
Default: 1
|
||||
683634317: 6 -- bones
|
||||
37157: 6 -- biped objects
|
||||
)
|
||||
)
|
||||
Light: 2
|
||||
Camera: 3
|
||||
Helper: 4
|
||||
)
|
||||
|
||||
newNode.checked = not c.isHidden --same as in ActiveX
|
||||
--For the color, we create a DotNet color class from the
|
||||
--wirecolor of the object and assign to the .forecolor of
|
||||
--the TreeView node:
|
||||
--newNode.forecolor = (dotNetClass "System.Drawing.Color").fromARGB c.wirecolor.r c.wirecolor.g c.wirecolor.b
|
||||
addChildren newNode c.children
|
||||
)
|
||||
)
|
||||
|
||||
|
||||
|
||||
--Since every node uses icon with index 0 unless specified otherwise
|
||||
--the Root Node will use the first icon by default.
|
||||
fn fillInTreeView tv =
|
||||
(
|
||||
theRoot = sceneview.tv.Nodes.add "WORLD" "WORLD"
|
||||
rootNodes = for o in objects where o.parent == undefined collect o
|
||||
sceneview.addChildren theRoot rootNodes
|
||||
)
|
||||
|
||||
fn refresh =
|
||||
(
|
||||
sceneview.tv.nodes.clear()
|
||||
sceneview.fillInTreeView tv
|
||||
sceneview.tv.topnode.expand()
|
||||
)
|
||||
|
||||
fn getSelectedNode =
|
||||
(
|
||||
try
|
||||
(
|
||||
if selection[1] != undefined then
|
||||
(
|
||||
--print selection[1].name
|
||||
sceneview.tv.SelectedNode = (sceneview.tv.nodes.Find selection[1].name true)[1]
|
||||
sceneview.tv.SelectedNode.EnsureVisible()
|
||||
colorTest = dotNetClass "System.Drawing.Color"
|
||||
sceneview.tv.selectednode.backColor = colorTest.FromArgb 255 221 221 221
|
||||
sceneview.tv.refresh()
|
||||
)
|
||||
)
|
||||
catch -- for undo
|
||||
(
|
||||
refresh()
|
||||
if selection[1] != undefined then
|
||||
(
|
||||
sceneview.tv.SelectedNode = (sceneview.tv.nodes.Find selection[1].name true)[1]
|
||||
sceneview.tv.SelectedNode.EnsureVisible()
|
||||
colorTest = dotNetClass "System.Drawing.Color"
|
||||
sceneview.tv.selectednode.backColor = colorTest.FromArgb 255 221 221 221
|
||||
)
|
||||
)
|
||||
)
|
||||
|
||||
fn hideNode =
|
||||
(
|
||||
if selection != undefined then
|
||||
(
|
||||
for obj in selection do
|
||||
(
|
||||
sceneview.tv.SelectedNode = (sceneview.tv.nodes.Find obj.name true)[1]
|
||||
sceneview.tv.selectednode.checked = false
|
||||
)
|
||||
)
|
||||
)
|
||||
|
||||
fn unhideNode =
|
||||
(
|
||||
if selection != undefined then
|
||||
(
|
||||
for obj in selection do
|
||||
(
|
||||
sceneview.tv.SelectedNode = (sceneview.tv.nodes.Find obj.name true)[1]
|
||||
sceneview.tv.selectednode.checked = true
|
||||
)
|
||||
)
|
||||
)
|
||||
|
||||
dotNetControl tv "TreeView" width:290 height:565 align:#center
|
||||
button layerM "Layer Manager" offset:[-9,0] Align:#left
|
||||
label info " (X) + all (C/V) +- children" offset:[5,-22]
|
||||
|
||||
on layerM pressed do
|
||||
(
|
||||
macros.run "layers" "layermanager"
|
||||
)
|
||||
|
||||
on tv Click arg do
|
||||
(
|
||||
hitNode = tv.GetNodeAt (dotNetObject "System.Drawing.Point" arg.x arg.y)
|
||||
if hitNode != undefined do
|
||||
try(select hitNode.tag.value) catch(max select none)
|
||||
)
|
||||
|
||||
on tv AfterCheck arg do
|
||||
(
|
||||
try (arg.node.tag.value.isHidden = not arg.node.checked)catch()
|
||||
)
|
||||
|
||||
on tv AfterLabelEdit arg do
|
||||
(
|
||||
if arg.label != undefined then
|
||||
(
|
||||
arg.node.tag.value.name = arg.label
|
||||
)
|
||||
)
|
||||
|
||||
|
||||
on tv keyUp arg do
|
||||
(
|
||||
--print arg.keyValue
|
||||
case arg.keyValue of
|
||||
(
|
||||
67: tv.selectedNode.collapse() -- c key
|
||||
88: tv.expandAll() -- x key
|
||||
86: tv.selectedNode.ExpandAll() -- v key
|
||||
13: tv.selectedNode.beginEdit() -- enter key
|
||||
113: tv.selectedNode.beginEdit() -- F2
|
||||
116: refresh() -- F5
|
||||
)
|
||||
)
|
||||
|
||||
fn OnClick sender args =
|
||||
(
|
||||
--print sender.Text
|
||||
case sender.Text of
|
||||
(
|
||||
"Expand branches": if tv.selectedNode != undefined then tv.selectedNode.ExpandAll()
|
||||
)
|
||||
)
|
||||
|
||||
on tv beforeSelect arg do
|
||||
(
|
||||
colorTest = dotNetClass "System.Drawing.Color"
|
||||
try (sceneview.tv.selectednode.backColor = colorTest.FromArgb 255 196 196 196) catch()
|
||||
)
|
||||
|
||||
on tv nodeMouseClick arg do
|
||||
(
|
||||
if arg.button == tv.mousebuttons.right then
|
||||
(
|
||||
contextMenu = dotNetObject "System.Windows.Forms.ContextMenu"
|
||||
contextMenu.MenuItems.Clear()
|
||||
dotnet.addeventhandler (contextMenu.MenuItems.Add("Select all children")) "Click" OnClick
|
||||
dotnet.addeventhandler (contextMenu.MenuItems.Add("Expand branches")) "Click" OnClick
|
||||
pointTest = (dotNetObject "System.Drawing.Point" arg.x arg.y)
|
||||
contextmenu.Show tv pointTest
|
||||
)
|
||||
)
|
||||
|
||||
on sceneView open do
|
||||
(
|
||||
initTreeView tv
|
||||
fillInTreeView tv
|
||||
tv.topnode.expand()
|
||||
callbacks.addScript #nodeCreated "sceneView.refresh()" id:#upDateSceneView
|
||||
callbacks.addScript #nodePostDelete "sceneView.refresh()" id:#upDateSceneView
|
||||
callbacks.addScript #nodeRenamed "sceneView.refresh()" id:#upDateSceneView
|
||||
callbacks.addScript #postNodesCloned "sceneView.refresh()" id:#upDateSceneView
|
||||
callbacks.addScript #postMirrorNodes "sceneView.refresh()" id:#upDateSceneView
|
||||
callbacks.addScript #selectionSetChanged "sceneView.getSelectedNode()" id:#upDateSceneView
|
||||
callbacks.addScript #nodeHide "sceneView.hideNode()" id:#upDateSceneView
|
||||
--callbacks.addScript #nodeUnhide "sceneView.unhideNode()" id:#upDateSceneView
|
||||
callbacks.addScript #sceneUndo "sceneView.refresh()" id:#upDateSceneView
|
||||
callbacks.addScript #sceneRedo "sceneView.refresh()" id:#upDateSceneView
|
||||
)
|
||||
|
||||
on sceneView close do
|
||||
(
|
||||
callbacks.removeScripts id:#upDateSceneView
|
||||
)
|
||||
|
||||
on sceneView resized size do
|
||||
(
|
||||
size1 = size as string
|
||||
size2 = filterstring size1 "[],"
|
||||
layerM.pos = [4, (sceneView.height - 26)]
|
||||
info.pos = [100, (sceneView.height - 23)]
|
||||
tv.height = ((size2[2] as float) - 35)
|
||||
tv.width = ((size2[1] as float) - 10)
|
||||
)
|
||||
)
|
||||
|
||||
createDialog sceneView 300 600 style:#(#style_resizing, #style_titlebar, #style_border, #style_sysmenu)
|
||||
|
||||
Reference in New Issue
Block a user