玩点效果C#透明+++??/效果 字节流?

stillness

C#透明效果
字节流运算集

1. using System;
   
2. using System.Collections.Generic;
   
3. using System.ComponentModel;
   
4. using System.Data;
   
5. using System.Drawing;
   
6. using System.Linq;
   
7. using System.Text;
   
8. using System.Windows.Forms;
   
9. using SkinSharp;
   
10. using System.IO;
    
11. namespace My_Software
    
12. {
    
13.     public partial class Form1 : Form
    
14.     {
    
15.         public Form1()
    
16.         {
    
17.             InitializeComponent();
    
18.         }
    
19.         SkinH_Net Skin_Net = new SkinH_Net();
    
20.         int Hwnd = new int();
    
21.         [System.Runtime.InteropServices.DllImport("user32.dll",EntryPoint= "MessageBoxA")]
    
22.         private static extern int MessageBoxA(int Hwnd, string Tip, string Text, int val);
    
23.         // 信息框
    
24.         [System.Runtime.InteropServices.DllImport("user32.dll", EntryPoint = "FindWindowA")]
    
25.         private static extern int FindWindowA(string lpClassName, string lpWindowName);
    
26.         // Class&&Name 取Form句柄
    
27.         [System.Runtime.InteropServices.DllImport("SetDiaphaneity.dll", EntryPoint = "SetDiaphaneity")]
    
28.         private static extern int SetDiaphaneity(int a, int b);
    
29.         // Class&&Name 取Form句柄
    
30.         [System.Runtime.InteropServices.DllImport("user32.dll", EntryPoint = "SetWindowPos")]
    
31.         private static extern int SetWindowPos(int Long, int LongA, int LongB, int LongC, int LongD, int LongE, int LongF);
    
32.         // 设置窗口位置
    
33.         private void Form1_Load(object sender, EventArgs e)
    
34.         {
    
35.             this.Text = "使用信息框弹出消息小案例";
    
36.             this.button1.Text = "Open(&O)";
    
37.             this.openFileDialog1.FileName = "（请选择您欲选择的文件）";
    
38.             string namespaceAbc = ".she";
    
39.             Random ran=new Random();
    
40.             int Random = ran.Next(1, 3); // 取随机数不知是否为置入随机数种子为系统时间这个Random的置随机数种子命令函数不知道望高人指点一二
    
41.             switch (Random) // 80%语言switch不可以直接提供返回值函数求值需装入变量后继续
    
42.             {
    
43.                 case 1:
    
44.                     namespaceAbc = ("Aero").ToString() + (string)namespaceAbc;
    
45.                     break;
    
46.                 case 2:
    
47.                     namespaceAbc = ("QQ2008").ToString() + (string)namespaceAbc;
    
48.                     break;
    
49.                 default:
    
50.                     namespaceAbc = ("skinh").ToString() + (string)namespaceAbc;
    
51.                     break;
    
52.             }
    
53.             this.Skin_Net.AttachEx(namespaceAbc, "");
    
54.             this.Skin_Net.SetAero(-1);
    
55.             this.openFileDialog1.Filter = "*.Txt|*.txt|*.Ini|*.ini|*.Cfg|*.cfg|*.Inf|*.inf|*.All|*.*"; // 对话框文件过滤器
    
56.             string []Cm=new string [2];
    
57.             Cm[1]=this.Text;
    
58.             Hwnd = FindWindowA(Cm[0], Cm[1]);
    
59.             this.openFileDialog1.Title = "OpenFileDialog";
    
60.             this.openFileDialog1.DefaultExt = "";
    
61.             SetTouMing(Hwnd,-1,128,2);
    
62.             // SetDiaphaneity(Hwnd, 188); 额如果使用该接口函数那么就得程序挂起
    
63.             SetWindowPos(Hwnd, -1, 0, 0, 0, 0, 3);
    
64.             // 设置窗口总在最前
    
65.             // 使用本代码可能造成窗口标题栏脱变
    
66.             // 存在于Skin#下、
    
67.             AnimateWindow(Hwnd, 1288, 22);
    
68. 
    
69.         }
    
70. 
    
71.         [System.Runtime.InteropServices.DllImport("user32.dll", EntryPoint = "GetWindowLongA")]
    
72.         private static extern int GetWindowLongA(int hwnd, int nIndex);
    
73.         // 获取窗口信息
    
74.         [System.Runtime.InteropServices.DllImport("user32.dll", EntryPoint = "SetWindowLongA")]
    
75.         private static extern int SetWindowLongA(int hwnd, int nIndex, int dwNewLong);
    
76.         // 设置窗口信息
    
77.         [System.Runtime.InteropServices.DllImport("user32.dll", EntryPoint = "SetLayeredWindowAttributes")]
    
78.         private static extern int SetLayeredWindowAttributes(int hwnd, int crKey, int alrf, int dwFlags);
    
79.         // 设置透明函数
    
80.         [System.Runtime.InteropServices.DllImport("user32.dll", EntryPoint = "AnimateWindow")]
    
81.         private static extern int AnimateWindow(int hwnd, int dwTime, int dwFlags);
    
82.         // 动画窗口
    
83.         bool SetTouMing(int CHwnd,int CrKey,int bAlpha,int dwFlags)
    
84.         {
    
85.             int Ret = new int();
    
86.             Ret = GetWindowLongA(CHwnd, -20);
    
87.             Ret = Ret | 524288;
    
88.             SetWindowLongA(CHwnd, -20, Ret);
    
89.             if (SetLayeredWindowAttributes(CHwnd, CrKey, bAlpha, dwFlags) != 0)
    
90.             {
    
91.                 return true;
    
92.             }
    
93.             return false;
    
94.         }
    
95.         [System.Runtime.InteropServices.DllImport("user32.dll", EntryPoint = "FlashWindow")]
    
96.         private static extern int FlashWindow(int Hwnd, bool dwY);
    
97.         private void button1_Click(object sender, EventArgs e)
    
98.         {
    
99.             string flieName;
    
100.             if (this.openFileDialog1.ShowDialog() == DialogResult.OK) // 对话框.打开显示 == 对话框返回如果是确认钮 所谓 True
     
101.             {
     
102.                 flieName = this.openFileDialog1.FileName; // 将对话框中的文件名返回到变量
     
103.                 StreamReader flieStream = new StreamReader(flieName, System.Text.Encoding.Default); // 初始化字节集流对象..编码为系统当前默认Ausic码
     
104.                 flieName = flieStream.ReadToEnd()+Environment.NewLine; //从首读到尾 And 换行符
     
105.                 int rtr = MessageBoxA(Hwnd, flieName, "信息:", 64 + 1);
     
106.                 // if rtr = 1 确认被单击 And 2 取消==关闭钮
     
107.                 flieStream.Close();// 关闭字节流对象
     
108.                 FlashWindow(Hwnd, true);
     
109.             }
     
110.             else
     
111.             {
     
112.                 MessageBoxA(Hwnd, "您点击了取消所以执行Commonde失败", "信息:", 64);
     
113.             }
     
114.         }
     
115.     }
     
116. }
     

复制代码

My Software.rar (440.57 KB, 下载次数: 6)

2012-11-30 19:36 上传

点击文件名下载附件

微软粉

谢谢 正需要 看看

我是盼盼哟

哇哦，LZ大手子哇。{:soso_e102:}

zmlzj

下载后VS2008打不开

longtengxp

哦...这个...偶昨天就看了....

stillness

记忆是座荒岛 发表于 2012-11-30 19:45
刷主题必备法宝

// SetDiaphaneity(Hwnd, 188); 额如果使用该接口函数那么就得程序挂起
直接调用易语言的支持库有概率吗

记忆是座荒岛

             刷主题必备法宝