Delphi 与 DirectX 之 DelphiX(33): TDIB.SmoothRotateWrap();
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXPa...
阅读全文
posted @
2009-01-16 15:07
万一
阅读(1441)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(32): TDIB.FishEye();
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXPa...
阅读全文
posted @
2009-01-16 15:00
万一
阅读(1497)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(31): TDIB.Twist();
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXPa...
阅读全文
posted @
2009-01-16 14:56
万一
阅读(1379)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(30): TDIB.AddGradiantNoise();
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXPa...
阅读全文
posted @
2009-01-16 14:38
万一
阅读(1357)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(29): TDIB.AddMonoNoise();
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXPa...
阅读全文
posted @
2009-01-16 14:31
万一
阅读(1352)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(28): TDIB.Emboss;
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXPa...
阅读全文
posted @
2009-01-16 14:27
万一
阅读(1491)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(27): TDIB.Spray();
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXPa...
阅读全文
posted @
2009-01-16 14:23
万一
阅读(1589)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(26): TDIB 的主要载体 - TDXPaintBox
摘要：TDXPaintBox 和 TPaintBox 一样拥有重要的属性 Canvas; 现在要关心的是 TDXPaintBox 另一个主要属性: DIB(TDIB 对象); 在下面学习 TDIB 时, 应该会大量用到这个 TDXPaintBox. 虽然叫它 TDXPaintBox, 但我觉得它更像 TImage, 只是把 TImage.Picture 换做了 TDXPaintBox.DIB. ...
阅读全文
posted @
2009-01-16 12:52
万一
阅读(2217)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(25): TDIB.Blur();
摘要：DelphiX 的组件面板上, 第二个就是 TDXDIB; TDXDIB.DIB 是 TDXDIB 的唯一属性(其他是 TComponent 固有的); TDXDIB.DIB 属性是一个 TDIB 对象; TDIB 和 TBitmap 一样都直接继承自 TGraphic, 是一个图片容器, 它还有个别名: TDIBitmap; TDIB 和 TDXDraw.Surface 还有 TDX...
阅读全文
posted @
2009-01-16 11:13
万一
阅读(2138)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(24): TDirectDrawSurface.Blt()、BltFast();
摘要：这两个函数可不是一般的麻烦, 特别是 Blt(); 暂时搞不彻底, 这是初步尝试的例子: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DXDraws, StdCtrls, DirectX; ...
阅读全文
posted @
2009-01-15 23:00
万一
阅读(2543)
推荐(1) 编辑
Delphi 与 DirectX 之 DelphiX(23): TDirectDrawSurface.Blur;
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DXDraws, StdCtrls; type TForm1 = class(TForm) DXDraw1: TDXDr...
阅读全文
posted @
2009-01-15 20:47
万一
阅读(1974)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(22): TDirectDrawSurface.Noise();
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DXClass, DXDraws, ComCtrls; type TForm1 = class(TForm) DXDra...
阅读全文
posted @
2009-01-15 18:26
万一
阅读(1602)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(21): TDirectDrawSurface 的绘图命令
摘要：TDirectDrawSurface.PokeLine(); TDirectDrawSurface.PokeLinePolar(); TDirectDrawSurface.PokeBox(); TDirectDrawSurface.PokeBlendPixel(); TDirectDrawSurface.PokeCircle(); TDirectDrawSurface.PokeEllipse(...
阅读全文
posted @
2009-01-15 18:10
万一
阅读(3108)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(20): TDirectDrawSurface.FillRect...
摘要：TDirectDrawSurface.Fill(); TDirectDrawSurface.FillRect(); TDirectDrawSurface.FillRectAlpha(); TDirectDrawSurface.FillRectAdd(); TDirectDrawSurface.FillRectSub(); 其中 Fill 在前面每个例子中都有用到; 另外注意: 这几个函数中的...
阅读全文
posted @
2009-01-15 10:07
万一
阅读(2540)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(19): 绘图表面(TDirectDrawSurface)如何加载图片
摘要：上个例子中 TDirectDrawSurface 是从 TDXImageList 中获取的图片, 其实 TDirectDrawSurface 自己获取图片的方法有很多: TDirectDrawSurface.LoadFromFile(); TDirectDrawSurface.LoadFromStream(); TDirectDrawSurface.LoadFromGraphic(); TDi...
阅读全文
posted @
2009-01-14 21:07
万一
阅读(3429)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(18): TDXDraw 中描绘图片的命令
摘要：前面的绘图命令都是来自 TDXImageList, 准确地说是来自 TDXImageList.Items 所包含的 TPictureCollectionItem 对象. 那 TDXDraw 本身有没有绘图命令呢? TDXDraw 本身没有绘图命令, 但它的有绘图表面(TDirectDrawSurface), 譬如: Surface、Primary; TDXDraw 的绘图表面有更多的绘图命令,...
阅读全文
posted @
2009-01-14 16:09
万一
阅读(3389)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(17): TPictureCollectionItem.PatternWidth、PatternHeight
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DXDraws, StdCtrls; type TForm1 = class(TForm) DXDraw1: TDXDr...
阅读全文
posted @
2009-01-14 15:26
万一
阅读(1727)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(16): DXImageList1.Items.Find();
摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DXDraws, StdCtrls; type TForm1 = class(TForm) DXDraw1: TDXDr...
阅读全文
posted @
2009-01-14 13:59
万一
阅读(2064)
推荐(0) 编辑
Delphi 与 DirectX 之 DelphiX(15): TPictureCollectionItem.DrawWaveX、DrawWaveY ...
摘要：此类函数有: TPictureCollectionItem.DrawWaveX(); TPictureCollectionItem.DrawWaveXAdd(); TPictureCollectionItem.DrawWaveXAlpha(); TPictureCollectionItem.DrawWaveXSub(); TPictureCollectionItem.DrawWaveY(); ...
阅读全文
posted @
2009-01-14 12:21
万一
阅读(2142)
推荐(1) 编辑
Delphi 与 DirectX 之 DelphiX(14): TPictureCollectionItem.DrawRotate...
摘要：TPictureCollectionItem.DrawRotate(); 的同类函数还有: TPictureCollectionItem.DrawRotateAdd(); TPictureCollectionItem.DrawRotateSub(); TPictureCollectionItem.DrawRotateAlpha(); TPictureCollectionItem.DrawRot...
阅读全文
posted @
2009-01-13 22:46
万一
阅读(2092)
推荐(0) 编辑
管理