qq_27612335-CSDN博客

原创按年查询

查询出所有2012年的行CREATE INDEX tbl_idx ON tbl (date_column); SELECT text, date_column FROM tbl WHERE TO_CHAR(date_column, 'YYYY') = '2012';

2016-09-22 15:57:34 176

原创创建取汉字首字母函数（第四版最优）

select dbo.f_getpy_V1('我是一个土生土长的中国人') select dbo.f_getpy_V2('我是一个土生土长的中国人') select dbo.f_getpy_V3('我是一个土生土长的中国人') select dbo.f_getpy_V4('我是一个土生土长的中国人') --我现在测试到的开销百分比是： --1:2:3:4对应1

2016-09-22 15:57:10 470

原创修改所有表的同一个字段

declare @cloum varchar(50)declare @sqlStr varchar(1000)--申请表名declare @tablename varchar(50)set @cloum='FStationNo'--申明一个游标DECLARE MyCursor CURSORFOR select name from sysobjects where x

2016-09-22 15:56:32 272

原创 ADO数据库连接池类

数据库连接池类// Writen by 咏南工作室(陈新光) 2009-6-26 11:58:17// 数据库连接池类// 使用ADO引擎，支持access, sqlServer, oracle三种数据库// 连接对象.tag = 正数表示此连接对象处于非使用状态，否则反之// 所有时间单位均为秒unit UDataConnPool;{$HINTS OFF}{$W

2016-09-22 15:56:02 352

原创遍历Panel组件上的所有控件：

procedure frmMain.CLS; //主窗体自定义事件CLSvar i:integer;begin for i:=0 to panel5.ControlCount -1 do begin if panel5.Controls[i] is TEdit then //Edit组件 begin ((panel5.Controls[i]

2016-09-22 15:54:55 2640

原创 dbgrideh、dxdbgrid和cxgrid保留上次的列宽、列序

delphi中常用的数据显示控件大多数都可以用拖动来调列顺序和列宽，而且这些设置是可以在下次打开时保留上次的操作的，这是个很实用也很有用的功能，能给用户很好的使用体验，下面是常用的DBGridEh、DxDbGrid和cxgrid三个数据显示控件的设置方法： dbgrideh：需要另外一个控件，PropStorageEh PropStorageEh 可以很方便的将窗体中控件

2016-09-22 15:53:57 626

原创 dxComponentPrinter操作打印预览 dxComponentPrinter1Link1.Preview(True); 页眉和页脚 [图片] dxComponentPrinter1Li

打印预览dxComponentPrinter1Link1.Preview(True); 页眉和页脚 dxComponentPrinter1Link1.PrinterPage.PageHeader.CenterTitle.Add(varToStr(MyQuery3.FieldValues['orderno']))

2016-09-22 15:52:32 721