能力值:
( LV2,RANK:10 )
|
-
-
2 楼
谁叫中国做不出MSDN呢?那是外国的产品,我也E文不好,不过没办法,在学习CRACKER的时候同时也要去英语角学习交流,时间长了自然就懂了,一个良好的学习习惯非常重要,不要问为什么,学就是的,坚持到底难能可贵!LZ加油吧!
|
能力值:
( LV2,RANK:10 )
|
-
-
3 楼
在csdn上面,我没办法上传附件,你自己去下载吧,http://d.download.csdn.net/down/2069958/SGX6660888
|
能力值:
( LV2,RANK:10 )
|
-
-
4 楼
倒是有一本书介绍 api 的 叫 新编widows API参考大全
|
能力值:
( LV2,RANK:10 )
|
-
-
5 楼
用金山词霸 (不是金山毒霸哦)
|
能力值:
( LV2,RANK:10 )
|
-
-
6 楼
推荐你用谷歌翻译
好用
|
能力值:
( LV2,RANK:10 )
|
-
-
7 楼
|
能力值:
( LV2,RANK:10 )
|
-
-
8 楼
建议LZ还是硬着头皮多看看英文的
看啊看啊,看多了就习惯了
话说回来,这玩意儿还是得去面对的
|
能力值:
( LV2,RANK:10 )
|
-
-
9 楼
这个网上都能找到的。以免别人说我发毒,所以就请你到网上搜索下了。
|
能力值:
( LV2,RANK:10 )
|
-
-
10 楼
好象VS2008 里面有中文的吧,其实下个金山就可以了,MSDN里面要找的函数,百度下就能找到
百科里一般都有
|
能力值:
( LV2,RANK:10 )
|
-
-
11 楼
|
能力值:
( LV2,RANK:10 )
|
-
-
12 楼
DLLs的编写
在Delphi环境中,编写一个DLLs同编写一个一般的应用程序并没有太大的区别。事实上作为DLLs 主体的DLL函数的编写,除了在内存、资源的管理上有所不同外,并不需要其它特别的手段。真正的区别在工程文件上。
在绝大多数情况下,用户几乎意识不到工程文件的存在,因为它一般不显示在屏幕上。如果想查看工程文件,则可以打开View菜单选择Project Source项,此时工程文件的代码就会出现在屏幕的Code Editor(代码编辑器)中。
一般工程文件的格式为:
program 工程标题;
uses 子句;
程序体
而DLLs工程文件的格式为:
library 工程标题;
uses 子句;
exprots 子句;
程序体
它们主要的区别有两点:
1.一般工程文件的头标用program关键字,而DLLs工程文件头标用library 关键字。不同的关键字通知编译器生成不同的可执行文件。用program关键字生成的是.exe文件,而用library关键字生成的是.dll文件;
2.假如DLLs要输出供其它应用程序使用的函数或过程,则必须将这些函数或过程列在exports子句中。而这些函数或过程本身必须用export编译指令进行编译。
编写一般DLLs的步骤
编写一般DLLs的步骤如下:
1.利用Delphi的应用程序模板,建立一个DLLs程序框架。
对于Delphi 1.0的用户,由于没有DLLs模板,因此:
(1).建立一个一般的应用程序,并打开工程文件;
(2).移去窗体和相应的代码单元;
(3).在工程文件中,把program改成library,移去Uses子句中的Forms,并添加适当的库单元(一般SysUtils、Classes是需要的),删去begin...end之间的所有代码。
2.以适当的文件名保持文件,此时library后跟的库名自动修改;
3.输入过程、函数代码。如果过程、函数准备供其它应用程序调用,则在过程、函数头后加上export 编译指示;
4.建立exports子句,包含供其它应用程序调用的函数和过程名。可以利用标准指示 name 、Index、resident以方便和加速过程/函数的调用;
5.输入库初始化代码。这一步是可选的;
6.编译程序,生成动态链接库文件。
10.2.1.2 动态链接库中的标准指示
在动态链接库的输出部分,用到了三个标准指示:name、Index、resident。
1.name
name后面接一个字符串常量,作为该过程或函数的输出名。如:
exports
InStr name MyInstr;
其它应用程序将用新名字(MyInstr)调用该过程或函数。如果仍利用原来的名字(InStr),则在程序执行到引用点时会引发一个系统错误。
2.Index
Index指示为过程或函数分配一个顺序号。如果不使用Index指示,则由编译器按顺序进行分配。
Index后所接数字的范围为1...32767。使用Index可以加速调用过程。
3.resident
使用resident,则当DLLs装入时特定的输出信息始终保持在内存中。这样当其它应用程序调用该过程时,可以比利用名字扫描DLL入口降低时间开销。
对于那些其它应用程序常常要调用的过程或函数,使用resident指示是合适的。例如:
exports
InStr name MyInStr resident;
......................................................
编写一般DLLs的应用举例
在下面的程序中我们把一个字符串操作的函数储存到一个DLLs中,以便需要的时候调用它。应该注意的一点是:为了保证这个函数可以被其它语言编写的程序所调用,作为参数传递的字符串应该是无结束符的字符数组类型(即PChar类型),而不是Object Pascal的带结束符的Srting类型。程序清单如下:
library Example;
uses
SysUtils,
Classes;
{返回字符在字符串中的位置}
function InStr(SourceStr: PChar;Ch: Char): Integer; export;
var
Len,i: Integer;
begin
Len := strlen(SourceStr);
for i := 0 to Len-1 do
if SourceStr[i] = ch then
begin
Result := i;
Exit;
end;
Result := -1;
end;
exports
Instr Index 1 name 'MyInStr' resident;
begin
end.
10.2.2 调用DLLs
有两种方法可用于调用一个储存在DLLs中的过程。
1.静态调用或显示装载
使用一个外部声明子句,使DLLs在应用程序开始执行前即被装入。例如:
function Instr(SourceStr : PChar;Check : Char); Integer; far; external 'UseStr';
使用这种方法,程序无法在运行时间里决定DLLs的调用。假如一个特定的DLLs在运行时无法使用,则应用程序将无法执行。
2.动态调用或隐式装载
使用Windows API函数LoadLibray和GetProcAddress可以实现在运行时间里动态装载DLLs并调用其中的过程。
若程序只在其中的一部分调用DLLs的过程,或者程序使用哪个DLLs, 调用其中的哪个过程需要根据程序运行的实际状态来判断,那么使用动态调用就是一个很好的选择。
使用动态调用,即使装载一个DLLs失败了,程序仍能继续运行。
10.2.3 静态调用
在静态调用一个DLLs中的过程或函数时,external指示增加到过程或函数的声明语句中。被调用的过程或函数必须采用远调用模式。这可以使用far过程指示或一个{$F +}编译指示。
Delphi全部支持传统Windows动态链接库编程中的三种调用方式,它们是:
● 通过过程/函数名
● 通过过程/函数的别名
● 通过过程/函数的顺序号
通过过程或函数的别名调用,给用户编程提供了灵活性,而通过顺序号(Index)调用可以提高相应DLL的装载速度。
10.2.4 动态调用
10.2.4.1 动态调用中的API函数
动态调用中使用的Windows API函数主要有三个,即:Loadlibrary,GetProcAddress和Freelibrary。
1.Loadlibrary: 把指定库模块装入内存
语法为:
function Loadlibrary(LibFileName: PChar): THandle;
LibFileName指定了要装载DLLs的文件名,如果LibFileName没有包含一个路径,则Windows按下述顺序进行查找:
(1)当前目录;
(2)Windows目录(包含win.com的目录)。函数GetWindowDirectory返回这一目录的路径;
(3)Windows系统目录(包含系统文件如gdi.exe的目录)。函数GetSystemDirectory返回这一目录的路径;
(4)包含当前任务可执行文件的目录。利用函数GetModuleFileName可以返回这一目录的路径;
(5)列在PATH环境变量中的目录;
(6)网络的映象目录列表。
如果函数执行成功,则返回装载库模块的实例句柄。否则,返回一个小于HINSTANCE_ERROR的错误代码。错误代码的意义如下表:
假如在应用程序用Loadlibrary调用某一模块前,其它应用程序已把该模块装入内存,则Loadlibrary并不会装载该模块的另一实例,而是使该模块的“引用计数”加1。
2.GetProcAddress:捡取给定模块中函数的地址
语法为:
function GetProcAddress(Module: THandle; ProcName: PChar): TFarProc;
Module包含被调用的函数库模块的句柄,这个值由Loadlibrary返回。如果把Module设置为nil,则表示要引用当前模块。
ProcName是指向含有函数名的以nil结尾的字符串的指针,或者也可以是函数的次序值。如果ProcName参数是次序值,则如果该次序值的函数在模块中并不存在时,GetProcAddress仍返回一个非nil的值。这将引起混乱。因此大部分情况下用函数名是一种更好的选择。如果用函数名,则函数名的拼写必须与动态链接库文件EXPORTS节中的对应拼写相一致。
如果GetProcAddress执行成功,则返回模块中函数入口处的地址,否则返回nil。
3.Freelibrary:从内存中移出库模块
语法为:
procedure Freelibrary(Module : THandle);
Module为库模块的句柄。这个值由Loadlibrary返回。
由于库模块在内存中只装载一次,因而调用Freelibrary首先使库模块的引用计数减一。如果引用计数减为0,则卸出该模块。
每调用一次Loadlibrary就应调用一次FreeLibray,以保证不会有多余的库模块在应用程序结束后仍留在内存中。
10.2.4.2 动态调用举例
对于动态调用,我们举了如下的一个简单例子。系统一共包含两个编辑框。在第一个编辑框中输入一个字符串,而后在第二个编辑框中输入字符。如果该字符包含在第一个编辑框的字符串中,则标签框显示信息:“位于第n位。”,否则显示信息:“不包含这个字符。”。如图是程序的运行界面。
输入检查功能的实现在Edit2的OnKeyPress事件处理过程中,程序清单如下。
procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
var
order: Integer;
txt: PChar;
PFunc: TFarProc;
Moudle: THandle;
begin
Moudle := Loadlibrary('c:\dlls\example.dll');
if Moudle > 32 then
begin
Edit2.text := '';
Pfunc := GetProcAddress(Moudle,'Instr');
txt := StrAlloc(80);
txt := StrPCopy(txt,Edit1.text);
Order := TInstr(PFunc)(txt,Key);
if Order = -1 then
Label1.Caption := '不包含这个字符 '
else
Label1.Caption := '位于第'+IntToStr(Order+1)+'位';
end;
Freelibrary(Moudle);
end;
在利用GetProcAddess返回的函数指针时,必须进行强制类型转换:
Order := TInstr(PFunc)(text,Key);
TInStr是一个定义好了的函数类型
|
能力值:
( LV2,RANK:10 )
|
-
-
13 楼
我这里有个不是很全的windows API的中文帮助文档 要是需要 我传给你
|
能力值:
( LV2,RANK:10 )
|
-
-
14 楼
Windows系统编程(第三版)(PDF), 是Windows API核心特性和功能的实践指导材料,
下面的是链接
http://www.ccrun.com/down.asp?i=304&d=cjy707
|
能力值:
( LV2,RANK:10 )
|
-
-
15 楼
在线翻译的多少 去google 百度一下 嘻嘻
|
能力值:
( LV2,RANK:10 )
|
-
-
16 楼
要用什么函数网上搜就是了,你要用的,别人肯定用过了
|
能力值:
( LV2,RANK:10 )
|
-
-
17 楼
看看,学习下~
|
能力值:
( LV2,RANK:10 )
|
-
-
18 楼
|
能力值:
( LV2,RANK:10 )
|
-
-
19 楼
建议还是直接看英文的
|
|
|