ADelphiCoder的博客_Delphi 开发

关于交换两个整数（不借助第三个临时数）...

不借助第三个临时数交换两个整数，无外乎进行所谓的数字魔术，或借助寄存器实现，但除此外还有一种“巧妙的”方法：通过 XOR 变换实现——不过论其本质，还是所谓的数字魔术，:-) ... 随手测试了下数字魔术、借助寄存器（纯 Asm 实现）及 XOR变换的效率，耗时显示，纯 Asm 实现 <

职场

休闲

原创 2009-10-21 11:40:27 626 阅读

编程控制系统服务

工作中可能需要多次启动、停止某项服务（程序），若每次都（计算机管理--->服务和应用程序--->服务）手动操作，未免有点繁琐... {***************************************************************************

职场

休闲

原创 2009-10-21 11:34:36 503 阅读

超简单版网络爬虫（定制）

本程序编写初衷只是想稍微帮下一朋友从某网页抓取数据资料，代码及逻辑都很简单（目标网页貌似很不怎样，各方面性能都较差...），可修改优化之处很多，仅供业余摆弄。{ 问题来源: http://jdxx.zhs.mofcom.gov.cn/website/btgs.jsp 实现步骤： 1、浏览指定网页，使用者输入查

职场

休闲

原创 2009-10-21 11:32:52 1740 阅读

限制 TEdit 只能接收数字输入...

实际开发中，若想让 TEdit 只能接收数字输入，可通过简单调用一 API 即可“标准实现”之： SetWindowLong( &n

职场

休闲

原创 2009-10-21 11:31:30 373 阅读

如何查看 Oracle 中的 Clob 字段内容

Oracle 中的 Clob 字段可用来存储 N长的字符串等内容（如 HTML文件等），而若要在程序中正常显示其字段内容则需用上 to_char 函数——如否，则其内容很可能会被截取... 示例代码： uses ShellAPI; var FileTmp: string; sl: TStrings; begin

oracle

职场

休闲

原创 2009-10-21 11:30:33 4559 阅读

dxDBGrid 中如何将整型字段值显示为相应字符串

数据库设计中，某些字段可能被设计成 Integer 类型，不同的 Integer 代表不同的含义；而在实际开发应用中若将这些 Integer 显示给用户明显意义不大——用户需要的是这些 Integer 的确切含义而不是这些 Integer 本身... 于是在显示数据时需在 Integer 及其相应的字符串间稍作转换。实现代码：//Tfrm_Main

职场

休闲

原创 2009-10-21 11:29:44 448 阅读

控件设计：自动下拉的 ComboBox（类似 IE 地址栏）

旧作，经修改 Delphi 精要一书中的源码而成。unit HGYAutoDropComboBox;interfaceuses SysUtils, Classes, Controls, StdCtrls, Windows, Messages;type THGYAutoDropComboBox = class(TComboBox) p

职场

休闲

原创 2009-10-21 11:28:39 669 阅读

VCLZip 简单 Demo

Delphi 中之 VCLZip 控件很不错的说，结合多线程，很容易搞出颇具特色的软件... 之前写过 VCLZip + Multi-Thread 的简单 Demo，Now share it： program ZipDemo; uses &

职场

休闲

原创 2009-10-21 11:18:24 2694 阅读 1评论

将数据导出至 M$ Access

Dev Express 中的 dxDBGrid/cxGrid 均提供了将表格中数据导出到 M$ Excel 等中的方法，但大多时候，却需将数据导出至 M$ Access 中... 于是便有了本文。 uses ComObj, Gaug

职场

休闲

原创 2009-10-21 11:14:22 530 阅读

Access 数据表分页显示&导入数据库

以 Delphi 开发基于 Oracle/SQL Server 的数据库应用程序，在显示表中数据时，若数据量过大，难免要应用分页技术——幸运的是，诸于此两者的大型 DBMS，对分页提供了良好的支持，但对 M$ Access 来说却要麻烦些——前提自然是 Access 表中没有自增字段——而这正是关键... 实

职场

休闲

原创 2009-10-21 11:13:02 491 阅读

获取 DBGrid/dxDBGrid 的当前选中字符串

之前编写数据查询程序，需获取 DBGrid/dxDBGrid 中焦点“单元格” 的选中字符串，折腾良久，终发现一简单方法... var hDBGrid: HWND; begin &n

职场

休闲

原创 2009-10-21 11:11:11 718 阅读

将 ListView 内容导入 M$ Excel

工作中处理报表，弃 ListView 显示数据结果，而后需将报表数据保存为 TMS 套件里的…如此方法，将数据存入 ListView 列头写入… procedure SaveLVToXLS(LV: TListView; FileName: string); aWorkBook: Variant; i, j: Integer; &

职场

Delphi

Excel

休闲

ListView

原创 2009-10-21 11:09:30 942 阅读

官方博客	全部文章	热门标签	班级博客
了解我们	网站地图	意见反馈

鸿蒙开发者社区	51CTO学堂
51CTO	软考资讯

51CTO博客

ADelphiCoder