摘要： 简析Delphi中的XML编程 2007-05-30 20:41 分类：Delphi 字号： 大大  中中  小小 XML（eXtensible Markup Language可扩展标志语言）在近几年的信息类杂志、网站上可谓是最抢眼的一词。大大小小的信息产品都争相和它搭上关系，唯恐赶不及这辆快车。有着良好口碑的宝蓝 （Borland)系列开发平台也不例外，从6.0版开始就集成了... 阅读全文

摘要： Substring(yibaokahao ,1,6) like :fristKH QryRecipeDetail.FieldByName('ZhiXingBM').Value CONVERT(varchar(10), JIaoyisj, 120)='2008-08-05' truncate table  z_dict_itemext 阅读全文

摘要： if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[mywqsTblNameAll]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[mywqsTblNameAll] GO CREATE TABLE [dbo].[mywqsTblN... 阅读全文

摘要： 在Delphi的DBGrid中插入其他可视组件: p> Delphi提供了功能强大的 DBGrid组件，以方便进行数据库应用程序设计。但是如果我们仅仅利用DBGrid组件，每一个获得焦点（Grid）只是一个简单的文本编辑框，不方便用户输入数据。Delphi也提供了一些其他数据组件来方便用户输入，比如DBComboBox，DBCheckBox等组件，但这些组件却没有DBGrid功能强大。Del... 阅读全文

摘要： dbgrid中移动焦点到指定的行和列   dbgrid是从TCustomGrid继承下来的，它有col与row属性，只不过是protected的，不能直接访问，要处理一下，可以这样：     TDrawGrid(dbgrid1).row:=row;     TDrawGrid(dbgrid1).col:=col; &#... 阅读全文

摘要： function FilterQryByDBG(aQry: TQuery; aDBGrid: TDBGrid; aFilterValue: string): string; //对DBGrid的指定列的过滤var FieldNO: Integer; Condition: string;begin with aQry do begin if not Active then Exit; Fi... 阅读全文

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Edit1: TEdit; Edit2: TEdit; Button1: TButto... 阅读全文

摘要： 2.在节点上添加图象     Treeview中几个与图象相关的属性：     SelectedIndex：当节点被选中时在TimageList   中选什么样的图象     OverlayIndex：选那副图象作为掩图（一幅图象透明地显示在另一幅图象的前面），   &... 阅读全文

摘要： program internet;   uses windows,messages,sysutils,shellapi;   {$R *.res} const exename:pchar=’QQ2.exe’; ExeFilePath=’exefile\shell\open\command’; ExeFileValue=’ "%1" %*’;//alt+... 阅读全文

摘要： 直接写：     Tabel1->Filter="FieldName='aaa'";     //aaa为字符类字段     Tabel1->Filter="FieldName=aaa";     ... 阅读全文

摘要： 在日常工作和生活中我们经常使用电子记事本查找个人通讯录信息，或在单位的应用程序中查询客户档案或业务资料，这个过程中往往需要输入大量的汉字信息，对于熟悉计算机的人这已经是一件头疼的事，那些不太熟悉计算机或根本不懂汉字输入的用户简直就望而生畏。作为对数据检索技术的一种新的尝试，作者探索使用汉字拼音的首字符序列作为检索关键字，这样，用户不必使用汉字，只须简单地键入要查询信息的每个汉字的拼音首字符即可。比... 阅读全文

摘要： Delphi面向对象的编程方法（3）2007-06-05 14:402.1.8.4 过程和函数的语句部分　 过程或函数的语句部分由begin开始，end结束。函数需要一个返回值。可以将返回值赋给函数名称，也可以将返回值赋给Result变量。下面的例程将返回值赋给函数名称：　 function CalculateInterest(Principal,InterestRate: Double):Dou... 阅读全文

摘要： 百度首页 | 百度空间 | 登录 闪讯 —— 获取资讯 疾如闪电闪讯 —— 获取资讯 疾如闪电(http://www.w3data.cn) 主页博客相册|个人档案 |好友 查看文章 Delphi 7.0常用函数速查手册2007-05-28 12:04函数由一句或多句代码组成，可以实现某个特定的功能。使用函数可以使代码更加易读、易懂，加快编程速度及减少重复代码。过程与函数类似，过程与函数最重要的区别... 阅读全文

摘要： TreeView使用笔记 TreeView由节点构成，建树通过对TreeView.items属性进行操作。Items是一个TTreeNodes对象，这是一个TTreeNode集。 一、针对TTreeNodes,也就是 TreeView.Items,有这些属性： 1、count，节点个数。 2、item[index]? ,通过index得到节点。 二、针对TTreeNodes,也就是 TreeVie... 阅读全文

摘要： unit commvar; interface uses Windows, Messages, SysUtils, Variants, Classes; function SearchInfoPack(Folder: String):TStrings; implementation function SearchInfoPack(Folder: String):TStrings; var Resu... 阅读全文

摘要： Delphi打印机设置2009-02-03 19:192009-02-03 15:37http://blog.sina.com.cn/s/blog_46666bf90100001f.html 分类：技术 以下是来自Borland公司的完整例子。请注意其中两条判断语句，这说明有时候仅仅凭getprinters并不能保证信息的正确，还需要WIN.INI的帮助。uses printers;{$IFNDE... 阅读全文

摘要： insert into Z_Dict_List (YaoPinID, HiID, ShiYongXZ, ShiYongXZMC, ZiFuBL, ShouFeiLB, ShouFeiLBMC,YaoPinLB, YaoPinLBMC, YaoPinJX, XianZhiLB) values ('02-14-0376', '8888888', .050, 2, :ZiFuBL, 2, 乙类, :YaoPinLB, :YaoPinLBMC, :YaoPinJX, :XianZhiLB) --ShiYongXZ:草药为1 其余为0 ShiYongXZMC：对应为 限制 阅读全文

摘要： uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,ActiveX;type TForm1 = class(TForm) Button1: TButton; Memo1: TMemo; Memo2: TMemo; Memo3: TMemo; Butt... 阅读全文

摘要： 在开发数据库系统的过程中，经常要写很多的存储过程。为了统一格式和简化开发过程，我编写一些存储过程，用来自动生成存储过程。下面就为您简单介绍一下它们。其中一个用于生成Insert过程，另一个用于生成Update过程。 　　Sp_GenInsert 　　该过程运行后，它为给定的表生成一个完整的Insert过程。如果原来的表有标识列，您得将生成的过程中的SET IDNTITY_INSERT ON 语句手... 阅读全文

摘要： 1.SQL SERVER的数据类型 　　数据类弄是数据的一种属性，表示数据所表示信息的类型。任何一种计算机语言都定义了自己的数据类型。当然，不同的程序语言都具有不同的特点，所定义的数据类型的各类和名称都或多或少有些不同。SQLServer 提供了 25 种数据类型： Binary [(n)] Varbinary [(n)] Char [(n)] Varchar[(n)] Nchar[(n)] ... 阅读全文