Delphi中设置条件断点的方法讲解

2016年07月29日 105 阅读

写了这么长时间的代码，一直认为调试程序比写程序要重要，上次有人问俺，如何调试一个循环中某个循环条件位置下断点。本来想来在Delphi的断点设置中应该是有一个类似条件断点的东西的，不过我也一直不知道怎么设置这个条件断点，所以当时给他们的说法是在那个循环中，加上一个条件判断，写上一个Showmessage之类的弹窗。然后弹窗之后下断点，这不外乎是一种方法，而且还是一种很SB的方法。直到今天偶然查看到Delphi的调试菜单，愕然发现，原来Delphi是可以设置条...

Delphi实现判断网址是否存在及是否可以打开的方法

2016年07月29日 72 阅读

本例所述Delphi程序用于检测网址是否为404，也就是检测网址是否存在，或是否可以打开，针对不同的检查方法，会返回不同的结果。程序主要代码如下：unit address;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Psock, NMHttp, StdCtrls, ComCtrls;type TForm1 = class（TF...

Delphi使用OpenGL2d绘图之画图片Bmp的方法

2016年07月29日 91 阅读

一、前言：对于Delphi来说，要画图片要先处理一下，需要引用别的单元，而Delphi中没带，需要另外下载Gl.pas。网上常见自带的OpenGl单元封装的是1.0版的，有此函数未声明。网上可以找到Gl.pas单元。另外需要一个Glaux.pas单元与glaux.dll，是辅助库。在本文最后会提供下载。二、实现流程：绘画图片需要以下几个流程。Window本身的绘图是以位图为基础的，png,jpg等，绘画时，可以转为bmp再画。1.加载bmp图片：使用aux...

Delphi下OpenGL2d绘图之初始化流程详解

2016年07月29日 79 阅读

一、前言：Delphi默认支持OpenGl，可以使用uses OpenGL单元进行引用，之后就可以使用OpenGL的函数。OpenGl是跨平台的，而且Windows很早就支持并集成在系统中，存在于system32中的opengl32.dll，不需要再额外进行安装。虽然windows本身有d3d，但是其能力有限，相关学习资料页相对较少。通常OpenGL仅仅支持以下几种基本几何图形：点，线和多边形。没有表面或者更高级的图形（比如球状图形）能被作为基本图形元素绘...

Delphi下OpenGL2d绘图之画点的方法

2016年07月29日 75 阅读

一、前言Delphi图形的绘制可以在glBegin（）、glEnd（）之间完成，绘制的框架代码可以使用Delphi下OpenGL2d绘图的初始化代码，具体内容可参考本站http://www.jb51.net/article/52141.htm。修改的部份为 Draw 函数的内容。二、画点使用glPointSize 函数指定栅格化点的直径。默认为1.0，只在GL_POINTS下起作用，关于消锯齿等功能以后再研究。使用glBegin（GL_POINTS）告诉O...

Delphi下OpenGL2d绘图之画线的方法

2016年07月29日 66 阅读

一、前言：Delphi画线方法与画点基本上是相同的。区别在于glBegin（）的参数。绘制的框架代码可以参考Delphi下OpenGL2d绘图初始化中的代码，地址为http://www.jb51.net/article/52141.htm。修改的部份为 Draw 函数的内容。二、画线步骤：GL_LINES：把每一个顶点作为一个独立的线段，顶点2n－1和2n之间共定义了n条线段，总共绘制N/2条线段GL_LINE_STRIP：绘制从第一个顶点到最后一个顶点依...

Delphi下OpenGL2d绘图之画四边形的方法

2016年07月29日 78 阅读

一、前言：Delphi实现画四边形的方法基本上与前几遍文字代码是相同的。其区别知识在于glBegin（）的参数“GL_QUADS”。绘制的框架代码可以使用Delphi下OpenGL2d绘图初始化中的代码，地址为http://www.jb51.net/article/52141.htm。修改的部份为 Draw 函数的内容。二、画四边形方法：使用GL_QUADS：绘制由四个顶点组成的一组单独的四边形。顶点4n－3、4n－2、4n－1和4n定义了第n个四边形。总...

delphi7连接mysql5的实现方法

2016年07月29日 85 阅读

本文简单介绍了Delphi7连接MySQL数据库的实现方法，具体步骤如下：首先先去下载：http://www.justsoftwaresolutions.co.uk/delphi/dbexpress_and_mysql_5.html然后将下载到的dbxopenmysql5_dll.zip解压出来，再把dbxopenmysql50.dll和libmysql.dll都放到工程文件夹下。在Form上放上TSQLConnection、TSQLQuery、TStri...

Delphi7中Listview的常用功能汇总

2016年07月29日 106 阅读

有些时候我们在使用Delphi7的Listview过程中总是要改一些默认的设置，现在把它们集中起来汇总如下。MultiSelect := True; 使Listview可以同时选择多行GridLines := True; 使Listview显示格线ViewStyle := vsReport; 显示数据项的详细列表HideSelection := True; 使listview失去焦点时,选中行不高亮//设置颜色procedure TForm1.ListVi...

Delphi用TActionList实现下载文件的方法

2016年07月29日 65 阅读

Delphi中的TActionList有个标准动作TDownLoadURL，内部是使用的URLDownloadToFile，它下载文件时会定时产生OnDownloadProgress 事件，这样就可以用进度条显示。本文讲述了Delphi用TActionList实现下载文件的方法，实现代码如下所示：uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, D...

Delphi实现Listbox中的item根据内容显示不同颜色的方法

2016年07月29日 95 阅读

本文简述了Delphi实现Listbox中的item根据内容显示不同颜色的方法，实现步骤如下：ListBox1 的 Style 属性改为 lbOwnerDrawVariable在ListBox的OnDrawItem事件裡，根据item的值，改变Canvas属性示例代码如下：procedure TForm1.ListBox1DrawItem（Control: TWinControl; Index: Integer; Rect: TRect; State: T...

Delphi控件ListView的属性及使用方法详解

2016年07月29日 157 阅读

Delphi的ListView组件位于组件板的Win32页，可使用4种图形方式（大图标、小图标、列表、详细列表）来描述选项内容，类似于Windows操作系统中的“我的电脑”，数据项图形保存在ImageList组件中。1.ListView主要属性（1）ViewStyle属性ViewStyle属性用于选择数据项的4种显示方式，因此该属性有4个选项值：vsIcon大图标、vsSmallIcon小图标、vsList列表、vsReport详细列表。（2）Items属...

Delphi实现毫秒级别的倒计时实例代码

2016年07月29日 69 阅读

本文以实例简述了Delphi实现毫秒级别倒计时的方法。一般来说可以获得系统的高性能频率计数器在一毫秒内的震动次数，如果时钟震动次数超过10毫秒的次数则刷新edit3的显示，显示从开始记数到记数实际经过的时间，具体实现代码如下：unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls...

Delphi中对时间操作方法汇总

2016年07月29日 63 阅读

一般来说在delphi中用于描述时间的有几种数据结构，而对时间的操作，实质上就是对这些结构的操作。TDateTime类型：Delphi中最常用的表示日期时间的数据类型TDateTime类型，和普通的整形数一样，你可以给日期定义一个日期型变量以便在程序中进行操作。TdateTime类型实质上是一个Double型的数，在Delphi中是这样定义TdateTime类型： type TDateTime = type Double ,具体的算法是用Double数的整...

Delphi实现碰撞球体完整实例代码

2016年07月29日 76 阅读

本文以实例描述了用Delphi实现撞击球效果的方法，类似弹球效果。点击“开始”按钮，窗体中的一个绿色小球将不断地左右撞击运动，并且其大小不停地变化。点击“停止”按钮，小球停止运动。用鼠标拖动右下方的调节控件，可以调整小球运动的速度。这里我们主要是使用Timer 控件、Panel 控件、TrackBar 控件、SpinEdit 控件、Shape控件和Button 控件来实现。重点是Delphi 的Timer 控件。在运行程序时，该控件不可见，也不能直接对它进...

Delphi实现读取系统时间与日期完整实例

2016年07月29日 100 阅读

本文讲述了Delphi读取系统时间与日期的实现方法，首先设置各个控件用于显示时间、读取时间与设置时间。再添加如下代码：unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class（TForm）Button1: TButton;Memo1: TMemo;Button2...

Delphi常用关键字用法详解

2016年07月29日 74 阅读

本文详细介绍了Delphi中常用的各个关键字名称及用法，供大家在编程过程中借鉴参考之用。详情如下：absolute：//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.var Str: string[32]; StrLen: Byte absoluteStr;//这个声明指定了变量StrLen起始地址与Str相同.//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.beginStr := "abc";Edi...

Delphi实例演示Rect、Bounds生成TRect的区别

2016年07月29日 70 阅读

本文以实例演示Rect、Bounds生成TRect的区别，实例代码如下：unitUnit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls;typeTForm1 = class（TForm）Button1: TButton;RadioGroup1: TRadioGroup;pr...

Delphi之Pascal语言中的关键字及保留字汇总

2016年07月29日 70 阅读

本文汇总了Pascal语言中的关键字及保留字如下，供大家参考：absolute//指令（变量）abstract//指令（方法）and//运算符（布尔）array//类型as//运算符（RTTI）asm//语句assembler//向后兼容（汇编）at//语句（异常处理）automated//访问类别符（类）begin//块标记case//语句cdecl//函数调用协定class//类型const//声明或指令（参数）constructor//特殊方法con...

Delphi实现图片滚动切换的完整实例代码

2016年07月29日 68 阅读

本文以实例介绍了Delphi实现图片滚动切换的方法。该程序可以实现图像的滚动播出，并且通过本代码可控制窗口中的图像向上滚动，通过调节速度滚动条的值还可以调整滚动的速度；点击“停止”按钮，图像即停止滚动。完整的功能代码如下：unit Unit1;interfaceusesWindows, Classes, Graphics, Forms, Controls, Menus,Dialogs, StdCtrls, ExtCtrls, SysUtils, ComCt...