冀公网安备 13098202000212号 2011年4月8日 星期五
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为这个飞信...
2011年4月7日 星期四
Direct2D (30) : 判断几何对象的关系 - ID2D1Geometry.CompareWithGeometry()
万一| 万一的 Delphi 博客 |22:32:00
{相关常量} //D2D1_GEOMETRY_RELATION = type Integer; D2D1_GEOMETRY_RELATION_UNKNOWN = 0; //未知 D2D1_GEOMETRY_RELATION_DISJOINT = 1; //不相交 D2D1_GEOMETRY_RELATION_IS_CONTAINED = 2; //属于 D2D1_GEOMETRY_RELATION_CONTAINS = 3; //包...
Direct2D (29) : 简化曲线到直线 - ID2D1Geometry.Simplify()
万一| 万一的 Delphi 博客 |17:32:00
uses Direct2D, D2D1; procedure TForm1.FormPaint(Sender: TObject); var cvs: TDirect2DCanvas; iEllipseGeometry: ID2D1EllipseGeometry; iPathGeometry: ID2D1PathGeometry; iGeometrySink: ID2D1GeometrySink; ptCenter: TPoint; begin ptCenter :...
Direct2D (28) : 获取几何图形的面积、线总长度和指定位置的点坐标
万一| 万一的 Delphi 博客 |17:08:00
uses Direct2D, D2D1; procedure TForm1.FormPaint(Sender: TObject); var cvs: TDirect2DCanvas; iEllipseGeometry: ID2D1EllipseGeometry; area,length: Single; rPointF1,rPointF2: TD2DPoint2f; ptCenter: TPoint; begin ptCenter := Point(ClientW...
Direct2D (27) : 获取几何图形的轮廓 - ID2D1Geometry.Outline()
万一| 万一的 Delphi 博客 |15:16:00
uses Direct2D, D2D1; procedure TForm1.FormPaint(Sender: TObject); var cvs: TDirect2DCanvas; iEllipseGeometry: ID2D1EllipseGeometry; iTransformedGeometrys: array[0..7] of ID2D1TransformedGeometry; iGeometryGroup: ID2D1GeometryGroup; iGeo...
Code page-aware Hunspell wrapper (v1.1.2)
Embarcadero| CodeCentral Delphi Submissions |12:54:40
Hunspell is the open source spell checking engine used in OpenOffice; this wrapper class calls into a DLL compiled from the standard Hunspell sources, with one such DLL (built using v1.2.8 of Hunspell) included in the ZIP. The wrapper itself is th...
Direct2D (26) : 获取几何图形的边界
万一| 万一的 Delphi 博客 |12:24:00
{相关方法} ID2D1Geometry.GetBounds(); //获取边界矩形 ID2D1Geometry.GetWidenedBounds(); //获取包含画笔区域的边界矩形测试代码：uses Direct2D, D2D1; procedure TForm1.FormPaint(Sender: TObject); var cvs: TDirect2DCanvas; iPathGeometry: ID2...
Direct2D (25) : 将画笔线条所占用的区域转换为路径 - ID2D1PathGeometry.Widen()
万一| 万一的 Delphi 博客 |11:34:00
uses Direct2D, D2D1; procedure TForm1.FormPaint(Sender: TObject); var cvs: TDirect2DCanvas; iPathGeometry1,iPathGeometry2: ID2D1PathGeometry; iGeometrySink: ID2D1GeometrySink; begin {建立一个几何对象 iPathGeometry1} D2DFactory.CreateEll...
Direct2D (25) : 将画笔线条所占用的区域转换为路径 - ID2D1Geometry.Widen()
万一| 万一的 Delphi 博客 |11:34:00
uses Direct2D, D2D1; procedure TForm1.FormPaint(Sender: TObject); var cvs: TDirect2DCanvas; iPathGeometry1,iPathGeometry2: ID2D1PathGeometry; iGeometrySink: ID2D1GeometrySink; begin {建立一个几何对象 iPathGeometry1} D2DFactory.CreateEll...
BusinessSkinForm v. 9.31
Embarcadero| CodeCentral Delphi Submissions |07:00:18
BusinessSkinForm VCL library help you to create applications with skins support for forms, menus, hints, many standard and DB controls. You can create your skins with special editor. Develop your business applications with BusinessSkinForm VCL!Fea...
DynamicSkinForm v. 12.31
Embarcadero| CodeCentral Delphi Submissions |06:46:29
DynamicSkinForm VCL library help you to create applications with skins. Skins support for forms, menus, hints, many standard and non-standard original controls. Skins with many objects, effects help you to create standard and non-standard cool ap...
Building & Tuning SQL Server Database-Driven Applications
Embarcadero| EDN Delphi Feed |03:52:32
2011年4月6日 星期三
Direct2D (24) : 合并几何对象
万一| 万一的 Delphi 博客 |20:39:00
合并通过 ID2D1Geometry.CombineWithGeometry() 完成，但返回的是 ID2D1SimplifiedGeometrySink(ID2D1GeometrySink 的父对象)；需要把 ID2D1SimplifiedGeometrySink 添加到 ID2D1PathGeometry 才能使用。uses Direct2D, D2D1; procedure TForm1.FormPaint(Sender: T...