del88 - 博客园

2014年3月8日

Delphi2010中TResourceStream流使用

摘要： Resource可以是任意文件（图像、声音、office都可以），直接打包到编译的exe文件中，调用也非常方便打开一个新的或已有的delphi工程 1.先在 Project->resources..添加一个图片，并更改名字为myfirst，类型为RT_RCDATA 2.在窗体上方一个image和b 阅读全文

posted @ 2014-03-08 18:09 del88 阅读(8) 评论(0) 推荐(0) 编辑

2014年3月4日

AdoQuery 多列查询定位方法

摘要： frmClientDm.TopItemSkuShow_adoq.Locate('top_outer_iid;top_outer_sid', VarArrayOf([top_outer_iid,top_outer_sid]),[loCaseInsensitive]); 阅读全文

posted @ 2014-03-04 15:08 del88 阅读(37) 评论(0) 推荐(0) 编辑

2014年2月27日

设置连接超时时间【有待深入研究】

摘要： // //测试连接 try MyAdoCon.LoginPrompt := False; MyAdoCon.ConnectionString := MySqlApi.GetConnectionString(top_server_type,top_server_name,WindowsLogin,'' 阅读全文

posted @ 2014-02-27 12:11 del88 阅读(12) 评论(0) 推荐(0) 编辑

2014年2月18日

delphi 设置一个控件在一个窗口的正中间方法

摘要： 1.选中控件，右键 postion-- 最下面两个 x y 坐标，center in window 阅读全文

posted @ 2014-02-18 16:03 del88 阅读(29) 评论(0) 推荐(0) 编辑

选中单元格列名，和双击单元格触发事件的顿悟和解决方案

摘要： 1.由于单独列并没有对应的双击事件后来也想了想确实不应该有，因为双击单元格就是双击表格，如果双击单元格也有事件的话那岂不是和双击表格的双击事件重复了吗 2.解决方案，就是下图在双击表格的事件中写代码，然后做些判断：、 3.代码如下： procedure TfrmCust 阅读全文

posted @ 2014-02-18 13:30 del88 阅读(26) 评论(0) 推荐(0) 编辑

DBGRIDEH 鼠标滚动和点击单元格解决思路【无意间看到，主从表】

摘要： DBGRIDEH 鼠标滚动和点击单元格因为我是用2个DBgridEH，主表数据变化（用的是OnCellClick），明细表也变化。现在的情况时，鼠标滚动时，明细表数据不变化好像也没看到相关的事件请指教方案 OnCellClick?你的意思是滚动鼠标中间的滚轮?这个功能是不用写代码的。设置数据集阅读全文

posted @ 2014-02-18 12:14 del88 阅读(51) 评论(0) 推荐(0) 编辑

DbgridEh一个人的整理打包成 PDF版本，我以后也这样搞下

摘要： http://www.doc88.com/p-771829547690.html 阅读全文

posted @ 2014-02-18 12:08 del88 阅读(32) 评论(0) 推荐(0) 编辑

dbgrideh 下拉显示多列

摘要：阅读全文

posted @ 2014-02-18 12:06 del88 阅读(31) 评论(0) 推荐(0) 编辑

把电脑的日期时间修改成正规的

摘要： procedure TDateTimeApi.AutoEditUserComputerDateFormat; var p: DWORD; MyWinDate,MyWinTime: string; MyDateTimeChange: Boolean; begin // { 2014.02.18增加判断阅读全文

posted @ 2014-02-18 09:58 del88 阅读(3) 评论(0) 推荐(0) 编辑

2014年2月17日

DbgridEh表格框的【可连续点击两次编辑设置，和不允许点击两次编辑的设置】

摘要：阅读全文

posted @ 2014-02-17 23:05 del88 阅读(7) 评论(0) 推荐(0) 编辑

2014年2月9日

Adoquery 简单的事务编程超级棒

摘要： 1.记得有一次看 c#视频教程，发现了一个简单事务处理的绝佳方法，就是 adoquery 其实是可以同时执行多条 SQL 语句的，当其中一条 SQL 语句失败了，那么其余 SQL 语句也会失败，这个发现真正太棒了，、这就是简单事务处理的绝佳方法。。阅读全文

posted @ 2014-02-09 21:38 del88 阅读(21) 评论(0) 推荐(0) 编辑

2013年11月22日

TStringList的IndexOfName

摘要： IndexOfName这个方法用着很好，记录下，以后留意下上个例子： procedure TForm1.Button1Click(Sender: TObject); var MyList: TStringList; begin MyList := TStringList.Create; try M 阅读全文

posted @ 2013-11-22 13:30 del88 阅读(5) 评论(0) 推荐(0) 编辑

2013年10月21日

Loading进度条

摘要：阅读全文

posted @ 2013-10-21 19:14 del88 阅读(4) 评论(0) 推荐(0) 编辑

2013年10月17日

公司目标

摘要：开发出一款取代淘宝助理的软件终极目标让淘宝助理收购50%的股份靠这个软件争1000万阅读全文

posted @ 2013-10-17 14:15 del88 阅读(14) 评论(0) 推荐(0) 编辑

Excel 分列功能帮助用户导入Excel

摘要：今天遇见一个客户的 Excel有一列就是导入不进去那列基本都是数字我试了下写入几个字符就能导入不写字符的就是导入不进去龚蓼告诉我用分列功能今天试了下草果然可以用分列功能分列下就可以了莫名奇妙一直下一布然后选文本完成就可以了同时这个功能也能把省阅读全文

posted @ 2013-10-17 11:23 del88 阅读(13) 评论(0) 推荐(0) 编辑

2013年10月16日

TPopupMenu 替换自身自动的热键

摘要：有时候自动生成的热键并不是很理想这个时候需要用自己认为好的方法如下图，加个(&热键) 阅读全文

posted @ 2013-10-16 16:13 del88 阅读(6) 评论(0) 推荐(0) 编辑

时间减去一个小时怎么做 delphi 很方便看代码

摘要： procedure TfrmTongBuTid.Button1Click(Sender: TObject); begin TopStartModifiedTime_dtp.Time := TopStartModifiedTime_dtp.Time - OneHour; end; 需要引用 Syste 阅读全文

posted @ 2013-10-16 14:12 del88 阅读(49) 评论(0) 推荐(0) 编辑

2013年9月18日

建立互斥程序代码一般的程序用不到

摘要： // { 判断是否已经在运行了一个程序,由于程序老是启动不起来,客户也很着急,老是需要点击多次才能出来,所以这里去掉,增强客户体验大不了,启动了多个程序,客户关掉便是,不能影响客户体验. } // MyHandle := CreateMutex(nil,True,'MyShopdaxiaMain' 阅读全文

posted @ 2013-09-18 15:03 del88 阅读(1) 评论(0) 推荐(0) 编辑

2013年9月15日

ListView 判断有没有选中的行方法

摘要： ListView1.SelCount 返回选中行的行数应该是没有测试但是测试了如果没有选中行返回0 如果选中一行了返回1 阅读全文

posted @ 2013-09-15 11:42 del88 阅读(10) 评论(0) 推荐(0) 编辑

2013年9月8日

ListView改变行高的技巧

摘要：改变 ListView 的行高 (Line Height) (cjc,2009.6.2) 改变 ListView 的行高 (Line Height) (cjc,2009.6.2) ListView在Report模式下，行与行间隔较窄，以下方法在不更换字体的情况下，改变行高，使看起来宽松一点。 1. 阅读全文

posted @ 2013-09-08 21:26 del88 阅读(187) 评论(0) 推荐(0) 编辑

2013年9月4日

用superxmlparser.pas的XMLParseString----XML转Json注意

摘要：了解XML转成Json时候用的时候多了个#号：对下面XML进行转换： <?xml version="1.0" encoding="utf-8"?><response><result>1</result><errorDesc>无错误信息</errorDesc><assignIds><assignId 阅读全文

posted @ 2013-09-04 16:49 del88 阅读(18) 评论(0) 推荐(0) 编辑

2013年8月16日

DBGRIDEH 底部多列发现

摘要： 1.设置底部行数 2.点击footers 单独对每一行进行设置 3.单独对这两行进行设置 5.看下辅助所以用的时候可以这样用：WeiTopTradeShow.FieldColumns['top_xuhao'].Footers[1].Value := IntToStr(MyAdoq.RecordC 阅读全文

posted @ 2013-08-16 10:15 del88 阅读(16) 评论(0) 推荐(0) 编辑

2013年8月7日

TActionManager Delphi 超级方便的快捷键草草

摘要： delphi 中用快捷键草实在是太简单了、自己摸索出来的方法 1. 2. 3.这样对应好 4. 就这样下拉下就可以了 5.最后注意代码应该写在 action事件中不要写在按钮事件中否则会造成按钮是灰色的阅读全文

posted @ 2013-08-07 23:46 del88 阅读(27) 评论(0) 推荐(0) 编辑

2013年6月30日

淘宝工作人员手机

该文被密码保护。阅读全文

posted @ 2013-06-30 15:52 del88 阅读(30) 评论(0) 推荐(0) 编辑

2013年6月9日

Delphi IDE 批量替换工具

摘要：阅读全文

posted @ 2013-06-09 10:45 del88 阅读(224) 评论(0) 推荐(0) 编辑

2013年5月29日

Delphi Timer不是多线程

摘要：定时器的中断级别很低，如果你的业务数据自动处理过程对实时性要求不高也可以选择timer，线程是基于系统分配CPU时间片来工作的，对于实时性高，响应快要求高的处理过程最有用。最重要的，线程不会让界面死锁。如果程序现在正在执行a事件，timer事件激活了，需要去处理b事件。程序是怎么运行呢？是先阅读全文

posted @ 2013-05-29 00:23 del88 阅读(36) 评论(0) 推荐(0) 编辑

2013年5月25日

FastReport合并单元格(自己总结)

摘要：这个问题攻了多次都没有解决，实在是心力绞碎。。。就是在没有希望的时候。我的好员工（龚蓼）通过百度这个搜索引擎，搜到一篇文章解决了这个问题：系统中有一个打印需要实现一个字段的显示合并值，而fastreport只提供了抑制重复值属性（SuppressRepeated），它不能直接把框线给自动合并，这阅读全文

posted @ 2013-05-25 23:54 del88 阅读(399) 评论(2) 推荐(0) 编辑

2013年5月23日

FastReport Page与Page#区别

摘要：阅读全文

posted @ 2013-05-23 21:19 del88 阅读(16) 评论(0) 推荐(0) 编辑

FastReport 增加自定义函数的时候,如果函数有默认参数,一定不要忘记下方的也增加下参数,否则默认参数无效

摘要： FastReport 增加自定义函数的时候,如果函数有默认参数,一定不要忘记下方的也增加下参数,否则默认参数无效阅读全文

posted @ 2013-05-23 13:28 del88 阅读(7) 评论(0) 推荐(0) 编辑

2013年5月21日

Delphi标准控件-按钮（Button）和位图按钮（BitBtn）

摘要：按钮（Button）是Windows应用程序界面中最常用、最简单的组件之一。除了按钮之外，Delphi还提供了一种位图按钮（BitBtn）。这种按钮的不同之处在于按钮上可以显示位图。下面我们通过一个简单的例子来介绍这两种按钮。在窗体Form1上放置两个普通按钮和两个位图按钮以及一个编辑框Edit，阅读全文

posted @ 2013-05-21 18:55 del88 阅读(278) 评论(0) 推荐(0) 编辑

如何不让BitBtn点击后窗口自动关闭...及知识小结

摘要：今天在做DELPHI的时候，在第二个窗口中加了一个BitBtn按钮，为了减少枯燥的图标，就给它设置了Kind属性为bkOK，但在运行时这个窗口却在这个按钮点击时被关闭了，本还以为是代码的问题，可前前后后的找了大半天也没有找到，郁闷啊，还以为自己编错了，就重新加个按钮把代码加上去，运行一下是对的，窗口阅读全文

posted @ 2013-05-21 18:52 del88 阅读(21) 评论(0) 推荐(0) 编辑

2013年5月13日

DBGRIDEH 进度条、百分比、列的显示格式(以后很有用途)

摘要：列的显示格式,DisplayFormat 很有用途,这里可以写成##.##%,##% 等等根据自己的情况,这个字段的显示格式很有用途，扩展性很强，也可以写成##元这样以后价格的就会显示67元这样很好这个字段设计的真的是很好下面那列显示进度条的那列，是dbgrideh官方的列子里的代码： p 阅读全文

posted @ 2013-05-13 09:31 del88 阅读(141) 评论(0) 推荐(0) 编辑

2013年5月5日

防止程序重复运行互斥

摘要：将下面的代码放到工程文件中uses windows;...var MutexHandle:Thandle; begin Mutexhandle:=windows.CreateMutex(nil,true,'能代表程序特点的字符串');if Mutexhandle<>0 thenbeginif get 阅读全文

posted @ 2013-05-05 23:55 del88 阅读(18) 评论(0) 推荐(0) 编辑

关于禁止程序重复启动的另一种需要与实现

摘要：手头的程序需要禁止重复启动, 但需要保留新的、关闭旧的. 我想还是从主窗口的类名下手吧; 写了一个函数, 在 OnCreate 中调用即可: { 函数 } procedure CloseSameClassNameWindow(ACurrentWindow: HWND; const AClassNam 阅读全文

posted @ 2013-05-05 23:28 del88 阅读(6) 评论(0) 推荐(0) 编辑

防止程序重复执行的单元

摘要： //工程引用此单元就能防止同时出现多个实例 unit MultInst; interface uses Windows ,Messages, SysUtils, Classes, Forms; implementation const STR_UNIQUE = '{2BE6D96E-827F-4BF 阅读全文

posted @ 2013-05-05 23:26 del88 阅读(127) 评论(0) 推荐(0) 编辑

2013年4月22日

内存泄漏 ReportMemoryLeaksOnShutdown

摘要： DebugHook 与 ReportMemoryLeaksOnShutdown 都是 System 下的变量. DebugHook: 程序中母体中运行时, 此值是 1; 独立运行时, 它是 0. 在程序的任何地方加上一句 ReportMemoryLeaksOnShutdown := True; 这样阅读全文

posted @ 2013-04-22 10:08 del88 阅读(48) 评论(0) 推荐(0) 编辑

Delphi2010中的fastMM，ReportMemoryLeaksOnShutdown，内存泄漏

摘要： Delphi2010集成了fastMM，这回大家调试程序是的时候可以方便地检查内存泄露了。使用方法如下：在project中，添加一行 ReportMemoryLeaksOnShutdown := DebugHook<>0; DebugHook<>0 目的是保证单独运行exe文件不会弹出内存泄露框阅读全文

posted @ 2013-04-22 09:41 del88 阅读(8) 评论(0) 推荐(0) 编辑

TStream类详解

摘要：一. TStream类 1.1 TStream类概述 20.1.1 TStream对象 TStream对象是能在各种媒介中存储二进制数据的对象的抽象对象。从TStream 对象继承的对象用于在内存、Windows资源文件、磁盘文件和数据库字段等媒介中存储数据。 TStream中定义了两个属性：Si 阅读全文

posted @ 2013-04-22 00:26 del88 阅读(8) 评论(0) 推荐(0) 编辑

string与PChar

摘要： Delphi Help 关键字String to PChar conversions 长字符串转换到PChar不是自动的。他们之间的不同点导致他们的转换存在问题。 1，长字符串是引用计数的，而PChar不是 2，赋值给长字符串是数据的拷贝，而PChar是指向数据的指针。 3，长字符串是空止符结尾，并阅读全文

posted @ 2013-04-22 00:21 del88 阅读(6) 评论(0) 推荐(0) 编辑

delphi中pchar、char、string的定义与区别

摘要： Char是单个字符；PChar 就是指向一个以Null 结尾的每个字符为一个字节的字符串的指针。 (可以看成是一个字符串)String是字符数组，以字符#0结尾； Char只占一字节的空间，而Pchar保存的是一个指针，在现在32位的系统中占有1个指针字节的大小。type PChar=^Char; 阅读全文

posted @ 2013-04-22 00:17 del88 阅读(8) 评论(0) 推荐(0) 编辑