深入探索Silverlight图形与动画技术

### 深入探索Silverlight图形与动画技术 #### 1. 图形效果与像素着色器 在图形处理中，目前没有用于分组效果的类，这意味着一次只能对一个元素应用单一效果。不过，有时可以通过将效果添加到更高级别的容器来模拟多种效果，例如先对 `TextBlock` 使用投影效果，再将其放入使用模糊效果的 `StackPanel` 中。但这种方法会增加渲染工作并降低性能，因此应尽量寻找能满足所有需求的单一效果。 `ShaderEffect` 类并非现成可用的效果类，它是一个必须继承的类，可用于创建自定义像素着色器。像素着色器的逻辑并非直接用 VB 代码编写，而是使用高级着色器语言（HLSL），这是 DirectX 的一部分。由于 DirectX 和 HLSL 已经存在多年，图形开发者已经创建了大量的像素着色器例程可供使用。 创建像素着色器的步骤如下： 1. 安装 DirectX SDK（访问 http://msdn.microsoft.com/en-us/directx/aa937788.aspx），使用 `fxc.exe` 命令行工具将 HLSL 代码编译为 `.ps` 文件。 2. 更便捷的方式是使用免费的 Shazzam 工具（http://shazzam-tool.com），它提供了 HLSL 文件的编辑器，并能在示例图像上进行测试，还包含多个示例像素着色器。 3. 将编译好的 `.ps` 文件添加到现有的 Silverlight 项目中，在解决方案资源管理器中选择该文件，将其生成操作设置为“资源”。 4. 创建一个继承自 `ShaderEffect` 的自定义类并使用该资源，示例代码如下： ```vb Public Class CustomEffect Inherits ShaderEffect Public Sub New() ' Use the URI syntax described in Chapter 6 to refer to your resource. ' AssemblyName;component/ResourceFileName Dim pixelShaderUri As New Uri( _ "CustomEffectTest;component/Effect.ps", UriKind.Relative) ' Load the information from the.ps file. PixelShader = New PixelShader() PixelShader.UriSource = pixelShaderUri End Sub End Class ``` 在页面中使用自定义像素着色器的步骤如下： 1. 添加命名空间映射： ```xml <UserControl xmlns:local="clr-namespace:CustomEffectTest" ...> ``` 2. 创建自定义效果类的实例并设置元素的 `Effect` 属性： ```xml <Image> <Image.Effect> <local:CustomEffect></local:CustomEffect> </Image.Effect> </Image> ``` 如果像素着色器需要输入参数，则需要通过调用 `RegisterPixelShaderSamplerProperty()` 方法创建相应的依赖属性。对于非专业图形程序员，获取更高级像素着色器的最佳方法是寻找现有的 HLSL 示例或第三方 Silverlight 组件，如免费的 Windows Presentation Foundation 像素着色器效果库（http://codeplex.com/wpffx）。 #### 2. `WriteableBitmap` 类的使用 之前学习了使用 `Image` 元素显示位图，但这种方式是单向的，无法创建或编辑位图信息。`WriteableBitmap` 类继承自 `BitmapSource`，与只读的 `BitmapSource` 不同，它是一个可修改的像素数组，提供了更多可能性。 ##### 2.1 生成位图 使用 `WriteableBitmap` 手动创建整个位图的过程虽然看似繁琐，但对于创建分形或可视化音乐、科学数据等场景非常有用。具体步骤如下： 1. 创建内存中的位图，指定其宽度和高度，示例代码： ```vb Dim wb As New WriteableBitmap(CInt(Me.ActualWidth), CInt(Me.ActualHeight)) ``` 2. 填充像素，使用 `Pixels` 属性，它是一个一维像素数组。通过公式 `y * wb.PixelWidth + x` 找到特定像素，示例代码： ```vb wb.Pixels(100 * wb.PixelWidth + 40) = ... ``` 每个像素的颜色由一个无符号整数表示，可通过位运算将 alpha、红、绿、蓝值组合，示例代码： ```vb Dim alpha As Integer = 255 Dim red As Integer = 100 Dim green As Integer = 200 Dim blue As Integer = 75 Dim pixelColorValue As Integer pixelColorValue = (alpha << 24) Or (red << 16) Or (green << 8) Or (blue << 0) wb.Pixels(p ```