MAX DotNet 透明界面效果代码实例 转自CG++原帖

MAX DotNet 透明界面效果代码实例 转自CG++

这是一段max script中使用微软的.Net框架实现透明界面的实例小样,

前提你的电脑除了需要装Max以外，还需要有.net框架哦 建议直接装个4.5个版本就行。

做技美的同学可以看下这个效果，能让你的插件脚本高大上不少哦！

使用方法：直接赋值以下代码–>Max Script –>New Script 粘贴进去 然后Ctrl + E 就可以运行出来那个效果啦！

------------------------------------------------------------------------------
-- 本代码由MAX DotNet 编辑器输出
-- 对此文件的更改可能会导致不正确的行为，
-- 并且如果重新生成代码，这些更改将会丢失。
-- 生成此代码的工具为测试版本，作者并不能保证代码的完全可用性。
-- 如发现错误或有任何好建议欢迎加群探讨：364518591
-- BY：蓬荜生徽 2015年元旦发布~~
------------------------------------------------------------------------------
Form1 = dotNetObject "MaxCustomControls.MaxForm"
button1 = dotNetObject "System.Windows.Forms.Button"
button2 = dotNetObject "System.Windows.Forms.Button"
button3 = dotNetObject "System.Windows.Forms.Button"
button4 = dotNetObject "System.Windows.Forms.Button"
listBox1 = dotNetObject "System.Windows.Forms.ListBox"
trackBar1 = dotNetObject "System.Windows.Forms.TrackBar"
numericUpDown1 = dotNetObject "System.Windows.Forms.NumericUpDown"
checkedListBox1 = dotNetObject "System.Windows.Forms.CheckedListBox"
-- button1
button1.BackColor = (dotNetClass "System.Drawing.Color").Black
button1.FlatStyle = (dotNetClass "System.Windows.Forms.FlatStyle").Flat
button1.ForeColor = (dotNetClass "System.Drawing.Color").Coral
button1.Location = dotNetObject "System.Drawing.Point" 12 12
button1.Name = "button1"
button1.Size = dotNetObject "System.Drawing.Size" 107 45
button1.TabIndex = 0
button1.Text = "button1"
button1.UseVisualStyleBackColor = False
-- button2
button2.BackColor = (dotNetClass "System.Drawing.Color").Black
button2.FlatStyle = (dotNetClass "System.Windows.Forms.FlatStyle").Flat
button2.ForeColor = (dotNetClass "System.Drawing.Color").Coral
button2.Location = dotNetObject "System.Drawing.Point" 12 65
button2.Name = "button2"
button2.Size = dotNetObject "System.Drawing.Size" 107 45
button2.TabIndex = 1
button2.Text = "button2"
button2.UseVisualStyleBackColor = False
-- button3
button3.BackColor = (dotNetClass "System.Drawing.Color").Black
button3.FlatStyle = (dotNetClass "System.Windows.Forms.FlatStyle").Flat
button3.ForeColor = (dotNetClass "System.Drawing.Color").Coral
button3.Location = dotNetObject "System.Drawing.Point" 12 118
button3.Name = "button3"
button3.Size = dotNetObject "System.Drawing.Size" 107 45
button3.TabIndex = 2
button3.Text = "button3"
button3.UseVisualStyleBackColor = False
-- button4
button4.BackColor = (dotNetClass "System.Drawing.Color").Black
button4.FlatStyle = (dotNetClass "System.Windows.Forms.FlatStyle").Flat
button4.ForeColor = (dotNetClass "System.Drawing.Color").Coral
button4.Location = dotNetObject "System.Drawing.Point" 12 171
button4.Name = "button4"
button4.Size = dotNetObject "System.Drawing.Size" 107 45
button4.TabIndex = 3
button4.Text = "button4"
button4.UseVisualStyleBackColor = False
-- listBox1
listBox1.BackColor = (dotNetClass "System.Drawing.Color").Black
listBox1.ForeColor = (dotNetClass "System.Drawing.Color").Yellow
listBox1.FormattingEnabled = True
listBox1.ItemHeight = 12
listBox1.Items.Add("MAX")
listBox1.Items.Add("脚本")
listBox1.Items.Add("居然可以")
listBox1.Items.Add("使用.Net")
listBox1.Items.Add("做透明的效果唉")
listBox1.Items.Add("刷新对max脚本的认知")
listBox1.Items.Add("真心不错！")
listBox1.Location = dotNetObject "System.Drawing.Point" 125 12
listBox1.Name = "listBox1"
listBox1.Size = dotNetObject "System.Drawing.Size" 120 208
listBox1.TabIndex = 4
-- trackBar1
trackBar1.BackColor = (dotNetClass "System.Drawing.Color").Black
trackBar1.Location = dotNetObject "System.Drawing.Point" 12 223
trackBar1.Name = "trackBar1"
trackBar1.Size = dotNetObject "System.Drawing.Size" 360 45
trackBar1.TabIndex = 5
-- numericUpDown1
numericUpDown1.BackColor = (dotNetClass "System.Drawing.Color").Black
numericUpDown1.ForeColor = (dotNetClass "System.Drawing.Color").YellowGreen
numericUpDown1.Location = dotNetObject "System.Drawing.Point" 252 13
numericUpDown1.Name = "numericUpDown1"
numericUpDown1.Size = dotNetObject "System.Drawing.Size" 120 21
numericUpDown1.TabIndex = 6
-- checkedListBox1
checkedListBox1.BackColor = (dotNetClass "System.Drawing.Color").Black
checkedListBox1.ForeColor = (dotNetClass "System.Drawing.Color").Aqua
checkedListBox1.FormattingEnabled = True
checkedListBox1.Items.Add("这是勾选框")
checkedListBox1.Items.Add("好不错的说")
checkedListBox1.Items.Add("想想可以用来干嘛？")
checkedListBox1.Items.Add("能做什么捏")
checkedListBox1.Items.Add("当然是选择项啦！")
checkedListBox1.Items.Add("你似不似啥？")
checkedListBox1.Location = dotNetObject "System.Drawing.Point" 252 41
checkedListBox1.Name = "checkedListBox1"
checkedListBox1.Size = dotNetObject "System.Drawing.Size" 120 180
checkedListBox1.TabIndex = 7
-- Form1
Form1.BackColor = (dotNetClass "System.Drawing.Color").LightPink
Form1.ClientSize = dotNetObject "System.Drawing.Size" 383 281
Form1.Controls.Add(checkedListBox1)
Form1.Controls.Add(numericUpDown1)
Form1.Controls.Add(trackBar1)
Form1.Controls.Add(listBox1)
Form1.Controls.Add(button4)
Form1.Controls.Add(button3)
Form1.Controls.Add(button2)
Form1.Controls.Add(button1)
Form1.FormBorderStyle = (dotNetClass "System.Windows.Forms.FormBorderStyle").SizableToolWindow
Form1.Name = "Form1"
Form1.Opacity = 0.75
Form1.ShowIcon = False
Form1.StartPosition = (dotNetClass "System.Windows.Forms.FormStartPosition").CenterScreen
Form1.Text = "Sharegm.com 亲测哦!"
Form1.TransparencyKey = (dotNetClass "System.Drawing.Color").LightPink
--         Form1.Show()
thePtr = DotNetObject "System.IntPtr" (windows.getMAXHWND())
theHwnd = DotNetObject "MaxCustomControls.Win32HandleWrapper" thePtr
Form1.Show(theHwnd)

--         Form1.Dispose() --这句是关闭