- 博客(31)
- 资源 (4)
- 收藏
- 关注
RSS订阅转载 cxGrid使用技巧 转载自http://topic.youkuaiyun.com/t/20060106/09/4500997.html#
小技巧:用代码展开/收缩主从结构 Self.tvDepartment.ViewData.Expand(True); Self.tvDepartment.ViewData.Collaspe(True); 注:tvDepartment为主表对应的TableView 技巧二：在内置右键菜单的后面增加菜单项 首先应在Form上加一个cxGridPopupMenu
2009-07-07 16:09:00
2559
原创 cxGrid 设置斑马线 根据记录内容更改字体颜色
1、设置斑马线 很简单设置一个属性而已在TcxGridDBBandedTableView.Styles属性中有 ContentEven(奇数行风格) 和 ContentOdd (偶数行风格) ，设定一下风格就好了。 2、根据记录内容更改字体颜色参考范例CustomDrawTableViewDemo，主要在TcxGridDBBandedTableView.OnCustomDra
2009-07-01 11:02:00
2381
转载 为cxGrid增加行号(http://blog.youkuaiyun.com/estudy2008/archive/2007/08/09/1733546.aspx)
其实这个方法就是cxGrid范例中提供的，原范例在CellLevelMultiselectDemo目录下把cxGridView里OptionsView选项中的两项修改成如下 OptionsView.Indicator = True OptionsView.IndicatorWidth = 40//宽度在customDrawIndicatorCell事件中填写pr
2009-07-01 11:01:00
873
转载 聚焦索引与非聚焦索引及其查询效率(http://topic.youkuaiyun.com/u/20080303/11/F3AA3990-20EA-479C-9B15-A5318507291C.html)
随着“金盾工程”建设的逐步深入和公安信息化的高速发展，公安计算机应用系统被广泛应用在各警种、各部门。与此同时，应用系统体系的核心、系统数据的存放地――数据库也随着实际应用而急剧膨胀，一些大规模的系统，如人口系统的数据甚至超过了1000万条，可谓海量。那么，如何实现快速地从这些超大容量的数据库中提取数据（查询）、分析、统计以及提取数据后进行数据分页已成为各地系统管理员和数据库管理员亟待解决的难题。
2009-06-25 11:53:00
740
转载 SQL Server2005杂谈（2）：公用表表达式（CTE）的递归调用 （转载自网友 银河使者）
先看如下一个数据表（t_tree）： 上图显示了一个表中的数据，这个表有三个字段：id、node_name、parent_id。实际上，这个表中保存了一个树型结构，分三层：省、市、区。其中id表示当前省、市或区的id号、node_name表示名称、parent_id表示节点的父节点的id。 现在有一个需求，要查询出某个省下面的所有市和区（查询结果包含省）。如果只使用SQ
2009-06-17 14:24:00
477
转载 SQL Server2005杂谈（1）：使用公用表表达式（CTE）简化嵌套SQL （转载自网友 银河使者）
先看下面一个嵌套的查询语句：select * from person.StateProvince where CountryRegionCode in (select CountryRegionCode from person.CountryRegion where Name like C%) 上面的查询语句使用了一个子查询。虽然这条SQL语句并不复杂，但如果嵌
2009-06-17 14:21:00
478
转载 详细介绍SQL交叉表的实例 (转载)
很简单的一个东西，见网上好多朋友问“怎么实现交叉表？”，以下是我写的一个例子，数据库基于SQL SERVER 2000。 交叉表实例 建表： 在查询分析器里运行： CREATE TABLE [Test] ( [id] [int] IDENTITY (1, 1) NOT NULL , [name] [nvarchar] (50) COLLATE Chinese_P
2009-06-17 13:52:00
571
原创 理解SQL语句中 Exists()
理解SQL语句中 Exists() exists对于主查询而言只有一个作用：返回ture或false，而其本身查询的結果集不具任何意义因此在子查询的Select命令语句的字段行中通常使用通用字符*或者直接使用数字1执行步骤: 实际上是主查询每一次得到一条记录时，都会去判断where后面的条件是否都满足，如果满足了，那么这条记录将会作为结果返回。比如有如下数据表 Tb col1000
2009-06-17 09:56:00
3124
转载 Delphi中Format的字符串格式化使用说明
一、Format函数的用法Format是一个很常用，却又似乎很烦的方法，本人试图对这个方法的帮助进行一些翻译，让它有一个完整的概貌，以供大家查询之用： 首先看它的声明：function Format(const Format: string; const Args: array of const): string; overload;事实上Format方法有两个种形式，另外一种是三个参
2009-06-08 08:21:00
15986
转载 变体记录及存储方式(转载自 http://www.cnblogs.com/okwary/articles/1364018.html)
DELPHI中记录的存储方式 在DELPHI中，我们用record关键字来表明一个记录，有时候，我们还会看到用packed record来声明的记录，这二者的区别就在于存储方式的不同；在windows中，内存的分配一次是4个字节的，而Packed按字节进行内存的申请和分配，这样速度要慢一些，因为需要额外的时间来进行指针的定位。因此如果不用Packed的话，Delphi将按一次4个字节的方式
2009-06-05 11:42:00
1016
原创 在cxGrid 6 中完成数据录入功能续之如何使用Lookup字段
一般我们在程序开发过程中，经常会遇到显示给用户的是文字，而需要保存的是编号，这就产生了一种转换的要求，而Lookup字段正好可以满足这个要求。三方控件：数据集 TDAMemDataTable 表格cxGrid61、在数据集中新建一个字段，为Lookup类型.即选择该字段后，在属性编辑框中 Lookup=True LookupSource = ... Lookup
2009-05-31 11:25:00
1756
1
转载 Class Styles [WNDCLASS Structure]
风格 含义 CS_HREDRAW 如果窗口客户区宽度发生改变，重绘整个窗口 CS_VREDRAW 如果窗口客户区高度发生改变，重绘整个窗口 CS_DBLCLKS 能感受用户在窗口中的双击消息 CS_NOCLOSE 禁用系统菜单中的“关闭”命令 CS_OWNDC 为该窗口类的各窗口分
2009-05-26 22:21:00
645
转载 Windows常见窗口样式和控件风格
Windows常见窗口样式和控件风格 王佰营 徐丽红一、窗口样式WS_POPUP 弹出式窗口(不能与WS_CHILDWINDOW样式同时使用)WS_CHILDWINDOW 子窗口(不能与WS_POPUP合用)WS_MINIMIZE 创建窗口拥有最小化按钮WS_MINIMIZEBOX 创建窗口拥有最小化按钮，须同时指定WS_SYSTEM样式W
2009-05-26 22:04:00
897
转载 Low(X)：返回一个类型或变量的最小值 （转载 http://www.old-newbie.com/low-function/）
声明： function Low ( type or variable ) : Ordinal type;描述：Low函数返回一个类型或某个类型变量的最小允许值。它只应用于字符、数组、枚举和短字符串。对于数组，它返回数组的最小索引。备注：对于多维数组，它返回第一个子数组（大多定义在数组范围最左边的那个）的最小索引。一个开放数组的最小元素被独立给予为数组的开始索引，通常是0。{L
2009-05-20 15:04:00
620
原创 窗体停靠
unit Unit9; //主窗体{ 本单元目的: 演示如何使用CnPack停靠组件完成窗体停靠 说明: 只保存并显示那些停靠窗体, 如果子窗体没有停靠,那么就不会保存 所谓停靠包括停靠在主窗体上,也包括互相停靠子窗体. 重要提示: 本单元使用到了三个不常用但很有实用价值的技巧 1 字符串与枚举值的相互转换 2 根据字符串创建类/窗口 3
2009-05-20 08:49:00
1004
原创 cxGridDBTableView运行期自由调节行高
在cxGridDbTableView中设定属性OptionsView.Indicator:= True;OptionsCustomize.DataRowSizing:= True;即可。
2009-05-14 11:49:00
2193
原创 类类型的使用
unit Unit8;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm8 = class(TForm) mmo1: TMemo; btn1: TButton; procedure
2009-05-12 15:21:00
425
原创 技巧：展示cxGrid如何与数据集相互配合完成了Lookup功能
1 数据集(TDACDSDataTable)得先有Lookup字段,为此先创建一个字段FieldLookup。2 在FieldLookup(TDAFile)中，设定属性 Lookup = True LookupSource = 需要查找的数据源 LookupKeyFileds = 关联字段 LookupResultField = 需要显示的字段 KeyFie
2009-05-12 11:02:00
1744
原创 在cxGrid 6 中完成数据录入功能
1 在TcxGridDBTableView中,设定属性 NewItemRow.Visible = True2 在cxgrid中输入数据怎样回车换行 在TcxGridDBTableView中 将属性OptionsBehavior.FocusFirstCellOnNewRecord = True OptionsBehavior.GoToNextCellOnEnter =
2009-05-12 10:59:00
1374
原创 VCL 消息循环分析之改进版(可以触发WM_CREATE消息了)
program Project4;uses Windows, Messages;type TWndMethod = procedure(var Message: TMessage) of object;{这句类型声明的意思是：TWndMethod 是一种过程类型，它指向一个接收 TMessage 类型参数的过程，但它不是一般的静态过程，它是对象相关(object related)的。
2009-05-11 22:04:00
589
原创 回调函数到对象方法Thunk技术（转载自http://blog.youkuaiyun.com/wr960204/archive/2008/01/29/2071480.aspx）
构造一个通用的回调Thunk.(把回调函数指向对象的方法)最近又看到了VCL代码中的MakeObjectInstance函数,实际上是一段WndProc的Thunk代码.再一次感叹VCL设计之精巧,效率之高.不喜欢MFC的消息映射方式,MFC的消息映射虽然好理解,但是是采用查表方式效率实在是太低了.VCL的MakeObjectInstance可以说是VCL Windows系统的灵魂所在,效率极高.
2009-05-11 16:05:00
723
原创 以面向对象方式撰写的SDK程序包含了VCL的消息循环的精髓
program Project3;uses Windows, Messages;type TWndMethod = procedure(var Message: TMessage) of object;{这句类型声明的意思是：TWndMethod 是一种过程类型，它指向一个接收 TMessage 类型参数的过程，但它不是一般的静态过程，它是对象相关(object related)的。
2009-05-11 16:03:00
426
原创 程序5-8 Clover
program Clover;//程序5-8 Cloveruses Windows, Messages, Math;function WndProc(hWindow: HWND; Msg, wParam, lParam: LongInt): LRESULT; stdcall;const{$J+} hRgnClip: HRGN = 0; cxClient: Integer = 0; //
2009-04-26 16:48:00
390
原创 程序5-7 RandRect
program RandRect;//程序5-7 RandRectuses Windows, Messages;var cxClient, cyClient: LongWord;procedure DrawRectangle(hWindow: HWND);var hWndc: HDC; hBrush1: HBRUSH; rc: TRect;begin if (0=cxClient)
2009-04-26 15:42:00
366
原创 //程序5-6 WhatSize
program WhatSize;//程序5-6 WhatSizezeuses Windows, Messages;procedure Show(hWindow: HWND; hWndc: HDC; xText, yText, iMapMode: integer; szMapMode: PChar);var szBuffer: array[0..59] of
2009-04-26 15:05:00
439
原创 程序5-5 AltWind
program Altwind;uses Windows, Messages;function WndProc(hWindow: HWND; Msg, wParam, lParam: LongInt): LRESULT; stdcall;const{$J+} cxClient: Integer = 0; cyClient: Integer = 0; aptFigure: array
2009-04-25 16:09:00
400
原创 程序5-4 Bezier
program Bezier;uses Windows, Messages;procedure DrawBezier(hdc1: HDC; apt: array of TPoint);begin PolyBezier(hdc1, apt, 4); //贝塞尔曲线 // 绘制控制点与端点连线 MoveToEx(hdc1, apt[0].X, apt[0].Y, nil)
2009-04-25 15:42:00
423
原创 程序5-3 LineDemo
program LineDemo;uses Windows, Messages;function WndProc(hWindow: HWND; msg, wParam, lParam: LongInt): LRESULT; stdcall;const{$J+} cxClient: Integer = 0; cyClient: Integer = 0;{$J-}var ps: TPa
2009-04-25 13:12:00
464
原创 程序5-2 Sinewave
program Sinewave;uses Windows, Messages, Math;const NUM = 1000;function WndProc(hWindow: HWND; msg, wParam, lParam: LongInt): LRESULT; stdcall;const TWOPI = (2 * 3.1415926);{$J+} cxClient: i
2009-04-25 12:41:00
487
原创 程序1-1 HelloMsg
program HelloMsg;uses Windows;begin MessageBox(0, Hello Windows 98!, HelloMsg, 0);end.
2009-04-19 09:13:00
392
原创 程序2-1 SCRNSIZE程序
program Scrnsize;uses windows;procedure MessageBoxPrintf(Caption, Format: PChar; const Args: array of const);var OutBuff: array[0..100] of Char; OutList: array of LongWord; j: Integer;begin Set
2009-04-19 09:09:00
473
FireDAC_7_XE3 FireDAC_8_XE4
2015-03-25
FIBPlus 7.0_FS
2010-12-04
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人