Delphi 2007先睹为快

2017年02月06日 73 阅读

Delphi 2007先睹为快2009-01-30自从 Borland 将 IDE 产品独立出来成立新的 CodeGear 公司后，所有 Delphi 的 fans 都在期待新的 IDE 产品的诞生。而 CodeGear 发布的 Turbo Delphi 后的反应来看，多数人都认为 Turbo 是一个非常麻烦的系统，特别是各种开发环境的不兼容问题，引发了许多程序员的抱怨。不过今天，我看到了 Delphi 2007 的界面抓图后，感觉 Delphi 2007...

Delphi 2007体验

2017年02月06日 63 阅读

Delphi 2007体验2009-01-31CodeGear（From Borland） 公司发布了最新的Delphi 2007 For Win32版本。作为一个 Delphi 的使用者，第一时间下载、安装并进行了体验，现将一些使用感受记录如下：注：以下的对比主要是针对Delphi7与Delphi2007，以下列出的部分功能可能在Delphi8/2005/2006中已存在。1、下载可在CodeGear官方网站下载试用版，或在VeryCD上寻找ISO，整个...

Delphi与DirectX之DelphiX（1）：安装测试

2017年02月06日 69 阅读

Delphi与DirectX之DelphiX（1）：安装测试2009-10-11博客园 万一测试 Demo 下载: files.cnblogs.com/del/DelphiX_1.rar （在 Delphi 2007 和 2009 下均编译通过）其实按照这里（www.cnblogs.com/del/archive/2008/06/13/1219324.html）的介绍, 比下载来的快, 也不需要下载.DirectX, 微软很久的技术了; 从 Windows...

Delphi与DirectX之DelphiX（2）：DelphiX各单元概览

2017年02月06日 68 阅读

Delphi与DirectX之DelphiX（2）：DelphiX各单元概览2009-10-11博客园 万一DXClass | DXDraws | DIB | DXSounds | DXWave | DXPlay | DXSprite | DXInputDXClass 单元TControlSubClassTControlSubClassProcTCustomDXTimerTDirectXTDirectXDriverTDirectXDriversTDXFor...

Delphi与DirectX之DelphiX（3）：初识TDXDraw

2017年02月06日 76 阅读

Delphi与DirectX之DelphiX（3）：初识TDXDraw2009-10-11博客园 万一在 DelphiX 中, 所能看到的一般都是画在 TDXDraw.TDXDraw 默认两个绘图表面: TDXDraw.Surface 和 TDXDraw.Primary;一般先在后台（Surface）绘图, 然后再用 TDXDraw.Flip 命令切换前后台, 从而看到绘制效果.TDXDraw.Flip 会置换 Surface 和 Primary 两个对象...

Delphi与DirectX之DelphiX（4）：初识TDXTimer

2017年02月06日 70 阅读

Delphi与DirectX之DelphiX（4）：初识TDXTimer2009-10-11博客园 万一DelphiX 提供了高性能的计时器 TDXTimer, 使用方法和 Timer 基本一样.我们在使用 Timer 时, 很少把 Interval 设为 50 以下（这应该是它精确度的极限）;使用 TDXTimer 可以把 Interval 置为 0, 表示尽可能地快！本例效果图:...

Delphi与DirectX之DelphiX（5）：初识TDXImageList

2017年02月06日 68 阅读

Delphi与DirectX之DelphiX（5）：初识TDXImageList2009-10-11博客园 万一新建工程后, 在窗体上分别添加: DXDraw1、DXImageList1;然后只需要下面四行代码即可在 DXDraw1 中显示 DelphiX.dxg 图像:procedure TForm1.Button1Click（Sender: TObject）;begin DXImageList1.Items.LoadFromFile（"C:TempDe...

多线程编程（1）-先入门再说

2017年02月06日 85 阅读

多线程编程（1）-先入门再说2009-10-11博客园 万一多线程应该是编程工作者的基础技能, 但这个基础对我来讲的确有点难（起码昨天以前是这样）.开始本应该是一篇洋洋洒洒的文字, 不过我还是提倡先做起来, 在尝试中去理解.先试试这个:procedure TForm1.Button1Click（Sender: TObject）;var i: Integer;begin for i := 0 to 500000 do begin Canvas.TextOu...

多线程编程（2）-从CreateThread说起

2017年02月06日 66 阅读

多线程编程（2）-从CreateThread说起2009-10-11博客园 万一function CreateThread（ lpThreadAttributes: Pointer; {安全设置} dwStackSize: DWORD; {堆栈大小} lpStartAddress: TFNThreadStartRoutine; {入口函数} lpParameter: Pointer; {函数参数} dwCreat...

多线程编程（3）-从CreateThread说起[续]

2017年02月06日 64 阅读

多线程编程（3）-从CreateThread说起[续]2009-10-11博客园 万一function CreateThread（ lpThreadAttributes: Pointer; dwStackSize: DWORD; lpStartAddress: TFNThreadStartRoutine; lpParameter: Pointer; dwCreationFlags: DWORD; {启动选项} var lpThreadId: DWORD）:...

多线程编程（4）-从CreateThread说起[续二]

2017年02月06日 69 阅读

多线程编程（4）-从CreateThread说起[续二]2009-10-11博客园 万一function CreateThread（ lpThreadAttributes: Pointer; dwStackSize: DWORD; lpStartAddress: TFNThreadStartRoutine; lpParameter: Pointer; {入口函数的参数} dwCreationFlags: DWORD; var lpThreadId: DWO...

多线程编程（5）-从CreateThread说起[续三]

2017年02月06日 65 阅读

多线程编程（5）-从CreateThread说起[续三]2009-10-11博客园 万一function CreateThread（ lpThreadAttributes: Pointer; dwStackSize: DWORD; lpStartAddress: TFNThreadStartRoutine; {入口函数的指针} lpParameter: Pointer; dwCreationFlags: DWORD; var lpThreadId: DWO...

自定义快速报表的打印预览窗口

2017年02月06日 91 阅读

自定义快速报表的打印预览窗口2009-10-11QuickReport2.0中提供的默 认打印预览窗口是英文界面的，如果开发的中文软件中带有这种英文显示， 不免有些小小的缺憾。因此有必要实现中文界面的打印预览窗口。但是Delphi提供的源代码中并没有打印预览窗口.PAS源文件，这就无法直接修改源 码，只能全部自己编程实现。经多次实践，笔者模仿实现了与默认预览窗口外观类似，功能相同的打印预览窗口。步骤如下：1.新建一个窗体，设置Name为MyPreview。...

Delphi7实现添加记录的“携带”实现

2017年02月06日 71 阅读

Delphi7实现添加记录的“携带”实现2009-10-11Kapok.Chan在数据库管理系统中，数据录入是数据处理的基本功能，录入操作方便与否是衡量数据库应用程序交互良莠的指标之一。录入中除了应要对录入数据进行合法检验外，还应为用户提供更多的方便操作，即对于“规范性”数据，如：性别、职称等字段的数据，应尽可能供用户“选择”录入，而非直接文字输入，另外，如：出生年月、联系电话、邮编等类似名称的字段，程序应设...

用Delphi获取Windows及系统路径

2017年02月06日 72 阅读

用Delphi获取Windows及系统路径2009-10-11电脑报 空乐通过WindowsAPI函数可以获取Windows及系统的路径。在不少程序中都需要让程序先识别系统路径后再进行其他工作。Procedure TForm1.Button1ClickSenderTObject var SysDirarray0..255of char begin //获取Windows路径 GetWindowsDirectorySysDir255 E...

Delphi 7中快速获取本机IP地址

2017年02月06日 108 阅读

Delphi 7中快速获取本机IP地址2009-10-11电脑报 青孩子朋友们在用Delphi编程序的时候，常常碰到需要在程序中获取自己的IP地址的情况。在以往的版本中，可以通过编写一段代码或函数实现这一功能。但有了Delphi 7，这个工作可以更简化了。利用控件只需一句代码，就可以非常方便地实现这一功能。新建一Project1，在form1中添加控件statusbar1（Win32页）和控件IdIPWatch1（Indy Misc页）。接着设置好控件属性...

用Delphi7设计FTP上传软件

2017年02月06日 75 阅读

用Delphi7设计FTP上传软件2009-10-11电脑报 周应随着宽带的不断普及，自己动手做网站的朋友也更多了。主页完工了，当然就要选择合适的免费空间，用FTP软件进行上传了。在这方面，可选择的上传软件有很多。那么有没有想过自己动手做一个呢？其实用Delphi就可以很方便地完成这项工作。Let’s go！界面设计首先,添加NMftp1、Edit、opendialog1、meno1、label等控件，按下图放置。控件代码1.“连接...

Delphi编写后台监控软件

2017年02月06日 87 阅读

Delphi编写后台监控软件2009-10-11后台监控软件，为了达到隐蔽监控的目的，应该满足正常运行时，不显示在任务栏上，在按Ctrl+Alt+Del出现的任务列表中也不显示，管理员可以通过热键调出隐藏的运行界面。要作到这些，必须把当前进程变为一个系统服务，并且定义全局热键。一、把当前进程变为一个系统服务:目的是在任务列表中把程序隐藏起来。调用API函数RegisterServiceProcess实现。二、定义全局热键（本例中定义热键Ctrl+Del+R...

用Delphi7.0实现漂亮的汉字窗口

2017年02月06日 70 阅读

用Delphi7.0实现漂亮的汉字窗口2009-10-11 电脑报 五湖肥人在可视化开发的时代，窗体是绝大部分应用程序的核心，但是开发者也许已对Windows一成不变的方形窗体感到厌烦。其实巧妙地使用API函数即可实现汉字形状的窗体。 本文的实例运行后将显示一个由“电脑报”三个汉字作为外形的窗体。当然你还可以利用本期讲的方法实现更有个性的汉字窗口。设计思路1使用BeginPath和EndPath函数为窗体定义路径。2用PathT...

Delphi控制并行端口位操作

2017年02月06日 69 阅读

Delphi控制并行端口位操作2009-10-11东亮并行端口简称并口，它有3个端口：数据端口、状态端口、控制端口，常用的并口为LPT1，它的3个端口的地址分别为：378H、379H和37AH。一、并口读写在汇编语言中，可以用 in、out 指令操作并口，而在Delphi中并没有相对应的函数、方法可对并口进行读写，幸运的是Delphi可以嵌入汇编程序，通过直接嵌入汇编指令 in、out 可方便地对并口进行读写。我们还可以通过调用 Windows API 函...