内容列表
Delphi控件的拿来主义(二)
      这个例子是关于如何将一个文本数据导入导出控件作一些简单的修改之后拿来使用的。 ◆程序功能     将图书馆的ISO文件中的部分数据转到Oracle8数据库中。 ◆设计要求     1.显示导入进度条。     2.在导入过程中,如果某条纪录导入
分类:Delphi 查阅全文
Delphi源程序格式书写规范
1.规范简介本规范主要规定Delphi源程序在书写过程中所应遵循的规则及注意事项。编写该规范的目的是使公司软件开发人员的源代码书写习惯保持一致。这样做可以使每一个组员都可以理解其它组员的代码,以便于源代码的二次开发记忆系统的维护。2.一般格式规范2.1缩进缩进就是在当源程序的级改变时为增加可读性而露出的两个空格。缩进的规则为每一级缩进两个空格。不准许使用Tab。因为Tab会因为用户所作的设置不同而
分类:Delphi 查阅全文
检测系统是不是windows xp
下面的代码可以检查所用的系统是不是windows xpuses Registry; ... function IsWinXP: Boolean; begin   Result := False;   if Win32Platform = VER_PLATFORM_WIN32_NT then     with TRegistry.Create d
分类:Delphi 查阅全文
防止关闭windows
     有时候程序在运行当中,不允许别的程序或人为的关闭计算机,除非应用程序知道windows将要退出,其实这样很简单,我们都知道系统将要关闭时,会向每一个程序发送WM_QUERYENDSESSION这条关机消息,只要我们的程序接受到此消息后,做恰当的处理即刻完成我们所需要的。     处理windows消息有好几种,在这里
分类:Delphi 查阅全文
用winspool取得本机安装的打印机的详细信息
用winspool取得本机安装的打印机的详细信息 在Delphi 6 Professional version on Windows 2000 Professional环境下测试过窗体的名字为"FPrint",有TMemo 和 TCombobox 两个控件 unit unit1; interface uses   Windows, Messages, SysUtils, Va
分类:Delphi 查阅全文
全透明窗体(效果比较好)
全透明窗体(效果比较好)uses里加上ExtCtrlsprocedure tform1.setformtransparent;var  I: Integer;  FullRgn,  ClientRgn,  ControlRgn: THandle;  Margin,   MarginX,   MarginY,   X,
分类:Delphi 查阅全文
TNotifyIcon 控件1.01
TNotifyIcon 控件1.01 (Build use Delphi 3.0) 说明:作用: 往通知区加图标,并可显示,隐藏,修改这个图标.  属性(properties): NotifyIcon:TIcon  欲加在通知区的图标 IsVisible:boolean NotifyIcon是否显示的属性 Title:string&nbs
分类:Delphi 查阅全文
Project JEDI VCL组件编码标准
  编写该标准的目的是统一组件代码的书写格式,以便于所有的Delphi程序员----无论是初学者还是高级开发人员---都能够方便地维护和理解他们。对于某些并不完全符合标准,但是十分优秀并且已经加入到源代码知识库的组件,我们在审阅的时候会给予一定的灵活度。然而任何一个程序员在提交他们的代码时,都应该附带正确的题头和说明文档,并认真填写,这一点极为重要。这项工作会让你的代码更容易被源代码知
分类:Delphi 查阅全文
delphi常用文档之四
Delphi 常用文档资料之四 ——虚拟键值列表 vk_Lbutton=$01 vk_Rbutton=$02 vk_Cancel=$03 vk_Mbutton=$04 vk_Back=$08 vk_Tab=$09 vk_Clear=$0C vk_Return=$0D vk_Shift=$10
分类:Delphi 查阅全文
提取win98上网密码
unit Unit1;interfaceuses  Windows, SysUtils, Classes, Forms, ShellAPI, Controls, StdCtrls;type  TForm1 = class(TForm)    GroupBox1: TGroupBox;    ListBox: TListBox; 
分类:Delphi 查阅全文
delphi代码标准文档(
1.前言   本文档主要是为Delphi开发人员提供一个源代码书写标准,以及程序和文件的命名标准,使他们在编程时有一致格式可遵循。这样,每个编程人员编写的代码能够被其他人理解。 2.源程序书写规范 2.1.通用源代码格式规则 1). 缩进   缩进就是每级间有两个空格。不要在源代码中放置制表符。这是因为,制表符的宽度随着不同的设置和代码管理实用程序(打印、文档
分类:Delphi 查阅全文
取得自从开机到现在CPU运行的周期数,超毫秒级的精度
取得自从开机到现在CPU运行的周期数,超毫秒级的精度function Ticker : DWord; register;begin  asm          push EAX          push ED
分类:Delphi 查阅全文
取得某一dll所有输出函数名
取得某一dll所有输出函数名在uses里加上ImageHlp procedure ListDLLFunctions(DLLName: String; List: TStrings);type  chararr = array [0..$FFFFFF] of Char;  var  H: THandle;  I,  fc: integer;&nbs
分类:Delphi 查阅全文
扫雷程序思想讲解
      扫雷程序思想讲解    在我大二的时候就编写了一个扫雷程序,现在也有很多源程序下载,我不知道他们的算法是怎么样的,但我想我的算法应是最清晰和简单的。下面就来讲解我的扫雷程序思想。    首先我们在雷区上随机地放上雷,没有雷的地方被点击后就会显示一个数字表示它周围有几个雷,这是怎
分类:Delphi 查阅全文
《关于VisiBroker For Delphi的使用》
  《关于VisiBroker For Delphi的使用》 -CORBA技术实践(一) 宜昌市中心人民医院            赵普昉 email: [email protected] 一、如何创建服务器对象 在Delphi中使用了IDL2PAS向导,改变了原有的创建C
分类:Delphi 查阅全文
关于 Apollo VCL 6.0 EVAL版超期使用的说明 :)
http://www.vistasoftware.com/downloads/evals/ApolloSQL60Eval.EXE ApolloSQL60Eval.EXE 是脱离BDE操作DBF数据库的工具,今天我从他们的网站 http://www.vistasoftware.com/拉了一个下来,由于是EVAL(评估版)所以 有30天的限制,请看我的破解方法: 1  
分类:Delphi 查阅全文
如何在delphi6中调试web程序
如何在delphi6中调试web程序   感谢borland,这次终于在delphi6中提供了一个调试web程序的利器——Web Application Debugger! 就让我们用它来小试牛刀,看看它给我们提供了多少便利: 1.新建一个web工程,请选中最下面一项:Web App Debugger executable,Coclass name我们设为demo1。
分类:Delphi 查阅全文
《关于VisiBroker For Delphi的使用》(2)
                     《关于VisiBroker For Delphi的使用》 -CORBA技术实践(二) 宜昌市中心人民医院    &
分类:Delphi 查阅全文
delphi中的字符串处理,以及几个字符串类型的说明。
大家对有object pascal的字符串可能您经常用AnsiString其他的字符串一般很少用到。 下面举几个字符串的几个类型: AnsiSring 这是Pascal的默认类型。其长度没有限制的。并且字符串结束是以null结尾。也就是以'/0'结尾。 ShortSring是为了与Delphi以前的版本保持兼容性。其长度限制在255个字符之内的。WideSring与AnsiString类似,
分类:Delphi 查阅全文
《Delphi高手突破》第一章——预览版
写在前面的话:目前,正在写一本面向delphi熟练程序员的书,主题是在delphi中使用面向对象编程技术构建良好设计的程序。此书还在写作过程中,我希望能让大家先对此书的主题以及语言风格能有一个预先的了解。同时,能提出自己的意见。作为作者,我希望这本书能成为国内原创Delphi图书中的经典之作,未必能成功,但我尽力。由于以上原因,我不可能将整本书都贴出来(呵呵,那样就没人去买了),所以应该不会有后续
分类:Delphi 查阅全文
<< 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 >>