图像的百叶窗效果

1 图像的百叶窗效果 程序在最后 2 3 using System using System Collections Generic using System ComponentModel using System Data using System Drawing using System Text using System Windows Forms namespace 图像的百叶窗特效 public partial class Form1 Form public Form1 InitializeComponent Bitmap MyBitmap private void button1 Click object sender EventArgs e this openFileDialog1 ShowDialog if this openFileDialog1 FileName Trim return try 得到原始图像 Bitmap SrcBitmap new Bitmap this openFileDialog1 FileName 得到缩放后的图像 MyBitmap new Bitmap SrcBitmap this pictureBox1 Width this pictureBox1 Height this pictureBox1 Image MyBitmap catch Exception Err MessageBox Show this 打开图像任务出错 信息提示 MessageBoxButtons OK MessageBoxIcon Information private void button2 Click object sender EventArgs e 水平百叶窗 MyBitmap Bitmap this pictureBox1 Image Clone int dh MyBitmap Height 20 int dw MyBitmap Width 4 Graphics g this pictureBox1 CreateGraphics g Clear Color Gray Point mypoimt new Point 20 for int y 0 y 20 y mypoimt y X 0 mypoimt y Y y dh Bitmap bitmap new Bitmap MyBitmap Width MyBitmap Height for int i 0 i dh i for int j 0 j 20 j for int k 0 k dw k bitmap SetPixel mypoimt j X k mypoimt j Y i MyBitmap GetPixel mypoimt j X k mypoimt j Y i this pictureBox1 Refresh this pictureBox1 Image bitmap System Threading Thread Sleep 200 private void button4 Click object sender EventArgs e this Close private void button3 Click object sender EventArgs e 垂直百叶窗 MyBitmap Bitmap this pictureBox1 Image Clone int dh MyBitmap Height int dw MyBitmap Width 30 Graphics g this pictureBox1 CreateGraphics g Clear Color Gray Point mypoimt new Point 30 for int x 0 x 30 x 5 mypoimt x Y 0 mypoimt x X x dw Bitmap bitmap new Bitmap MyBitmap Width MyBitmap Height for int i 0 i dw i for int j 0 j 30 j for int k 0 k dh k bitmap SetPixel mypoimt j X i mypoimt j Y k MyBitmap GetPixel mypoimt j X i mypoimt j Y k this pictureBox1 Refresh this pictureBox1 Ima