请使用动态库的高手帮帮忙(20分)

  • 主题发起人 主题发起人 delphi4.0
  • 开始时间 开始时间
D

delphi4.0

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
var hDll:THandle;
ContentHelp:procedure ;
begin
hDll:=LoadLibrary('xxxxx.dll');
if hDll<32 then
exit;
 @ContentHelp:=GetProcAddress(hDll,'ContentHelp');
FreeLibrary(hDll);
end;
编译的时候出现
"[Error] TestDll.pas(32): Illegal character in input file: ' ' ($A1A1)"
错误
我把"@ContentHelp:=GetProcAddress(hDll,'ContentHelp');"注释掉是同样的错误!更奇怪的是我把begin
,end之间的全都注释掉也是同样的错误,把begin
,end之间的语句全删除就没问题了,
小弟分数不多了,请见量!

 
>"[Error] TestDll.pas(32): Illegal character in input file: ' ' >($A1A1)"
> 错误
在你的输入文本的第 32 行文本中, 至少存在一个全角的空格字符($A1A1),
该字符被认定是非法字符,不在单引号之间,不可编译。
 
这好象和动态库没有任何关系. :-|
 
是我太急了,谢谢!
 

Similar threads

后退
顶部