Delphi
文章平均质量分 78
littlerain007
这个作者很懒,什么都没留下…
展开
-
Delphi下枚举局域网内SQL服务器以及数据库
unit uMain;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, dxCntner, dxEditor, dxExEdtr, dxEdLib, StdCtrls, ComCtrls,ComObj, Buttons;原创 2004-10-22 11:04:00 · 2495 阅读 · 0 评论 -
Delphi与C中的指针对比
一、类型指针的定义。对于指向特定类型的指针,在C中是这样定义的: int *ptr; char *ptr; 与之等价的Object Pascal是如何定义的呢? var ptr : ^Integer; ptr : ^char; 其实也就是符号的差别而已。 二、无类型指针的定义。C中有void *类型,也就是可以指向任何类型数据的指针。Object Pasc原创 2005-01-17 15:37:00 · 1048 阅读 · 0 评论 -
将字符串中的数值表达式的值输出(源码)
unit Parser;interfaceuses Windows,SysUtils, Messages, Classes, Graphics, Controls, Forms, Dialogs;type TGetVarEvent = procedure(Sender : TObject; VarName : string; var Value : Extended; var原创 2005-02-21 17:59:00 · 927 阅读 · 0 评论 -
DELPHI程序编码规范
一、序言二、通用源代码格式规则2.1 缩格2.2 页边空格2.3 Begin…End 配对三、Object Pascal3.1 括号3.2 保留字和关键字3.3 过程和函数(例程) 3.3.1 命名/格式化 3.3.2 形式参数 3.3.2.1 格式化 3.3.2.2 命名 3.3.2.3 参数的排序 3.3.2.4 常量参数原创 2005-04-30 11:35:00 · 1834 阅读 · 0 评论 -
日历单元
unit Calendar;interfaceuses SysUtils, Windows;const START_YEAR = 1901; END_YEAR = 2050;// ==> function IsLeapYear(Year: Word): Boolean;//计算iYear,iMonth,iDay对应是星期几 1年1月1日 --- 65535年12月31日function Wee原创 2005-04-30 11:33:00 · 1654 阅读 · 0 评论