专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅
//////////////////////////// //武汉探索电脑工作室// //http://tansuo.51.net// //////////////////////////// //增加规格自定义纸张 //PaperName:自定义纸张名称 //PaperWidth:纸张的宽度,以0.1mm为单位 //PaperLength:纸张的高度,以0.1mm为单位 procedureTDM.AddCustomPaper(constPaperName:string;PaperWidth,PaperLength:integer) [阅读全文] [PDF]
用到3个API函数 BOOL RegisterHotKey( HWND hWnd, //响应该热键的窗口句柄 Int id, //该热键的唯一标识 UINT fsModifiers, //该热键的辅助按键 UINT vk //该热键的键值 ); 为了得到唯一标识,我们还将用到另一个API函数 ATOM GlobalAddAtom( LPCTSTR lpString //自己设定的一个字符串 ); 因为我们还要在程序退出的时候,消除这个热键, 所以需要声明一个全局变量: HotKeyId: Integer; 第一步: 在窗口的create事件中,加入以下代码 [阅读全文] [PDF]
delphi 程序自删除函数 DeleteMeprocedure DeleteMe; var BatchFile: TextFile; BatchFileName: string; ProcessInfo: TProcessInformation; StartUpInfo: TStartupInfo; begin BatchFileName := ExtractFilePath(ParamStr(0)) + '$$del$$.bat'; AssignFile(BatchFile, BatchFileName); Rewrite(BatchFile); Wr [阅读全文] [PDF]
与过程一样,函数的程序代码也执行特定的工作。它和过程的差别为:函数执行时会返回一个值,而过程则没有返回值。函数可以用来赋给一个属性或变量;也可以出现在表达式中。函数定义也分为函数原型定义和函数体定义两部分。 1.函数原型定义语法形式 function<函数名>([[var]<参数名>:<类型>][;[var]<参数名>:<类型>]…): <类型>;[指示字] 2.函数体的定义语法形式 函数体的定义放在单元的实现部分,其形式如下: function<函数名>(<形式参数 [阅读全文] [PDF]
在ObjectPascal中,定义类数据类型使用保留字class。下面是类类型定义的语法格式:type<类型名>=class[(<基类型名称>)] <类成员列表> end; 其中,选择使用基类型名称可以指出类的直接祖先类,类类型可以指定一个祖先类型,表示该类型是从这个指定的祖先类型继承下来的。在Delphi中,如果不指明基类,则默认的父类为’rOb—ject类,也就是直接从。YObject类派生出一个新类。’l’Object类是在System单元中定义的。例如, 下面定义一个Student类: typestudent=c [阅读全文] [PDF]
1 共6条 分1页