求救！Help !!!!!!!!!!!(100分)

P

players

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-03

• #1

代码:

 &nbsp;LibHandle:=LoadLibrary('Fun.Dll');<br>&nbsp; Try<br>&nbsp; &nbsp; &nbsp; if LibHandle=0 then<br>&nbsp; &nbsp; &nbsp; begin<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;showmessage('不能加载Dll');<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Exit;<br>&nbsp; &nbsp; &nbsp; end;<br>&nbsp; &nbsp; &nbsp; @GetDateStr:=GetProcAddress(LibHandle,'GetDateStr');<br>&nbsp; &nbsp; &nbsp; if not(@GetDateStr=nil) then<br>&nbsp; &nbsp; &nbsp; begin<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Label1.Caption:=GetDateStr(Date);<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;label1.Refresh;<br>&nbsp; &nbsp; &nbsp; end<br>&nbsp; &nbsp; &nbsp; else<br>&nbsp; &nbsp; &nbsp; &nbsp; RaiseLastWin32Error;<br>&nbsp; finally<br>&nbsp; &nbsp; &nbsp; &nbsp;FreeLibrary(LibHandle);<br>&nbsp; end;

在GetDateStr函数中调用了同一个DLL中的函数！这样的调用有什么问题？为什么会报错！<br>Invalid pointer operation! 紧急求救

 

B

BeginDelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-04

• #2

你的GetDateStr是什么类型的?<br><br>GetDataStr要定义为:function(DataataType):String;stdcall;

 

P

players

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-05

• #3

TGetDateStr=function(TheDate:TDate):String;StdCall;<br>的确是这么定义的啊！

 

B

BeginDelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-06

• #4

能不能把完整的程序发给我？<br>zengxiaoxun@hotmail.com

 

P

players

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-07

• #5

不好意思！公司程序！不便发送！不好意思！请问能分析一下问题的大概原因吗？

 

S

SINGLBOY

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-07

• #6

在工程中加如 <br>uses<br>&nbsp; shareMem &nbsp;//第一位

 

W

wlmmlw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-07

• #7

GetDateStr函数是否验证正确？

 

P

players

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-08

• #8

请问什么叫验证正确？

 

T

twos

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-08

• #9

你的问题可能不是出在调用上。调用好像没有问题的<br>你的动态连接库有问题吗？

 

P

players

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-08

• #10

其他函数更都没问题！ 没想到这么简单的函数也会出错！<br>

 

P

players

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-14

• #11

难道没人能救我吗？

 

U

ugvanxk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-14

• #12

function(DataataType):String;stdcall;<br>改为 function(DataataType)ointer;stdcall;

 

P

players

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-18

• #13

多人接受答案了。