Delphi与DirectX之DelphiX（42）: TDIB.GaussianBlur（）;

2016年07月27日 48 阅读

Delphi与DirectX之DelphiX（42）: TDIB.GaussianBlur（）;2010-10-24 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） ...

Delphi与DirectX之DelphiX（43）: TDIB.DoInvert;

2016年07月27日 50 阅读

Delphi与DirectX之DelphiX（43）: TDIB.DoInvert;2010-10-24 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） DXPai...

Delphi与DirectX之DelphiX（44）: TDIB.DoAddColorNoise（）;

2016年07月27日 48 阅读

Delphi与DirectX之DelphiX（44）: TDIB.DoAddColorNoise（）;2010-10-24 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm...

Delphi与DirectX之DelphiX（45）: TDIB.DoAddMonoNoise（）;

2016年07月27日 50 阅读

Delphi与DirectX之DelphiX（45）: TDIB.DoAddMonoNoise（）;2010-10-24 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm）...

DELPHI的通配符比较

2016年07月27日 50 阅读

DELPHI的通配符比较2010-10-31李均宇我以前以为中没有通配符的现成函数，后来找到了MatchesMask（）。以前在未找到这个函数时我曾经在处于自由状态下尚有心情时便自已动手来作一个自定义的函数来实现这个功能。程序的算法较复杂,先在子串的末尾加上‘？*’，再读取子串,查找子串中的通配符之间的字符,亦即子串中的子串,然后在源串中依次查找是否含有子串中的子串,不过实现起来还是费不少周折。这个函数实现了以下功能：1。可能大多数...

Delphi开发Web Server程序返回图像的方法

2016年07月27日 44 阅读

Delphi开发Web Server程序返回图像的方法2010-10-31Internet/Intranet在九十年代可能是最流行的计算机术语了，不管是计算机行业内的人士还是计算机外的人士，都会使用Internet/Intranet，有的查资料，有的是宣传自己和公司，甚至有许多以前从没有想到用Internet的东西现在也在用Internet来解决，比如有的程控数字计算机维护用Internet来解决。在这一切应用之中，基于Web Server的应用程序的开发...

Delphi下汉字输入法的编程及使用

2016年07月27日 48 阅读

Delphi下汉字输入法的编程及使用2010-10-31许多Windows应用程序的中西文录入界面中，中西文的录入需要反复切换汉字输入法，这样使用起来非常麻烦，下面来介绍一种比较简便的解决方法。本文的程序设计环境为Delphi Client/Server Suit Ver 3.0（以下简称 3.0）和中文Windows 95。1．Delphi下的Imename、Imemode属性在Delphi 3.0中的Tedit、Tmemo、TmaskEdit等编辑元件...

Delphi制作带图标的弹出式选单

2016年07月27日 45 阅读

Delphi制作带图标的弹出式选单2010-10-31Windows界面的一大特色就是显示丰富多彩的图标，图标不仅美化了Windows的桌面，而且便于直观的操作，给用户带来了极大的方便。在设计程序界面时，Windows风格是很好的参考。一般提供两种设置图标的方法，一个是在Project Options 中指定应用程序的图标，另一个是在Object Inspector 的properties页中提供Icon特性。如果想设计出像Windows开始选单那样美丽的...

DELPHI中的静态虚拟及动态方法函数的区别

2016年07月27日 51 阅读

DELPHI中的静态虚拟及动态方法函数的区别2010-10-311、静态方法是方法的缺省类型，对它就像对通常的过程和函数那样调用，编译器知道这些方法的地址，所以调用一个静态方法时它能把运行信息静态地链接进可执行文件，所以，静态方法速度最快，但它们却不能被覆盖来支持多态性。2、虚拟方法和静态方法的调用方式相同。由于虚拟方法能被覆盖，在代码中调用一个指定的虚拟方法时编译器并不知道它的地址，因此，编译器通过建立虚拟方法表（VMT）来查找在运行时的函数地址。所有的...

Delphi中实现让TListView接收文件拖放

2016年07月27日 50 阅读

Delphi中实现让TListView接收文件拖放2010-10-31在使用Delphi开发应用程序时常常要使用到TListView列表视控件，但是仅仅使用TListView的原有属性、方法和事件是不够的，常常需要在程序开发过程中对列表视的功能进行扩展，比如对列表视添加任意列组合排序、ListItem拖动、CustomDraw自绘制、加入背景图等功能，由此可见Delphi自带的TListView列表视控件功能有限，并不让人感到满意。为了让列表视具有更多的功...

从数据库绘制MapX地图

2016年07月27日 49 阅读

从数据库绘制MapX地图2010-10-311、在中建立如下的表用于存储坐标：ID integer //唯一编号Name string //名称（标签）X float //地图坐标XY float //地图坐标Y假设这个表命名为XUnit2、编辑MapX地图，添加一个新的Layer，定义好你希望将来添加图层显示样式，然后设置这个图层不可见、不可编辑，此图层名称假设为“企事业单位”。3、在你的程序中添加MapX控件，命名为Map14、...

delphi中制作抖动窗体

2016年07月27日 48 阅读

delphi中制作抖动窗体2010-10-31跌跌撞撞以下程序将教你如何用制作一个窗体,窗体一旦运行将在屏幕上不断抖动.定义两个变量:varBackLeft,BackTop,I:integer;//保存窗体的leftBackLeft := Left;//保存窗体的topBackTop := Top;//其中number可由你设置一个灵活的数字,当然值由你定for I:=1 to Number dobegin//水平抖动Left:= （BackLeft-10...

Delphi与DirectX之DelphiX（46）:TDIB.DoAntiAlias;

2016年07月27日 46 阅读

Delphi与DirectX之DelphiX（46）:TDIB.DoAntiAlias;2010-10-31 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） DXP...

Delphi与DirectX之DelphiX（47）:TDIB.DoContrast（）;

2016年07月27日 46 阅读

Delphi与DirectX之DelphiX（47）:TDIB.DoContrast（）;2010-10-31 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） DX...

Delphi与DirectX之DelphiX（48）:TDIB.DoFishEye（）;

2016年07月27日 48 阅读

Delphi与DirectX之DelphiX（48）:TDIB.DoFishEye（）;2010-10-31 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） DXP...

Delphi与DirectX之DelphiX（49）:TDIB.DoGrayScale;

2016年07月27日 46 阅读

Delphi与DirectX之DelphiX（49）:TDIB.DoGrayScale;2010-10-31 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） DXP...

Delphi与DirectX之DelphiX（50）:TDIB.DoLightness（）;

2016年07月27日 49 阅读

Delphi与DirectX之DelphiX（50）:TDIB.DoLightness（）;2010-10-31 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） D...

Delphi与DirectX之DelphiX（51）:TDIB.DoDarkness（）;

2016年07月27日 49 阅读

Delphi与DirectX之DelphiX（51）:TDIB.DoDarkness（）;2010-10-31 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） DX...

Delphi与DirectX之DelphiX（52）:TDIB.DoSaturation（）;

2016年07月27日 48 阅读

Delphi与DirectX之DelphiX（52）:TDIB.DoSaturation（）;2010-10-31 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） ...

Delphi与DirectX之DelphiX（53）:TDIB.DoSplitBlur（）;

2016年07月27日 69 阅读

Delphi与DirectX之DelphiX（53）:TDIB.DoSplitBlur（）;2010-10-31 博客园 万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls;type TForm1 = class（TForm） D...