delphi
文章平均质量分 72
b330225
这个作者很懒,什么都没留下…
展开
-
Delphi消息对话框
delphi的消息对话框,类似VFP中的WAIT和MESSAGEBOXdelphi的消息对话框,类似VFP中的WAIT和MESSAGEBOX1、最简单的是:showmessage() 它只有一个OK按钮,括号中填入希望提示的字符串。 例:showmessage('除数不能为零!!!')2、showmessagefmt() 显示一条提示信息,只有一个OK按钮,但提示信息的字符可以带格转载 2012-04-24 16:02:55 · 165 阅读 · 0 评论 -
Adoquery.disablecontrols和enablecontrols
DisableControls方法是在程序修改或后台有刷新记录的时候切断数据组件,如TTABLE、ADOQUERY等等与组件数据源的联系。如果没有切断,数据源中只要一有数据的改动,尤其是批量改动的话,每一笔的改动都会更新窗口中数据浏览组件的显示,这样会急剧减慢处理过程而且浪费时间。EnableControls的作用相反,用来恢复TTABLE等组件与DATASOURCE的联系,并促使数据浏览组件更新转载 2012-04-26 10:58:58 · 341 阅读 · 0 评论 -
Delphi单元文件Unit结构详细解释 【转】
unit Unit1; interface {接口部分开始}uses {引用单元列表,这是可选的,如果包含必须紧跟interface关键字} {接口部分声明常量/类型/变量/过程和函数,这些声明对引用单元就像自己的声明一样} {在接口部分声明的过程和函数,就像使用了forward关键字} {接口部分结束}implementation转载 2012-04-18 13:32:34 · 256 阅读 · 0 评论 -
Delphi中的窗体创建与销毁【转】
Delphi中的窗体,有模式窗体与非模式窗体两种。两种窗体的调用方式不同,模式窗体使用ShowModal显示,非模式窗体使用Show显示。当显示模式窗体的时候你是不能操作本程序的其他窗体的,你不能把焦点从模式窗体转到其他窗体上。而非模式窗体则没有这种限制,你可以从一个非模式窗体切换到另外一个非模式窗体上。两种窗体的区别仅仅在调用的方式上有区别。窗体的创建:当使用Delphi的IDE New转载 2012-04-18 13:37:33 · 1048 阅读 · 2 评论 -
用adoquery取指定字段所有值问题
用adoquery取指定字段所有值while not adoquery1.Eof do begin ComboBox1.Items.Add(adoquery1.fieldbyname('id').asstring); //id改为你要指定的字段 adoquery1.Next; end;在DBComboBox里显示出转载 2012-05-17 09:51:40 · 313 阅读 · 0 评论 -
DELPHI中处理时间
----笔者在编写一个解除共享软件使用时间限制的小软件时,采用的原理是首先保存现在的时间,然后将系统时间设定为共享软件可运行的时间,再启动共享软件,最后在共享软件退出时再将系统时间恢复为原来保存的时间。但在调试程序的过程中发现了这样一个问题,由于在共享软件运行其间,时间已流逝,所以恢复原来保存的时间后就会导致系统时间滞后,滞后的时间为共享软件的运行时间。----如何来解决这转载 2012-05-17 09:54:18 · 226 阅读 · 0 评论 -
使用delphi消息处理机制实现托盘图标
托盘就是在任务栏右下角的小图标。创建、更改、删除只需要一个Windows API就能实现。这个函数叫做Shell_NotifyIcon()。这个函数和其他处理Windows 外壳的函数都包含在ShellAPI单元中。本例程在窗口创建时在任务栏的右下角创建一个托盘图标。图标由两个ICON交替出现。当窗口最小化时任务栏中只有托盘图标,当左键单击托盘图标窗口恢复。图标停止交替。unit Un转载 2012-05-17 09:58:05 · 418 阅读 · 0 评论 -
Delphi adoquery处理多条SQL语句
Delphi(Pascal) code var sqlStr:String;begin sqlStr:= ' begin ' sqlStr:= sqlStr+ 'update table1 set col1 = ''test'' where 1=2;'; sqlStr:= sqlStr+ 'update table1 set col1 = ''test2'' wh转载 2012-05-17 09:49:25 · 1383 阅读 · 0 评论 -
Delphi 中ADOQuery的用法
都知道Delphi在数据库操作是非常好用的,delphi把ADO一些方法属性都集成了,以下是我的一些总结:***************************************通过sql来实现:添加 With ADOQuery1 do begin Close; SQL.Clear; SQL.Add(' Insert Into Table1(Field1,Fi转载 2012-05-17 09:46:04 · 533 阅读 · 0 评论 -
启动程序调用INI配置信息
procedure Tt_main.FormShow(Sender: TObject);var ini: TIniFile; server,database,user,password: String;begin //设置窗体界面,即只显示窗体背景图片效果还是在窗体中嵌入一个子窗体 IntercontrolExecute(Sender); //调用初始化窗口转载 2012-04-25 15:21:35 · 267 阅读 · 0 评论 -
delphi中exit,abort,break,continue 的区别
exit: 退出函数体abort: 遇到异常,安静处理,就是不显示不提示break: 退出当前循环体,包括for ,while, repeat等循环体continue: 结束循环内的本次处理,继续从循环体的开始位置继续执行Exit 是跳出当前代码块,也就是当前函数,跳出后是要继续向下执行的(如果有后续代码)。Abort 是从 EAbort 过来的,可以激发 exceptio转载 2012-04-24 15:54:32 · 254 阅读 · 0 评论 -
delphi 常见问题集锦
1.form.Free - 释放Form占用的所有资源。Free后,Form指针不能再使用,除非对Form重新赋值。 form.Hide - 隐藏Form。可以调用form.Show再一次显示。 form.close - 关闭Form,实际的结果取决于OnCloseQuery和OnClose,转载 2012-04-24 15:56:15 · 738 阅读 · 0 评论 -
delphi中对象的create和free
在D中每个应用程序可以获得的内存空间分为两种:堆(heap)和栈(stack)。 堆又称为“自由存储区”,其中的内存空间的分配与释放是必须由程序员来控制的。例如,用GetMem函数获取了一定大小的内存空间,则在使用完后,必须调用FreeMem函数将空间释放,否则就会发生所谓的“内存泄漏”。“借债还钱,天经地义”。 栈又称为“自动存储区”,其中的内存空间的分配与释放是由编转载 2012-04-24 16:05:50 · 265 阅读 · 0 评论 -
Delphi编译错误信息对照表
';' not allowed before 'ELSE' →ElSE前不允许有“;”'' clause not allowed in OLE automation section →在OLE自动区段不允许“”子句'' is not a type identifier →不是类型标识符'' not previously declared as a PROPERTY转载 2012-04-24 15:57:51 · 269 阅读 · 0 评论 -
Delphi中Format与FormatDateTime函数详解
Format是一个很常用,却又似乎很烦的方法,本人试图对这个方法的帮助进行一些翻译,让它有一个完整的概貌,以供大家查询之用:首先看它的声明:function Format(const Format: string; const Args: array of const): string; overload;事实上Format方法有两个种形式,另外一种是三个参数的,主要区别在于它是线程安转载 2012-04-24 15:59:32 · 143 阅读 · 0 评论 -
Delphi中destroy, free, freeAndNil, release用法和区别
1)destroy:虚方法释放内存,在Tobject中声明为virtual,通常是在其子类中override 它,且要加上inherited关键字,才能保证派生类对象正确地被销毁;但destroy一般不能直接用,为什么?假如当一个对象为nil,我们仍然调用destroy,此时会产生错误。因为destroy是虚方法,它要根据对象中的头四个字节找到虚拟方法表Vmt的入口地址,从而找到des转载 2012-04-24 16:02:13 · 377 阅读 · 0 评论 -
Delphi快捷键大全
分类快捷键解释备注组件设计类Escape选择当前组件容器 Shift + Click选择多个组件;选择窗体 Tab选择下一个组件 Shift + Tab选择上一个组件 方向键选择此方向的下一个组件 Ctrl + 方向键将所选组件的位置移动 1转载 2012-04-24 16:04:13 · 153 阅读 · 0 评论 -
Delphi Access violations 问题的解决之道,Access violations
Windows用户可能经常会看到类似于错误提示:“Error:Access violation at address 836556F8. Read of address 836556F8”。作为一个Delphi程序开发者,遇到这种错误的机会比其他用户更多(^_^)。 究竟什么是“Access Violation”?如何在设计期避免它的出现? Access Viol转载 2012-04-25 15:09:40 · 230 阅读 · 0 评论 -
Delphi的OverRide、OverLoad和Virtual方法
Delphi的OverRide、OverLoad和Virtual方法 2009-04-09 22:40:22| 分类:Delphi相关 | 标签:|字号大中小 订阅1.方法的重写Overriding和重载Overloading是Java多态性的不同表现。重写Overriding是父类与子类之间多态性的一种表现,重载Overloading是一个类中多态性的一转载 2012-04-24 15:55:17 · 235 阅读 · 0 评论 -
[Delphi]MessageBox详解
MessageBox对话框是比较常用的一个信息对话框,其不仅能够定义显示的信息内容、信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信息对话框信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信息对框。 1、函数原型及参数 function MessageBox(hWnd:HWND;Text, Caption转载 2012-04-24 16:00:29 · 318 阅读 · 0 评论 -
XH列的值自动对应为该行的行号
如何在DBGRID中添加XH序号列后,让XH列的值自动对应为该行的行号,删除某行后,自动补足断号。procedure AutoID(ds:TDataSource); var i,tmpInt:integer; begin ds.DataSet.First; if ds.DataSet.IsEmpty then begin转载 2012-05-19 19:36:36 · 193 阅读 · 0 评论