- 博客(224)
- 资源 (27)
- 收藏
- 关注
RSS订阅原创 九宫格数值分组
解答网友问题, 记录如下:原始数据11,3811,3611,3711,3911,4012,3412,3512,3612,3712,3812,4013,3313,3413,3513,3613,4014,3214,3314,3414,3514,4015,3115,3215,3315,3415,4016,3016,3116,3216,39
2013-08-06 16:52:50
1822
原创 Delphi 单例模式
单例模式简单示意, delphiXE下测试通过unit Singleton;(* 单例模式适用于辅助类, 一般伴随于单元的生命周期*)interfaceuses SysUtils;type TSingleton = class public class function NewInstance : TObject; override; class f
2013-07-31 10:48:17
2914
原创 修改cxgrid的分组标题
修改cxgrid的分组标题 delphi XE测试通过.单元文件unit Unit15;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, cxGraphics, cxControls, cxLookAndFeels, cxLo
2013-04-26 16:29:18
4287
1
原创 delphi实现执勤表
按周循环排班, 员工人数及值班人数可自定义.单元文件unit Unit15;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm15 = class(TForm) mmo1:
2013-04-10 10:36:19
2333
1
原创 FloodFill用法记述
函数说明如下:{x,y:当前坐标Color:针对该色彩执行填充事件FillStyle:fsBorder(从当前位置开始填充,直到遇到Color),fsSurFace(当前底色和color相同时填充) }procedure TCanvas.FloodFill(X, Y: Integer; Color: TColor; FillStyle: TFillStyle);示例代
2013-03-26 14:53:41
5087
原创 监控指定文件夹
该功能在delphi XE + XP 下测试通过O2DirSpy.pas (该单元获取自网络){====================================================================}{ TOxygenDirectorySpy Component, v1.6 c 2000-2001 Oxygen Software }
2013-03-14 09:02:30
2274
原创 静态/动态调用dll封装窗体(模态/非模态)
看到有网友需要这样的例子,所以写了一个. 有不对或不合理的地方请跟帖指导.delph XE下测试通过.Dll项目文件library Project10;uses SysUtils, Classes, Forms, Unit14 in 'Unit14.pas' {Form1};{$R *.res}Function EDebtMoney(H: TH
2013-03-14 08:47:14
3165
3
原创 jpeg图片压缩
一个压缩jpeg图片的过程uses jpeg;procedure ZipJPEG;var jpg: TJpegImage; bmp: TBitmap;begin jpg := TJpegImage.Create; bmp := TBitmap.Create; try jpg.LoadFromFile('c:\A.jpg'); bmp.Width
2013-03-01 15:53:31
1381
原创 程序隐藏状态栏全屏显示
程序可以在隐藏状态栏全屏显示和原始状态显示之间切换unit Unit13;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm13 = class(TForm)
2013-02-25 11:09:49
1710
原创 OXygen DirectorySpy delphi版文件监控
下载了Oxygen Dir Watcher, 需要安装控件, 直接改成单元引用了上代码:O2DirSpy.pas{====================================================================}{ TOxygenDirectorySpy Component, v1.6 c 2000-2001 Oxygen Softwa
2013-02-22 10:02:54
2167
2
转载 JPEG文件编/解码详解
学习JPEG文件格式过程中看到的高质量博文, 转载过来, 谢谢博主 [我在这里WINCE/Linux/Android]原文链接: JPEG文件编/解码详解JPEG文件编/解码详解cat_ng 猫猫JPEG（Joint Photographic Experts Group）是联合图像专家小组的英文缩写。它由国际电话与电报咨询委员会CCITT（The Internation
2013-02-20 10:21:35
1303
转载 Exif格式分析
学习JPEG文件格式过程中看到的高质量博文, 转载过来, 谢谢博主 [lsiyun的专栏]原文链接 目录(?)[-]JPEG格式和标志Exif中使用的标志Exif数据结构TIFF头的格式IFD图像文件目录Image file directory数据格式IFD数据结构缩略图JPEG格式缩略图TIFF格式缩略图ExifTIFF 中使用的标签
2013-02-20 10:16:29
15953
1
原创 JFIF格式的Jpeg属性读取
JFIF格式的Jpeg属性读取, 读取了标准文件头, 其它内容结构需要逐项解析, 暂时没有做, 有感兴趣的朋友可以继续完善.procedure TJFIF.ReadAPPn;var wrd, wrd2 : word; str : string;begin wrd := GetWord; while (wrd >= $FFE1) and (wrd <= $FFEF) d
2013-02-17 17:07:45
5317
原创 Jpeg图片属性读取EXIF
jpeg图片属性读取测试环境 Delphi XE主要功能代码获取自其他作者单元文件unit utJpegInfo;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type Tf
2013-02-16 17:09:44
7914
3
原创 delphi读取webbrowse中的图片显示在Image中
delphi读取webbrowse中的图片显示在Image中==================================================aa.html 单元文件unit Unit11;interfaceuses Windows, Messages, Sys
2013-01-16 15:22:38
4261
原创 delphi提取任意长度随机数
设定随机数范围, 返回数组长度, 得到一组不重复的随机数unit Unit11;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm11 = class(TForm) btn
2013-01-16 14:22:56
3965
1
原创 Delphi版IP地址与整型互转
直接上单元代码unit Unit11;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm11 = class(TForm) edt1: TEdit; btn1: T
2013-01-15 10:17:02
4405
1
原创 多个WebBrowser的按键响应
使用场景: 多个WebBrowser同时使用, 分别响应回车, 右键菜单等事件已在Delphi xe测试通过//单元文件unit Unit11;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, OleCtrls,
2013-01-10 09:42:08
2148
原创 delphi仿IE浏览器标签页效果演示
看到有同学提问, 自己试炼了一把, 只为实现标签页效果, 未作细化和完善工作.路过的同学多多指教 --------------------------------------------------------------a.html无标题文档btnahrefbtnso单元文件unit Unit11;
2013-01-09 01:12:30
4416
原创 delphi代码创建bde别名示例
实际应用中可能需要程序自动创建BDE别名特试建 MSsql和paradox数据库别名//单元代码unit Unit11;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DBTables;type
2013-01-08 15:06:44
2868
原创 多线程实现厕所排号
看到一个帖子, 好玩, 学习着实现了一下 呵呵场景如下:公司同事排队上厕所, 如果厕所有空位, 优先考虑领导使用, 然后才是普通员工按排队顺序使用------------------------------------------------------------------------------------------------------------------
2013-01-06 01:42:26
38558
9
原创 表达式计算器
表达式计算器, 支持四则混合运算, 常量代入扩展后可实现表达式嵌套引用, 防循环调用等功能//公式解析单元unit utFormula;interface uses SysUtils, Generics.Collections;type //表达式计算器 TFormula = class private const OPE = ['+', '-
2012-12-23 22:18:49
5668
1
原创 单位换算 Delphi示例
unitConversion.XML 单位分类及对应关系 1 1000 1000000 0.00220462 1 100 1000 0.001 39.37 1 1000000 1000000000 0.000000001 61024 1 10000 1000000 0.000001 0.
2011-10-25 14:42:20
1250
转载 金庸笔下还有成功的婚姻吗
衡山派掌门人莫大先生一直没有婚娶。有一回群雄聚会，刘正风忍不住问他："师兄，你 都一把年纪了，怎么还不娶妻生娃呢？" 莫大先生眼睛半开半闭，拉着他的胡琴，慢悠悠地说出一番话来：要说成婚哪，首先得找个女人，对吧？婚姻本来就是男人和女人的事。――东方不败脸色一沉，绣花
2011-08-05 13:52:13
657
原创 JavaScript语法学习笔记之 鼠标及按键操作
JavaScript语法学习笔记之 鼠标及按键操作看到的朋友有任何意见和建议请多提---------------------------------------------------------------------------------------------
2011-08-04 17:59:41
943
原创 JavaScript语法学习笔记
我搞j2ee属于半路出家,没有系统学习过,大多功能是会用,但讲不出道道,不成体系. 在jsp文件中常使用jquery,对javascript属于现学现用.看到的朋友有任何意见和建议请多提-----------------------------------------------
2011-07-22 10:46:10
1358
5
转载 大型网站架构不得不考虑的10个问题
这里的大型网站架构只包括高互动性高交互性的数据型大型网站，基于大家众所周知的原因，我们就不谈新闻类和一些依靠HTML静态化就可以实现的架构了，我们以高负载高数据交换高数据流动性的网站为例，比如海内，开心网等类似的web2.0系列架构。我们这里不讨论是PHP还是JSP或者.NET环境，我们从架构的方面去看问题，实现语言方面并不是问题，语言的优势在于实现而不是好坏，不论你选择任何语言，架构都是必须要面
2009-02-03 09:02:00
613
1
转载 金庸在浙江大学招博士生的考卷[暴强]
金庸在浙江大学招博士生的考卷，看看什么才叫素质教育。一、选择题 ◎ 单选 1、蓝凤凰及其诸位女弟子通过水蛭将血输到令狐冲体内，你可以得到以下那种推测： a、令狐冲为ab型血，蓝凤凰及其弟子为a、b、或ab型 b、令狐冲为b型血，蓝凤凰及其弟子为ab、b或o型 c、令狐冲为o型血，蓝凤凰及其弟子为a、b或o型 d、令狐冲为a型血，蓝凤凰及其弟子为ab或o型 e、以上推测都不对
2008-12-31 11:17:00
5924
18
原创 一个数据汇总，列合并的例子
-- 问题库存表A（现有库存） PARTNO PARTDESC VENDO GRADE SALESTYPE UNIT QTY A001 N-07 L KG 800 B005 M01 O KG 500 ..... 收货记录表B PARTNO VENDNO SALESTYPE ACTQTY IN
2008-08-05 11:05:00
816
转载 数据库自动网络备份
企业管理器--管理--SQL Server代理--右键作业--新建作业--"常规"项中输入作业名称--"步骤"项--新建--"步骤名"中输入步骤名--"类型"中选择"Transact-SQL 脚本(TSQL)"--"数据库"选择执行命令的数据库--"命令"中输入要执行的语句: declare @strsql
2008-06-14 13:41:00
680
转载 Delphi惹谁了？
最早的时候就有C++程序员做Win32的产品没有Delphi程序员快，不服气地说Delphi的不好，理由是Delphi只能拖拉控件，不能OOP。几年以前，当Java刚刚火起来的时候，Java程序员说Delphi不行，理由是Delphi不能开发web。后来有一本《Java与模式》的书让Java程序员大开眼界，他们常常在与Delphi程序员论战时使出撒手锏：“Delphi能用设计模式吗？”。再后来，有
2008-06-12 11:57:00
1518
4
转载 数据库设计中的14个关键技巧
数据库设计中的14个关键技巧 function StorePage(){d=document;t=d.selection?(d.selection.type!=None?d.selection.createRange().text:):(d.getSelection?d.getSelection():);void(keyit=window.open(http://ww
2008-05-29 17:03:00
922
转载 SQL SERVER 2005 同步复制技术
SQL SERVER 2005 同步复制技术 以下实现复制步骤（以快照复制为例） 运行平台SQL SERVER 2005 一、准备工作： 1．建立一个 WINDOWS 用户，设置为管理员权限，并设置密码，作为发布快照文件的有效访问用户。 2．在SQL SERVER下实现发布服务器和订阅服务器的通信正常（即可以互访）。打开1433端口，在防火墙中设特例 3．在发布服务器上建立一个共享目录，作为发布快
2008-05-29 16:59:00
646
原创 Dll窗体调用解
//Project1==========================================================================//调用窗体 Beginunit CMain;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, F
2008-05-19 15:53:00
1439
转载 关于MS SQLSERVER索引优化问题
**********************************************************Author:黄山光明顶mail:[email protected]:1.0.0date:2004-1-30***********************************************************有一网友问:关于MS SQL
2008-04-22 08:51:00
986
转载 2008年商业智能前景预测
2008年商业智能前景预测 1)SaaS BI将继续获得市场份额 首先，从我工作的地方来看，对于我预测BI作为一种服务将会持续增长市场份额，这并没有什么奇怪的。然而，我做出这个判断并不是 根据个人的一拍大腿后作出的，我是根据市场的真实事实才得出这一预测的。SaaS BI解决方案的用户们对它们非常狂热——他们喜欢带有分析决策的服务。要想证明这一事实，只需要看看salesforce.com
2008-03-21 18:36:00
835
转载 EMC首款企业级SaaS产品亮相 产品策略初见端倪
EMC首款企业级SaaS产品亮相 产品策略初见端倪存储时代1月23日报道： EMC于昨天正式推出了旗下第一款企业级Saas(软件即服务)产品，向使用Mozy(EMC去年出资7600亿美元收购)技术的长期产品策略中增加了新的产品支持。 现在EMC公司已经正式创建了SaaS业务部门，并且推出了EMC Fortress技术平台，为特定产品服务项目提供集中化监控和评估。 EMC公司SAAS业务
2008-03-21 17:37:00
782
转载 SAAS CRM：外贸B2B平台的发展机遇
SAAS CRM：外贸B2B平台的发展机遇 随着国内最大的B2B网络公司Alibaba的上市，B2B上市阵营中已经有环球资源、EBay、慧聪网、网盛科技、和Alibaba等，而中国制造网也 正紧锣密鼓地筹备在2008年上市。B2B网络公司的资本化运作的结果必然使行业的聚集度更快地提高，终将形成综合性网站2-3家、各行业垂直网站分别在 2-3家的格局。那时更多的中小B2B网站的生存空间
2008-03-21 17:34:00
1211
转载 2011年中国SaaS产业市场规模将突破400亿
2011年中国SaaS产业市场规模将突破400亿 2006中国软件运营服务(SaaS)产业的规模为68亿元，2011年将突破400亿，达到406亿元，未来五年的复合增长率达到43%。这是国内 ICT领域权威研究机构计世资讯(CCW Research)在其最新发布的《软件业的下一个十年——中国软件运营服务(SaaS)市场发展趋势研究报告》中指出的。 该报告认为，软件运营服务(SaaS)是
2008-03-21 17:32:00
756
Codejock.Xtreme.Toolkit.Pro.v15.2.1.Full.Source.Retail.Incl.Keymaker-ZWT
2013-11-27
devexpress cxLookupCombo在cxgrid中的调用示例
2013-09-24
AXMLPrinter2、baksmali、smali、dex2jar
2013-07-30
Manning.iText.in.Action.2nd.Edition.Oct.2010
2012-11-15
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人