- 博客(8)
- 论坛 (28)
- 收藏
- 关注
原创 取得自从开机到现在CPU运行的周期数,超毫秒级的精度
取得自从开机到现在CPU运行的周期数,超毫秒级的精度function Ticker : DWord; register;begin asm push EAX push EDX db $0f,$31 mov Result, EAX pop EDX pop EAX end;end;pro
2002-01-17 10:19:00
1205
原创 取得某一dll所有输出函数名
取得某一dll所有输出函数名在uses里加上ImageHlpprocedure ListDLLFunctions(DLLName: String; List: TStrings);type chararr = array [0..$FFFFFF] of Char; var H: THandle; I, fc: integer; st: string; arr: Pointer;
2002-01-17 10:19:00
1336
原创 用winspool取得本机安装的打印机的详细信息
用winspool取得本机安装的打印机的详细信息在Delphi 6 Professional version on Windows 2000 Professional环境下测试过窗体的名字为"FPrint",有TMemo 和 TCombobox 两个控件unit unit1; interface uses Windows, Messages, SysUtils, Variant
2002-01-11 17:35:00
1760
原创 全透明窗体(效果比较好)
全透明窗体(效果比较好)uses里加上ExtCtrlsprocedure tform1.setformtransparent;var I: Integer; FullRgn, ClientRgn, ControlRgn: THandle; Margin, MarginX, MarginY, X, Y: Integer; W,H,S :Integer; bX,bY :
2002-01-11 17:34:00
1225
原创 检测系统是不是windows xp
下面的代码可以检查所用的系统是不是windows xpuses Registry; ... function IsWinXP: Boolean; begin Result := False; if Win32Platform = VER_PLATFORM_WIN32_NT then with TRegistry.Create do try RootKey :
2002-01-11 09:39:00
1211
原创 取得的Outlook目录并在TTreeView里显示出来
outlook对象提供了一个MAPI命名空间可以访问其文件夹集合,每个文件夹都有一个唯一的字符型标识符,可以将其作为数据保存在TTreeNode的EntryID属性里。例程如下,uses里加上ComObj。 procedure LoadFolder(ParentNode: TTreeNode; Folder: OleVariant); var i: Integer; node: T
2002-01-07 10:16:00
1116
原创 Self-Delete程序之Delphi版本,终于搞定了。 (转载)
//转贴者:以前看过陆麟先生翻译过一篇这样的文章,是c版本的,我用delphi改写了没成功,今天去清华bbs转悠看见了这篇delphi版本的,特贴出来发信人: Litoad (Rick), 信区: Delphi 标 题: Self-Delete程序之Delphi版本,终于搞定了。 (转载) 发信站: BBS 水木清华站 (Mon Jun 4 20:51:55 2001)
2002-01-05 18:21:00
1677
1
原创 delphi6 问题2
如果将一个int64类型的变量作为一个需要浮点数为参数的函数的参数(如:ln,sin等)会报告类型不匹配,而不会自动进行转换,如下例var X: Int64; Y: Extended;begin X := 1; Y := Ln(X);end;解决办法:给参数加上0.0var X: Int64; Y: Extended;begin X := 1; Y := Ln(X+0.0);end
2002-01-02 15:05:00
1029
空空如也
alphax(多喝了三五杯):进来讨论一下如何动态计算汇编指令的长度
发表于 2004-04-21 最后回复 2004-05-09
内嵌汇编如何使用 fword ptr ?
发表于 2004-02-25 最后回复 2004-04-21
一段nt下不用驱动进入ring0层的C代码,寻高手转成Delphi
发表于 2004-02-10 最后回复 2004-02-27
使用NtMapViewOfSection函数总是返回C0000018,why?
发表于 2004-02-16 最后回复 2004-02-17
addr 与 @ 操作不同吗??? 与汇编有关 请高手出招
发表于 2003-12-23 最后回复 2003-12-24
输出到哪里了??
发表于 2003-06-13 最后回复 2003-06-13
如何编程实现查找网上邻居-属性设置 里的连接名??
发表于 2003-05-14 最后回复 2003-05-17
如何确定一个函数在内存里起始和结束地址呢?
发表于 2003-05-13 最后回复 2003-05-13
请问 C的定义“WORD offset:12;”怎么转换成delphi的?
发表于 2003-05-12 最后回复 2003-05-12
悄悄问:a|=b 什么意思??? q
发表于 2003-05-09 最后回复 2003-05-09
没有类名 怎么用findwindow?
发表于 2002-12-26 最后回复 2002-12-26
【不解】微软搞的什么鬼?(WindowFromPoint)
发表于 2002-11-10 最后回复 2002-11-18
【不解】微软搞的什么鬼?
发表于 2002-11-10 最后回复 2002-11-15
送分题
发表于 2002-04-15 最后回复 2002-04-16
在Delphi里如何使用RegExp object??
发表于 2001-07-12 最后回复 2002-04-15
请问有没有提供win98下的telnet服务的软件?
发表于 2002-01-05 最后回复 2002-01-11
如何在win98下安装telnet服务?
发表于 2002-01-06 最后回复 2002-01-08
不要说我笨
发表于 2001-12-10 最后回复 2001-12-11
动态创建窗体时如何传递参数?
发表于 2001-10-04 最后回复 2001-11-09
超酷控件
发表于 2001-08-24 最后回复 2001-08-24
高手问的问题 :)
发表于 2001-08-05 最后回复 2001-08-06
ComboBox问题??
发表于 2001-07-16 最后回复 2001-07-17
类的引用
发表于 2001-07-12 最后回复 2001-07-13
修改DELPHI自带控件的问题。
发表于 2001-07-11 最后回复 2001-07-12
CPU降温原理???高手们可否讨论一下。
发表于 2001-06-27 最后回复 2001-07-11
软件发布:电视墙
发表于 2001-06-25 最后回复 2001-06-25
软件发布:虚拟盘
发表于 2001-06-07 最后回复 2001-06-07
关于JMAIL的一个问题。。。。。。
发表于 2000-10-11 最后回复 2000-10-11
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人 TA的粉丝