十年

  :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

02 2005 档案

delphi實現交叉表
摘要：经常在CSDN上查阅名位大侠的文章，得益不少，近期因做一个项目，需要用到交叉表，报表上倒是有，但客户要求在Grid上能操作，没有办法，只好自己写了一段代码用于普通查询到交叉表的实现，不敢独享，故上传，望能抛砖引玉，请名位大侠不吝指教。 function CreateTmptab(const AFieldDefs:TFieldDefs):TDataSet; var TempTable:Tat... 阅读全文
posted @ 2005-02-25 15:30 留不住的时光 编辑

有限狀態自動機
摘要： 阅读全文
posted @ 2005-02-17 09:33 留不住的时光 阅读(483) 评论(0) 推荐(0) 编辑

Delphi中文字旋转
摘要：procedure TForm1.Button2Click(Sender: TObject); var i: integer; LogcalFnt:TLogFont; TempFont,NewFont:integer; sDispStr:Pchar; begin LogcalFnt.lfHeight:=10;//字高 LogcalFnt.lfWidth:=10;//字宽 LogcalFnt.lfE... 阅读全文
posted @ 2005-02-16 09:16 留不住的时光 阅读(2287) 评论(0) 推荐(1) 编辑

判断是否安装了SQL Server
摘要： 阅读全文
posted @ 2005-02-15 11:13 留不住的时光 阅读(1702) 评论(0) 推荐(0) 编辑