首页 相关文章 在Delphi中自己建立交叉表

在Delphi中自己建立交叉表

  经常在CSDN上查阅名位大侠的文章,得益不少,近期因做一个项目,需要用到交叉表,报表上倒是有,但客户要求在Grid上能操作,没有办法,只好自己写了一段代码用于普通查询到交叉表的实现,不敢独享,故上传,望能抛砖引玉,请名位大侠不吝指教。

  
  function CreateTmptab(const AFieldDefs:TFieldDefs):TDataSet;
  var
  TempTable:TatClientDataSet;
  begin
  TempTable:=nil;
  Result:=nil;
  if AFieldDefsnil then
  begin
   try
   TempTable:=TatClientDataSet.Create(Application);
   TempTable.FieldDefs.Assign(AFieldDefs);
   TempTable.CreateDataSet;
  ...[ 查看全文 ]

2016-02-19 标签:
  • 标签:Delphi
      Delphi作为一种面向对象的可视化开发工具,以其开发程序的高速度和编译代码的高效率越来越受到广大编程人员的喜爱。尽管Delphi已经提供了非常强大的开发组件(VCL),但灵活使用API函数一定可以使你的程序增色不少。 状态键的检查 当今不少流行软件的编辑窗口(包括Delphi的代码编辑窗口)的底部都有一个状态条用来显示一些状态信息,比如当前光标的位置等。通常键盘的状态键...[ 查看全文 ]
  • 标签:Delphi
      在Delphi中,定位文件的操作主要有两种方法。一种是直接定位文件,即通过“打开”对话框(OpenDialog)控件来实现。另一种是只定位到文件夹,然后再在此文件夹内寻找文件,这种定位方法是利用Delphi提供的SelectDirectory函数。这个函数是在FileCtrl单元中定义的,因此在使用时不要忘记在Uses中加入单元名。 下面就以一个例子来说明这两种方法在Delphi中的具体实现: 首先建立...[ 查看全文 ]
  • 标签:Java JAVA基础
    这篇文章将向你介绍Junit,一个用来在项目中进行测试和调试的工具。在介绍完TDD(以测试驱动开发)理论后,将进一步讲解怎样在流行的Eclipse中建立你自己的JUnit测试。向你展示如何测试Hello World这样简单的程序。 许多书上都讨论了自动测试,但是只有很少的著作注意到这么一个问题,那就是怎样把这些测试组织起来。随着测试的增加,放置和调用这些测试却变得更加麻烦。这将成为一个重...[ 查看全文 ]
  • 以前没有在LINUX作过软RAID,今天正好看到RHCE的有关RAID部分,所以做了一下试验。 RHEL3一共支持以下三种RAID:RAID0、RAID1、RAID5。建立的方法一样,现在我以建一个RAID1为例: 一:用fdisk命令将两个磁盘分区: #fdisk /dev/sdb #fdisk /dev/sdc 二:修改/etc/raidtab配置文件,如果在/etc下没有这个文件,可以从/usr/share/doc/raidtools*目录将raidtab.sample改名CP到/etc下: raiddev /dev/md0 ra...[ 查看全文 ]
  • 前几天应客户要求写这个东西,其实用VB,VC可能更快些,不过,我还是喜欢用DELPHI 首先 uses ActiveX,ComObj,StdCtrls,ShlObj,FileCtrl; 在指定文件夹建立当前应用程序才的快捷方式 procedure Tform1.MakeLink(Foldername: string ;proName, lnkName, Description: string ); var   WorkDir, DestName: string ;   aObj: IUnknown;   MyLink: ISh...[ 查看全文 ]
  • 标签:Delphi
        一.DLL 库内存共享机制   从使用效果看,DLL和unit 很像,它们都可以被别的工程模块所调用,但二者在内部的实现机制上确存在着差别。如果一个程序模块中用uses语句引用了某个unit,编译程序在编译该模块时,便会连同unit一起编译,并把编译后的可执行代码链接到本程序模块中,这就是一个程序模块能够调用所引用unit中过程和函数的原因。   当同一个unit被多个工程所引用时,则每个...[ 查看全文 ]
  • Delphi中,用interbase控件访问InterBase数据库,并设置Dialect 3模式访问时,SQL语句中引用的 字符型字段 需要放在单引号(')内,如要在Delphi的IBQuery中实现该操作: select * from MyTable where name='zmxjh' 可以这样做:  SQL := 'select * from MyTable where name= ';  SQL := format(SQL,['zmxjh']); ('')即...[ 查看全文 ]
  •                                          在Delphi7中调试COM+                    &nb...[ 查看全文 ]
  • 标签:Delphi
      资源是存放在扩展名.RES的文件里的二进制数据结构,在DELPHI中资源文件可以使用图象编辑器来制作(IMAGEEDITOR),或者使用其他的工具。如:BORLAND公司提供的RADPACKFORDELPHI中的RESOURCEWORKSHOP来创建。资源文件中通常存放的是应用程序可以随时存取的一些对象,包括:ICON、CURSOR、BITMAP、FONT等近十种。大部分的资源在通常的情况下可以保留在磁盘当中,直到程序需要使用它们时才将其调入,...[ 查看全文 ]
  • 在Delphi中,要调用Chm文件可以通过引用HHctrl.ocx文件的函数HtmlHelpA实现。 不过在这里,我们也可以使用API函数ShellExecute来打开Chm帮助文件。 在网上找到的资料,通常以 ShellExecute(self.Handle,'open','help.chm','', '',SW_SHOW);? 的方式来实现。 但有个不足,就是不能打开指定的帮助页面,所显示的是帮助文档的起始页面。 想到Chm文件被关联到hh.exe程序,...[ 查看全文 ]
  • 标签:Delphi
    所谓文件切割,就是把一个文件切割成若干个小文件。做法就是将一个文件对象以"文件流"的方式读出,然后按照一定的块(Block)大小分别存成文件。文件组合,就是把若干个文件组合成一个文件。比如像打包工具(Wise)用到的就是这个原理。如果大家对"流"这个概念熟悉的话,那么实现起来就很容易了,以下就是实现步骤。 二、 实现 在DELPHI中新建一个工程,然后在窗体中加入两个BUTTON,一个EDIT...[ 查看全文 ]
  • 标签:Delphi
      组件技术是新一代软件技术发展的标志,作为著名的RAD开发工具,Delphi可以轻松地实现组件的开发。本文将详细介绍Delphi中DCOM/CORBA的实现步骤。 ■创建应用服务器 要创建一个多层Client/Server应用程序,首先要创建应用服务器,然后注册或安装应用服务器,只有应用服务器已注册并且正在运行的情况下,才能创建客户程序。对于客户程序来说,既可以在设计期连接应用服务器,也...[ 查看全文 ]
  • 标签:Delphi
      开发中有时需要在流中查找某个字串,这些字串有可能是ASCII表后半部分或混杂.但是网上提供的例程效果不佳而且代码冗长. 后来自己抽个时间写了一个,代码极少,效率很高.仅供各位参考: function ScanStream(T:Tstream;S:String):integer; var i,j:integer; p:Pchar; begin getMem(p,T.size);//分配内存 T.ReadBuffer(p^,t.Size );//读 for i:=0 to T.S...[ 查看全文 ]
  • 标签:Web开发
    了解数据结构的人应该都听说过哈希表这种数据结构,它是一种典型的利用键值对存储并检索数据的一种非线性结构,又称散列表或杂凑法。在一般的线性表结构中,数据的相对位置是随机的,即数据和用于检索的关键字之间不存在确定的关系,检索数据时往往需要进行一系列的比较,最终找到要检索的数据,这种方法往往建立在循环比较的机制上,利用时间的代价节省了空间,实现了数据的存储和检索功能。而哈希表则...[ 查看全文 ]
  • 本文主要提供代码,创建自己的RSS,供别人订阅... --- RSS.aspx <%@ Page language="c#" Codebehind="RSS.aspx.cs" AutoEventWireup="false" Inherits="Socent.RSS" % --- RSS.aspx.cs using System; using System.Collections; using System.ComponentModel; using System.Data; using System.Drawing; using System.Web; using System.Web.SessionState; using System.Web.UI; using System.Web.UI.WebC...[ 查看全文 ]
  • 标签:SQLServer
    每位SQL Server开发员都有自己的首选操作方法。我的方法叫做分子查询。这些是由原子查询组合起来的查询,通过它们我可以处理一个表格。将原子组合起来,可以建立分子。当然也会有限制(化学家所称的化合价),但一般来说,这个原理还是适用的。 在本文中,我将探讨这种策略的几种变化。我从最基本的内容开始(即最详细的内容),然后逐步深化。为让你了解这种方法的灵活性,我会在不同层次使用几种技巧。(...[ 查看全文 ]
  • 在Delphi中获取和修改文件的时间 本文介绍了在Delphi中利用系统函数和Windows API函数调用来获取和修改文件的时间信息的方法。 熟悉Windows 95/98的朋友一定经常会用单击鼠标右键的方法来查看所选定的文件的属性信息。在属性菜单中会列出该文件的创建时间、修改时间和访问时间。这些信息常常是很有用的,它们的设置一般都是由操作系统(也就是由Dos/Windows等等)自动完成的,不会让用户...[ 查看全文 ]
  • 很多同学做设计的时候经常会漏掉这个漏掉那个,等到开发来问的时候才想到。现在有了网易同学自创的自查表,可以把一些问题提前预防起来,文章系统全面,条理性强,是不可多得的实用好文呦。 飞灵:对于移动应用来说,移动情景非常复杂,设备也很多样。那么在设计之后,设计评审之前,你的交互稿考虑的细节是否完善,对特殊状态的描述是否有遗漏,你是怎么提前发现一些问题并查漏补缺的?为解决这个问题,我们...[ 查看全文 ]
  • Delphi提供了功能强大的 DBGrid组件,以方便进行数据库应用程序设计。但是如果我们仅仅利用DBGrid组件,每一个获得焦点(Grid)只是一个简单的文本编辑框,不方便用户输入数据。Delphi也提供了一些其他数据组件来方便用户输入,比如DBComboBox,DBCheckBox等组件,但这些组件却没有DBGrid功能强大。Delphi能不能象Visual Foxpro那样让DBGrid中获得焦点网格可以是其它可视数据组件以方便用户呢?其实我们...[ 查看全文 ]
  • 标签:Delphi
    摘要: 随着信息化社会的发展和不同系统间数据交换的要求,XML将成为不同系统间数据交换的标准和传输格式。本文结合实例介绍了如何在Delphi中应用XML进行编程的技术。 关键字: 可扩展标记语言,Delphi, Web Service, InternetExpress. 1. XML及其背景 XML即Extensible Markup Language(可扩展标记语言)的缩写[1]。XML是Web上表示结构化信息的一种标准文本格。XML同HTML一样,都来...[ 查看全文 ]
手机页面 收藏网站 回到头部