相关分类: Java技术 C/C++ VB delphi
  • 改良版TStringList类

    {----------------------------------------------------------------------------- The contents of this file are subject to the Mozilla Public License Version 1.1 (the License); you may not use this file except in compliance with the License. You may ob...

    2008-04-09 04:21:32

  • 获取 Windows 特殊文件夹函数

    在网上找不到比较全的,干脆自己做,现贡献出来。 unit Utils; interface uses Windows, SysUtils, ShlObj; type TSpecialFolder = ( sfDesktop, // desktop sfInternet, // Internet Explorer (icon on desktop) sfPrograms, // Start MenuPrograms sfControls, // M...

    2008-04-09 04:21:33

  • 设计模式在制作升级文件包中的应用

    设计模式在制作升级文件包中的应用 钱波 钱晓贤 高春玲 引言 软件系统的复杂性越来越大,而现有的类库也已经不能满足工程的需要,软件开发小组得到的建议是除了软件本身的特性突出,快速投放市场,成本低以外,还有性能和安全,并且软件能够做到改动容易,能及时交付,...

    2008-04-09 04:21:30

  • C\S结构中成批保存CLIENTDATASET中的数据

    这应该不算是什么技巧,估计有数据库方面程序的DELPHI程序员都知道;本来没有写想到 需要把它写成一篇贴子,但前不久看个别刚入门的兄弟的代码时。才发展他们还在刀 耕火种,为此才想把它写出来算是对入门的兄弟们的一点帮助,让大侠们见笑了; 我们都知道TCLIENTDATAS...

    2008-04-09 04:21:29

  • 读书笔记:Delphi5 开发人员指南 第一章

    大学期间基本没有什么编程经验,虽然上学期间相关的课程也学了一些,但那些只是基本的东西而已。比如C语言、比如数据结构、比如数据库。况且作为一个学生,一个比较懒的学生,我基本上是只学了那些老师所教的东西,所谓的重点。可以说,对于程序开发,我是一个门外汉。...

    2008-04-09 04:21:26

  • 让窗体在执行了“显示桌面”以后仍旧显示在桌面上……

    昨天在DFW上看到一个问题,要求使程序窗口置于最低层(在桌面上);点击显示桌面以后还是在桌面上,琢磨了一下,实现了让窗体在执行了显示桌面以后仍旧显示在桌面上,代码如下: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics...

    2008-04-09 04:21:28

  • 我的第一份上传作品。。请多多指教。。。(摇号器)

    unit yaohaoqiU; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Spin; type TForm1 = class(TForm) Button1: TButton; SpinEdit1: TSpinEdit; SpinEdit2: TSpinEdit; Label1: TLabel; Label2: TLabe...

    2008-04-09 04:21:22

  • Deiphi编译优化导致的死循环

    请看下面这段代码: procedure TForm1.Button1Click(Sender: TObject); var strColor: string; i, R, G, B, p: integer; strlist: TStringList; begin strColor := medt.Text ''''-''''; strlist := TStringList.Create; try for R := 0 to 2 do //把变量R改为i正常 be...

    2008-04-09 04:21:23

  • Delphi的TWebBrowser编程综述

    Delphi3开始有了TWebBrowser构件,不过那时是以ActiveX控件的形式出现的,而且需要自己引入,在其后的4.0和5.0中,它就在封装好shdocvw.dll之后作为Internet构件组之一出现在构件面板上了。常常听到有人骂Delphi的帮助做得极差,这次的TWebBrowser又是Microsoft的东东...

    2008-04-09 04:21:21

  • 使用break与continue语句和for与continue语句

    unit UDemo33; //使用break与continue语句和for与continue语句 //※ 利用while循环和break语句,求前多少个自然数(项数)平方之和大于指定的正数。 //※ 利用for循环和continue语句,在26个小写字母中依次选择其ASCII为偶数的字母 // 组成的字符串。 //求项数的算法:...

    2008-04-09 04:21:19

2