本例效果图:


代码文件:

unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, DIB, StdCtrls;typeTForm1 = class(TForm)DXPaintBox1: TDXPaintBox;Button1: TButton;Button2: TButton;procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
constImgPath1 = 'C:\Temp\DX.jpg';
beginDXPaintBox1.DIB.LoadFromFile(ImgPath1);DXPaintBox1.Width := DXPaintBox1.DIB.Width;DXPaintBox1.Height := DXPaintBox1.DIB.Height;DXPaintBox1.Repaint;
end;procedure TForm1.Button2Click(Sender: TObject);
beginDXPaintBox1.DIB.DoSaturation(8);DXPaintBox1.Repaint;
end;end.

Delphi 与 DirectX 之 DelphiX(52): TDIB.DoSaturation();相关推荐

  1. Delphi 与 DirectX 之 DelphiX(25): TDIB.Blur();

    DelphiX 的组件面板上, 第二个就是 TDXDIB; TDXDIB.DIB 是 TDXDIB 的唯一属性(其他是 TComponent 固有的); TDXDIB.DIB 属性是一个 TDIB 对 ...

  2. Delphi 与 DirectX 之 DelphiX(89): TDIB.DrawAlphaMask();

    本例效果图: 代码文件: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Contr ...

  3. Delphi 与 DirectX 之 DelphiX(95): TDIB.x

    //让 TDIB 的这些特效烦透了: 多.还重复.又不完善; 还没有测试或测试失败的方法: procedure DrawShadow(SrcDIB: TDIB; X, Y, Width, Height ...

  4. Delphi 与 DirectX 之 DelphiX(33): TDIB.SmoothRotateWrap();

    本例效果图: 代码文件: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Contr ...

  5. Delphi 与 DirectX 之 DelphiX(93): TDIB.DrawDarken();

    本例效果图: 代码文件: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Contr ...

  6. Delphi 与 DirectX 之 DelphiX(83): TDIB.FilterLine()、FilterRect();

    本例效果图: 代码文件: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Contr ...

  7. Delphi 与 DirectX 之 DelphiX(77): TDIB.Distort();

    本例效果图: 代码文件: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Contr ...

  8. Delphi 与 DirectX 之 DelphiX(35): TDIB.Saturation();

    本例效果图: 代码文件: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Contr ...

  9. Delphi 与 DirectX 之 DelphiX(72): TDIB.SephiaEffect();

    为什么80%的码农都做不了架构师?>>>    本例效果图: 代码文件: unit Unit1;interfaceusesWindows, Messages, SysUtils, V ...

最新文章

  1. matlab里面板有什么作用,MATLAB轻松享受GPU的强大功能
  2. 属于PHP语言结构的是,PHP语言结构
  3. bootstrap grid php,bootstrap grid用法
  4. wpf esc key 检测不到_自己动手丰衣足食！想让你的车能检测和识别物体？试试这个实验...
  5. icinga-report+jasperserver+icinga-web安装步骤
  6. windows安装解压版mysql
  7. 论文笔记_S2D.35-2017-IROS_利用CNNs联合预测RGB图像的深度、法线和表面曲率
  8. 用HTML语言怎样打印出九九乘法表,jsp/javascript打印九九乘法表代码
  9. 你认识细菌吗？一文带你读懂了解它
  10. 解决Charles手机抓包出现unknown和乱码的问题
  11. 手机控制NodeMCU实现远程电脑开关机
  12. 【图像处理】 均值滤波、中值滤波和高斯滤波
  13. 常用DEBUG命令及使用详解
  14. C++ 成员模板（member template）
  15. Fabric.js 图形标注
  16. php怎么读取excel里的数据类型,php读取excel表格数据-对PHPExcel一些简单的理解 及怎么读取单元格数据...
  17. apache 配置可下载文件
  18. 2014年12月23号 中兴通讯南京研发中心实习生面试
  19. Java俄罗斯方块思想与实现
  20. 网站页面布局这样设计才更好

热门文章

  1. Vicious Keyboard CodeForces - 801A (暴力+模拟)
  2. Linux服务器出现java.net.UnknownHostException 异常处理
  3. 学习 FPGA之前的基础知识
  4. 乱谈Qt事件循环嵌套
  5. Windows7 设置 Java环境变量
  6. 【转】分享 97年世界编程大赛第一名写的程序
  7. USACO 2.2.2 Subset Sums解题报告
  8. WP8中 ListBox x下拉刷新 以及 ScrollViewer/ListBox 的ManipulationCompleted 失效的解决方案
  9. linux 下使用 curl 访问带多参数，GET掉参数解决方案
  10. MySQL遇到Deadlock found when trying to get lock，解决方案