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() --这句是关闭