2011年4月8日 星期五

Direct2D (33) : 通过 ID2D1BitmapRenderTarget 绘制背景网格

万一| 万一的 Delphi 博客 |15:52:00

如果要从内存绘图并建立 ID2D1BitmapBrush，最好通过 ID2D1BitmapRenderTarget。{相关方法} TDirect2DCanvas.RenderTarget.CreateCompatibleRenderTarget(); //建立 ID2D1BitmapRenderTarget ID2D1BitmapRenderTarget.GetBitmap(); //从 ID2...

Direct2D (32) : 把几何图形网格化为若干三角形 - ID2D1Geometry.Tessellate()

万一| 万一的 Delphi 博客 |13:25:00

{相关接口} ID2D1TessellationSink //用于接收 ID2D1Geometry.Tessellate() 方法输出的三角形数组 ID2D1Mesh //是使用 ID2D1TessellationSink 填充的网格，它负责 Open ID2D1TessellationSink {相关方法} TDirect2DCanvas.RenderTarget.CreateMesh() //...

dexplore.exe shut down fixer v2

Embarcadero| CodeCentral Delphi Submissions |12:31:40

A lot of people (myself included) have had problems with a process called dexplore.exe stopping windows from shutting down. One way this can happen is when Embarcadero Rad Studio uses Microsoft’s dexplore help system – when Rad Studio...

Direct2D (31) : 命中测试 - ID2D1Geometry.FillContainsPoint()、StrokeContainsPoint()

万一| 万一的 Delphi 博客 |11:15:00

uses Direct2D, D2D1; const penWidth = 25; var iGeometry: ID2D1EllipseGeometry; procedure TForm1.FormCreate(Sender: TObject); begin D2DFactory.CreateEllipseGeometry(D2D1Ellipse(D2D1PointF(120, 90), 80, 50), iGeometry); end; procedure TForm...

使用DxVcl为Python的飞信库写一个简单的GUI

不得闲| 得闲笔记 |10:51:00

    Python的好处，就是类库超多，多到只有你想不到的库，而没有你想到的，他却没有的库。所以飞信，在Python下也有一个开源的类库，这个就是PyFetion，他自己有带一个Demo，不过是一个CGI的程序，没有窗口界面，于是用之前Delphi写的DxVcl为这个飞信...